sos:VB调用ACCESS的问题，急！！！

Question

1、用VB编程和数据库操作最好不要用绑定数据的形式。。不方便，而且微软的DATA控件和ADO控件用于绑定数据库有很多BUG，我深有体会。
2、对数据的有效性检查最好在VB代码中控制，很容易编的。
如有什么问题，去www.chaxiu.com的VB园地找我

Answer 1

谢谢xiaomao.在VB中如何实现查阅列表？

Answer 2

比如说我想在一个输入病人信息的窗体中用组合框选择输入病房信息，而组合框显示的内容来自病房表的病房名称字段，实际存入病人信息表的值则为病房表中相应的病房ID字段.也就是和ACCESS中的查阅列表一样的功能。怎么做？

Answer 3

定义数组啊
例如：
dim arrTest() as string
private sub form_load()
dim i as integer
dim cn as new ado.connection
dim rs as new ado.recordset
dim strSQL as string         '好累啊。。歇歇。。
cn.open "DNS名"
'rs参数，如：
rs.cursortype
rs.location
rs.locktype
strsql="select * from tablename"
rs.open strsql,cn
if rs.eof then 
   rs.close
   exit sub
else                        '手腕子疼，再歇
   rs.movefirst
   i=0
   redim arrTest(rs.recordcount) 
   do while not rs.eof
      combox1.additem rs!name
      arrtest(i)=rs!id
      rs.movenext
   loop
   rs.close
   set cn=nothing
 
end sub
下边的操作你该明白了吧
啊手疼的要命。。有几个月没编程了呵呵