SQL中で、FORM名が変数のコントロールを指定するには (ID:115827)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 そのような設計にするのであれば、「フォーム名」を渡すのではなく、 「フォーム」その物を渡した方が手っ取り早いかも。 たとえば、 Private Function GetSQL(ByVal F As Form) As String GetSQL = "SELECT 〜 WHERE 項目名 = '" & F.txtNO.Text & "'" End Function のように宣言しておいて Dim SQL As String SQL = GetSQL(Form2) のように呼び出すとか。 # なお、この場合、テキストボックスに「' OR 1=1 OR ''='」などと # 書かれた時に、WHERE句が「項目名='' OR 1=1 OR ''=''」のように # なってしまうので、実際には、「'」などの処理も必要になるでしょう。