別フォームから１つの関数をcallするには (ID:115282)

名前

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

本文 ご指導ありがとうございます。 まったくの.ｎｅｔ初心者なんで、説明不足で 申し訳ありません。 フォーム１、フォーム２ともに、textbox1のキーダウンイベントで マスタ参照関数をコールしています。 Private Sub TextBox1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown Call InpSiire(Me) end sub Public Sub InpSiire(ByRef Frm As ???) With Frm 'マスタより参照 strsql = "select * from siire_mst where siirecd= '" & .TextBox1.Text & "'" *** ＤＢを参照し値取得 .Label10.Text = CType(cnRd.Item("siireme"), String) End With End Sub