EmployeeIDをダブルクリックすると、従業員情報を含むサブフォームを含む別のフォームが開くフォームを含むAccessデータベースがあります。このコードを使用して、元のフォームからEmployeeIDを取得します...
myID = CInt(Me.OpenArgs)
この文字列をセカンダリフォームとそれに含まれるサブフォームで使用していますが、EmployeeIDを取得していません。メインフォームには、Double-Clickイベントのこのコードがあります...
Private Sub EmployeeID_DblClick(cancel As Integer)
Dim myID As Variant
myID = Me.EmployeeID
DoCmd.OpenForm "subformEmployeeInfo",,,,,,myID
DoCmd.OpenForm "frm_EmployeeInformation",,,,,,myID
End Sub
コードをステップスルーすると、OpenFormコマンドにIDが含まれていることに気付きますが、サブフォームコードに切り替えると、「無効なNullの使用」エラーが発生します。