查人人中国名人网14厘钢筋一米多重:会VB的进啊！
来源：百度文库 编辑：查人人中国名人网 时间：2024/05/14 06:04:25
我想在access里面作一个查询！比如说找一个人！
但是如果这个人不存在就要弹出一个对话框，上面写着无此人！但是ACCESS的功能作不到这个判断！我想用ACCESS里面的VB辅助功能作这个查询！但是我是个VB小白！不知道怎么作！哪位好心人能告诉我啊？谢谢了！代码部分要注释中文啊!不然看不懂啊！！！！！
但是如果这个人不存在就要弹出一个对话框，上面写着无此人！但是ACCESS的功能作不到这个判断！我想用ACCESS里面的VB辅助功能作这个查询！但是我是个VB小白！不知道怎么作！哪位好心人能告诉我啊？谢谢了！代码部分要注释中文啊!不然看不懂啊！！！！！
先在VB中加载 microsoft ado data control 6.0(oledb)控件，然后在控件中设置相关连接属性(右键，属性)
在程序中用如下语句
set rs=conn.execute("select * from 人名表 where 人名='"+要查询的人名+"'")
if rs.eof then
msgbox("无此人")
else
有此人的代码
end if
ACCESS里面的VB辅助功能,我没用过.我是在VB里写代码连接ACCESS进行查询.
在数据库连接成功后,的查询语句:
set rs=conn.execute("select * from [表名] where 人名='???'") '???为所要查询人的姓名
if rs.eof then
msgbox "没有这个姓名"
end if