请指教：窗口1中的DataGrid1.DataSource ，怎么在窗口2中用？在线等

Question

Set con = New ADODB.Connection
   con.CursorLocation = adUseClient
   con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\mkzyy\mkzyy.mdb;Persist Security Info=False"
   Set rs = New Recordset
    
    Select Case findflag
     
     Case 0
        strsql = "select * from mkzyy_fsk order by id"
     Case 1
        strsql = "select * from mkzyy_fsk where zd_name = '" & findkey & "'"
    End Select
     
     rs.Open strsql, con, 1, 1
      
   Set DataGrid1.DataSource = rs
我想在窗口中用DataGrid1.DataSource，怎么用！
请指教，在线等

Answer 1

Set Form2.DataGrid1.DataSource=Form1.DataGrid1.DataSource