Question

vb6.0连接sql sever中用条件实现查找功能该怎么写

比如我要查询小明的学生资料，如果我输入的是小明，就执行SELECT 作者昵称,性别,年龄,职业,爱好 FROM 作者信息 WHERE 作者昵称 LIKE '" & 作者信息输入.Text & "'如果我输入的是20岁 那么前面一个查询失效，执行SELECT 作者昵称,性别,年龄,职业,爱好 FROM 作者信息 WHERE 年龄 LIKE '" & 作者信息输入.Text & "'这样一个功能要怎么实现。另外就是我要如何将查询出来的全部数据，如名称，性别，职业等全部输出在一个地方，我用text似乎只能输出其中一个，输出两个就会显示出错。作者信息输出.Text = rs.Fields("作者昵称")麻烦大大们帮帮忙，VB还是初中的时候学的，没想到老师这次突然就要我们用来做数据库的课程设计，通宵搞了一天了，我就想快点做完回家。

Answer 1

假设多个文本框输入不同的查询条件，如果只支持单个条件查询，需要单选框Option：
str1 = "select * from ... where 1=1"
if option1.value then '字段1
str1 = str1 & "字段1=" & Text1.Text
endif
if option2.value then
str1= str1 & "字段2=" & Text2.texxt
endif
如果支持多条件查询：
str1 = "select * from ... where 字段1=" & text1.text & " and 字段2=" & text2.text "...
rs.open str1
显示数据最方便的当然是网格控件了，比如VB自带的DataGrid,MSFlexGrid。当然也可以用多个文本框来显示，每个文本框对应一个字段。
对于简单数据，也可以用多行文本框或者列表框等等，只要输出时把字段的值组合以下就可以了：
do until rs.eof
Text1.text =Text1.text & rs(0) & " " rs(1) ... & vbcrlf
loop

Answer 2

你驱动无问题就OK但推荐用Visual Stadio 2008