本人编了个小程序，在listbox中列出了access数据库中的数据，但不知道怎么才能让listbox中选择的数据点击确定后显示在textbox中。

[[italic] 本帖最后由 nightwind 于 2007-12-5 17:00 编辑 [/italic]]

textbox1.text=listbox1.text
?..

rs.open "select xx from tb where xx='" & listbox1.text & "'"
textbox1.text=rs.fields("xx").value
rs.close

哈哈，多谢版主，其实就用"textbox1.text=listbox1.text"就可以了，急得我连这个都忘记了