参考代码
Dim cmd As New SQLCommandDim dt As DataTablecmd.CommandText = "SELECT * Fr om {表B}"dt = cmd.ExecuteReader()
forms("窗口1").Controls("Table1").table.DataSource = dt