#095
あるフォームを一定時間で自動的に閉じるには、フォームの[タイマ時]イベントを利用します。
まず、フォームの[タイマ間隔]プロパティに、フォームを開いてから閉じるまでの時間を1/1000秒単位で設定します(２秒後なら"2000")。そして、その時間が経過したら発生する[タイマ時]イベントプロシージャに、自分自身のフォームを閉じるコードを記述します。
Private Sub Form_Timer()
DoCmd.Close acForm, Me.Name
End Sub
DoCmd.Close acForm, Me.Name
End Sub
