単票フォームを開いたときにレコードの新規入力状態にする方法です。
例
たとえば、このようなテーブルをもとに単票フォームを作ってみます。
手っ取り早くウィザードを利用して単票フォームを作成してみました。こんな感じになります。
一応、テキストボックスのサイズとかラベルの文字位置とかは調整しています。
これで、普通にフォームを開くと通常一番最初のレコードが表示されます。上の図の状態です。
これを新規入力の状態でフォームを開くには、フォームを開く際のイベントプロシージャに次のように記述します。、
Private Sub Form_Load()
'新規レコード
DoCmd.GoToRecord , , acNewRec
End Sub
DoCmd.GoToRecordの第二引数に「acNewRec」と指定します。こうすると新規入力状態になります。実際に開いてみるとこのようになります。
スポンサーリンク