hatena の Microsoft Access 掲示板



[7214] 複数のOpeneagsをフォームに渡す方法 Name:tokinaito Date:2017/07/18(火) 02:46 [ 返信 ]
たびたびの質問をお許しください。
以前 複数のOpeneagsをフォームに渡す方法を教えていただきましたが

下記式に処理するとOpeneagsを取り消しますと出ます。

どこがいけないのでしょうかご教示願います。

送り側
Dim myArgs As String

'エラー処理を組み込んでおきます。
'Nz関数でNull値のときは空文字を返す。
'カンマ","で引き渡す引数を区切る。

myArgs = Nz(Me.管轄署, "") '1回目
myArgs = myArgs & "," & Nz(Me.普軽txt, "") '2回目
DoCmd.OpenForm "F車庫", , , , , , myArgs


受け取り側
Dim tmp As Variant

'カンマで区切ったデータを別の変数に代入する


'OpneArgs引数を代入する
tmp = Split(Me.OpenArgs, ",")


スレッド記事表示 No.7214 複数のOpeneagsをフォームに渡す方法 tokinaito2017/07/18(火) 02:46 [ 返信 ]
   ┗No.7215 解決RE:複数のOpeneagsをフォームに渡す方法 tokinaito2017/07/18(火) 06:53

  




無料レンタル掲示板・日記・ブログ Progoo