既に開いているフォームのデータを更新するには？ (ID:108418)

名前

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

本文 > form1では Public cs AS New ADODB.Connnection と Public で宣言して > いるのですが、fom2でが使用できませんでした。。。 > 同じconnectionを使用するにはどう記述すればいいのでしょうか？ -- From1 --- Private cs AS New ADODB.Connnection Public Function GetCn() As ADODB.Connection Set GetCn = cs End Sub --- Form2 --- Private Sub Command1_Click() Dim cn As ADODB.Connection Set Cn = Form1.GetCn --- 試してないので動くかどうかわかりません。