有2个窗体:form1,form2,窗体2上有adodc1控件1个,datagrid控件一个,三个text控件,二个按钮
窗体1上有9个text控件用来显示查询类容
我想在窗体2上点击查询按钮的时候,把三个text控件中的类容做条件进行查询,并把查询内容在datagrid上显示
然后点击确定按钮则将被选中的记录在窗体1上的几个TEXT控件中显示,同时关闭窗体2
请问该如何编程
谢谢

解决方案 »

  1.   

    Adodc控件可以在属性叶面对数据库进行连接,但是这样的连接数据库很死,而且弄不好,连接字符就没有了,所以在程序中用代码进行连接的话,方便得多。
    在增加与删除其实Adodc控件与Recordset的区别只是把 Recordset更换成Adodc1.Recordset
    RecordSet的增加:Rs.AddNew,Adodc的增加:Adodc1.Recordset.AddNew
    示范:
    '--如何用Adodc控件代码去连接Access
    Private Sub Command1_Click()
     Dim strConn As String
     
     strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb;Persist Security Info=False"
     
     ' adodc的连接字符串
     Adodc1.ConnectionString = strConn
     
     ' 指定Command对象的形态
     Adodc1.CommandType = adCmdText
     
     ' 设置传回一个资料录集。
     Adodc1.RecordSource = "Select * from People"
     
     ' 将记录集合绑定DataGrid1
     Set DataGrid2.DataSource = Adodc1
    End Sub
    查询的时候sql语句示范
    strsql="select * from tableA where aa='"& text1.text &"'
      

  2.   

    查询按1楼做,查到之后将结果设到datagrid的datasource即可
      

  3.   

    点击datagrid后,在click事件里写text1=datagrid的某单元即可
      

  4.   

    结合SQL,查询用select语句就行了啊....