Microsoft Access 掲示板

ファームにある複数のコンボボックスでフィルター / 6

15 コメント
views
4 フォロー
6
COCO 2024/02/19 (月) 10:13:55 ddfe5@71072

hatenaさん ありがとうございます。Subプロシージャ、Functionプロシージャの事は少し調べました。何となくしか分かってませんが実際に試そうと思いまして(別のコードで同じフォームに記述しているものがあるので)下記の様な内容のでプロシージャを作成しました。
Public Sub record_idou()
 If IsNull(Me.[F1]) Then
    MsgBox"F1未入力時はレコード移動できません"
   Exit Sub
 End If
End Sub
これをフォームのレコード移動ボタンに下記を記述しました。
 Call record_idou
  DoCmd.GoToRecord , , acPrevious
試すとF1未入力時・・・・のメッセージは出るのですがレコード移動はしてしまいます。Exit Subが効いてません。
何か記述不足しているのでしょうか?

通報 ...