ACCESS テキストボックスの入力値削除

質問

こんにちは。ACCESSの初心者です。
現在ACCESSを使ってとある一覧表の入力フォーマットを作成しております。

早速ですが質問です。
フォームのテキストボックスにて入力チェックをしており、間違った値が入力されると、メッセージボックスを出し、その間違った入力値を削除し、カーソルをそのテキストボックスに戻す、ようにしたいのですがどうすればいいのでしょうか？

ちなみに現在以下のようなソースを作成しているのですが、(1)と(2)のところがどうすればいいのかわかりません。

If 正しい入力値 then
次のテキストボックスへ移動
else
msgbox（"入力値エラー")
入力値削除(1)
カーソルを戻す(2)
end if

よろしくお願いします。

回答No.1

imogasi

フォームにテキストボクス２つ貼り付けて
手抜きですが、フォームをクリックするとチェックするとして
Private Sub Form_Click()
If テキスト0.Text = "2" Then
テキスト2.SetFocus
Else
MsgBox ("入力値エラー")
テキスト0.Text = ""
テキスト0.SetFocus
End If
End Sub
でそれらしくなりましたが。