当前位置: 代码迷 >> VB Dotnet >> vb2005怎么用button数据库查询数据
  详细解决方案

vb2005怎么用button数据库查询数据

热度:214   发布时间:2016-04-25 02:21:35.0
vb2005如何用button数据库查询数据
代码如下
Dim rs As New ADODB.Recordset
        Dim sql As String
        Dim conn As ADODB.Connection
        conn = New ADODB.Connection
        sql = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\VB小程序\幼儿园管理系统\信息.mdb"
        conn.Open(sql)
        Form5.TextBox22.Text = TextBox1.Text
        Me.Hide()
        Form5.Show()
        rs = New ADODB.Recordset
        sql = "select * from 幼儿信息 where 编号='" + Form5.TextBox22.Text + "'" '
        rs = conn.Execute(sql)
我的查询页面和显示数据页面是两个form,我想要的效果是在前面的查询页面输入编号或姓名,如果有数据的话就会打开下一个form并显示出该数据,求解怎么写代码?上面的说是最后一句标准表达式中数据类型不匹配。怎么解决?
急!!!求救!!!谢谢
------解决方案--------------------

在第二个窗体里加入DataGridView1,设置Modefiers为Public,在form1里查询后将结果显示在form2的DataGridView1中,

 Dim cnStr As String = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source=j:\STUDENT.MDB"
        Dim cn As OleDbConnection = New OleDbConnection(cnStr)
        Dim da As OleDbDataAdapter = New OleDbDataAdapter("select * from 考生 where 姓名='" + TextBox1.Text + "'", cn)
        Dim ds As New DataSet
        da.Fill(ds, "考生") ‘将查询的数据填充到ds中
        Dim f As Form2 = New Form2()
        f.DataGridView1.DataSource = ds.Tables(0).DefaultView
        f.Show()
  相关解决方案