其他答案

2006-04-21 19:35:48

•   数据库用VB6编程语言,如何用好ADODC控件和DATAGRID控件相当重要。
  具体做法：
  新建工程时选数据工程，此时VB6集成调试环境左边工具箱内已加载了有关数据库编程必须的控件。
  然后在FORM1窗体中添加ADODC控件和DATAGRID控件，将DATAGRID1的属性DATASOURCE选ADODC1，打开ADODC1控件属性页使用连接字符串，选生成，在提供者选项中选MICROSOFT jet 4。
    0 OLE DB Provider,然后按要求连接数据库等。在ADODC1控件属性页使用连接字符串空白文本窗口中就有一长串字符串，注意该字符串可复制到程序代码用于编程。在窗体上添加若干文本框来绑定ADO控件,将其DATASOURCE选ADODC1,DATAFIELD选相应连接表的字段。
    另用一个或多个文本框输入查询内容,以便给SQL查询语句提供查询条件,典型调查的使用模糊查询,例句:
  Private Sub Text1_Change()
  Adodc1。ConnectionString = "Provider=Microsoft。
    Jet。OLEDB。4。0;Data Source=E:\db1。mdb;Persist Security Info=False"
  Adodc1。RecordSource = "select name from b1 where name >='" & Text1 & "' order by name"
  Adodc1。
    Refresh'对查询更新
  End Sub
  ADODC1控件属性页的数据源内有命令文本（SQL）编写窗口可编写SQL查询语言。该窗口的SQL语句可复制到程序代码用于编程。
  SQL查询语言主要结构为：
  Select 查询字段 from 表名 Where 查询条件语句 [排序语句或分组语句]
  查询字段必须分别用（西文）逗号分开或就用一个*号代替，上述查询中排序语句建议最好应用。
    
  SQL查询语言如有错程序运行时告诉你出错，作相应改动即可。本人一般先按上述连接，SQL用"SELECT * FROM TabelName"作调试，无问题，用一个按钮孔件将前述需复制的连接字符串和SQL查询语言先复制于按钮控件的CLICK事件中备着，以便放着以后使用。
    然后删去ADODC1孔件，再添加ADODC1控件再添其他内容。注意文本框的绑定保留,无须修改。
  。

  全部
  

  z***

  2006-04-21 19:35:48

  77 25 评论

  分享
  提交评论
2006-04-21 16:19:31

•   用VB的ADO控件先连接access数据库：1。添加ADO控件（工具条右键把ADO控件打勾）；2。在ADO控件的ConnectionString里选择要连接的access数据库，然后在RecordSoruce里选择1-adCmdText，在命令文本里输入查询语句:select * from XX。
    YY(这里*是指access里所有的属性，如果要某些属性，只需把*改为需要的属性，用逗号格开就可以，XX是Access的名字，YY是表名)；3。添加DataGrid控件（也是需要手动添加，方法和添加ADO控件一样）；4。在DataGrid控件的DataSource里选择连接数据库的控件（比如Adodc1）；5。
    如果要能修改、添加和删除新数据，则把DataGrid控件的AllowAddNew、AllowDelete和AllowUpdate属性设置为True即可。
  最后按F5运行程序就能看到结果了。
  换成查找也行，就麻烦了点，换用data控件可能会简单点，data控件需要用到3个属性：Connect、DatabaseName、RecordSource，其中Connect选择Access，DatabaseName是数据库的存放路径，RecordSource是Access中指定的表。
    比如是一个学生表，用学号查找：
  private sub 查找_click()
  dim findxh as string
  findxh=inputbox("请输入学号(xh)","按学号搜索")
  if findxh <> "" then
  findxh="xh='" & findxh & "'"
  data1。
    recordset。findfirst(findxh)
  if data1。recordset。
    nomatch then
  y=msgbox("没有相应的学生记录",vbOKOnly,"信息")
  end if
  end if
  end sub
  注意：用Data控件也需要把相应属性数据绑定到相应的文本框上（在DataField里选择）。

  全部
  

  天***

  2006-04-21 16:19:31

  73 24 评论

  分享
  提交评论
2006-04-21 15:54:44

• 用VB调用ADO啊，下面是我上传的例子。
  

  全部
  

  m***

  2006-04-21 15:54:44

  49 31 评论

  分享
  提交评论