VB6.0+Access2000 查询的问题~~~

Question

小弟我做了个档案管理软件 但是在查询方面不懂~还请各位大虾指教~!!!!
    这是一个复合查询的问题(编号,年龄,姓名,性别),查询到结果后返回到VB的DATAGRID里~~~显示给用户......最好能给个完整的代码~~~谢谢~~~~

Answer 1

网上很多例子，自己找找吧
www.mndsoft.com

Answer 2

如果不涉及修改的话,可以用MSflexGRID控件, datasource直接可以 recordset绑定.

Answer 3

strSQL = "select 编号,年龄,姓名,性别 from 表名  where 编号 like + '" & Text1.Text & "'and 年龄 like + '" & Text2.Text & "' and 姓名 like + '" & Text3.Text & "' and 性别 like + '" & Text4.Text & "'"
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\数据库名.mdb;Persist Security Info=False"
Adodc1.CursorLocation = adUseClient
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = strSQL
Adodc1.Refresh

Answer 4

strSQL = "select 编号,年龄,姓名,性别 from 表名  where 编号 like + '" & Text1.Text & "'and 年龄 like + '" & Text2.Text & "' and 姓名 like + '" & Text3.Text & "' and 性别 like + '" & Text4.Text & "'"
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\数据库名.mdb;Persist Security Info=False"
Adodc1.CursorLocation = adUseClient
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = strSQL
Adodc1.Refresh
Set DataGrid2.DataSource = Adodc1

Answer 5

strSQL = "select 编号,年龄,姓名,性别 from 表名  where 编号 like + '" & Text1.Text & "'and 年龄 like + '" & Text2.Text & "' and 姓名 like + '" & Text3.Text & "' and 性别 like + '" & Text4.Text & "'"
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\数据库名.mdb;Persist Security Info=False"
Adodc1.CursorLocation = adUseClient
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = strSQL
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
Adodc1.MoveFirst
  dataGrid1.Rows = Adodc1.RecordCount + 1
  dataGrid1.Cols = Adodc1.Fields.Count - 1
  dataGrid1.Row = 1
  dataGrid1.Col = 0
  dataGrid1.RowSel = dataGrid1.Rows - 1
  dataGrid1.ColSel = dataGrid1.Cols - 1
  dataGrid1.Clip = Adodc1.GetString(adClipString, -1, Chr(9), Chr(13), vbNullString)
  dataGrid1.Row = 1
  dataGrid1.Visible = True
在窗口中必须放一个Adodc，要是没有就添加一个

Answer 6

具体做法：
新建工程时选数据工程，此时VB6集成调试环境左边工具箱内已加载了有关数据库编程必须的控件。
然后在FORM1窗体中添加ADODC控件和DATAGRID控件，将DATAGRID1的属性DATASOURCE选ADODC1，打开ADODC1控件属性页使用连接字符串，选生成，在提供者选项中选MICROSOFT jet 4.0 OLE DB Provider,然后按要求连接数据库等。在ADODC1控件属性页使用连接字符串空白文本窗口中就有一长串字符串，注意该字符串可复制到程序代码用于编程。ADODC1控件属性页的数据源内有命令文本（SQL）编写窗口可编写SQL查询语言。该窗口的SQL语句可复制到程序代码用于编程。
SQL查询语言主要结构为：
Select 查询字段 from 表名 Where 查询条件语句 [排序语句或分组语句]
查询字段必须分别用（西文）逗号分开或就用一个*号代替，上述查询中排序语句建议最好应用。
SQL查询语言如有错程序运行时告诉你出错，作相应改动即可。本人一般先按上述连接，SQL用"SELECT * FROM TabelName"作调试，无问题，用一个按钮控件将前述需复制的连接字符串和SQL查询语言先复制于按钮控件的CLICK事件中备着，以便放着以后使用。然后删去ADODC1孔件，再添加ADODC1控件再添其他内容。