如何将检索结果显示到另一个页面上
我打算在画面A写一个按钮，并输入想要检索的信息后，通过查找数据库，将查询结果通过表格形式显示到画面B，如何实现呢？Private Sub InSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles InSearch.Click
Dim Cnn As New ADODB.Connection '定义数据链接对象，保存连接数据库信息；请先添加ADO引用
Dim Rs As New ADODB.Recordset '定义记录集对象，保存数据表
Dim strCnn = "Provider=SQLNCLI;Server=JSJZX;Database=XXXX;Trusted_Connection=yes;"
Cnn.Open(strCnn)
Rs.Open("select * from stock where brand = 'brand_1'", Cnn)
......然后呢？
End Sub --------------------编程问答-------------------- 最简单是放一个ado data control，一个adodatagrid。
让adodc作为数据源，设置连接字符串和表
然后grid来绑定。 --------------------编程问答--------------------
能据个例子吗？或者6提供一些参考的代码 --------------------编程问答-------------------- 'Form1代码
Private Sub InSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles InSearch.Click
Form2.SearchData "select * from stock where brand = 'brand_1'"
End Sub
'Form2所需代码
Public Sub SearchData(strSQL$)
Dim Cnn As New ADODB.Connection '定义数据链接对象，保存连接数据库信息；请先添加ADO引用
Dim Rs As New ADODB.Recordset '定义记录集对象，保存数据表
Dim strCnn = "Provider=SQLNCLI;Server=JSJZX;Database=XXXX;Trusted_Connection=yes;"
Cnn.Open strCnn
Rs.Open strSQL, Cnn
Form2.Show
Form2.SetFocus
End Sub --------------------编程问答--------------------
“qzsyck.Form2”不能通过其默认实例指代自身；请改用“Me”。
“SetFocus”不是“qzsyck.Form2”的成员。
--------------------编程问答-------------------- 你说的画面B是什么意思,是指第二个窗体吗?还是同一个窗体? --------------------编程问答-------------------- --------------------编程问答-------------------- --------------------编程问答--------------------
第二个窗体 --------------------编程问答-------------------- --------------------编程问答-------------------- --------------------编程问答--------------------
VB还是VB.NET？
补充：VB , API
