|
▼小僧 さん:
オプションボタンについてもう少し質問があります。
もし、コマンドボタン:次へ移動ボタンをクリックしたとき、
残業時間が0の場合に残業区分が選択されていたら、
メッセージを表示するようにしたいのですが、どうもうまくいきません。
Private Sub 次へ移動ボタン_Click()
Select Case True
Case Not IsNull(Me.残業区分)
MsgBox ("残業区分が選択されています")
Case Else
DoCmd.GoToRecord , , acNext
End Select
End Sub
というコードを書いたのですが、残業区分が選択されていないのに
メッセージが表示されてしまいます。
あと、
Case Not IsNull(Me.残業区分)
↓
Case Me.残業区分.Value = 0
で書くと
「実行時エラー94 NULLの使い方が不正です」と表示されます。
テーブルを見ても、データ型は数値型になっているのですが、
どうも駄目みたいです。
とりあえずは、選択されていないのに表示されてしまうメッセージボックスを
正常に働かせたいのですが、ご指導お願いいたします。
|
|