Microsoft Access 掲示板

フォームのopenコマンドでのopenargs / 9

11 コメント
views
4 フォロー
9

こんにちは!!
こちらで教えていただいたこの方法が大変役にたっておりますが、これと全く同じ方法で、今度は指定項目は2つになるとどのように記述すればいいでしょうか??
どう変更してもうまくいかなくて、また教えていただけるとありがたいです。

検索フォーム側(商品コードだけではなくて商品名も一致しているレコードを表示したい)
    Dim args,args2 As String
    args = Me.商品コード
    args2 = me.商品名
    DoCmd.OpenForm "氏名テーブル", acNormal, , "商品コード=" & args & "", , acDialog, args,args2?

結果フォーム側
Private Sub Form_Open(Cancel As Integer)
    If Me.OpenArgs <> "" Then
      me.商品コード検索.Value = Me.OpenArgs
      me.商品名検索.valtue = ????
    End If
End Sub

お手数ですが、宜しくお願いいたします😵

通報 ...