以表格的形式吧，然后要求鼠标点击某个记录，高亮表示并触发事件
（listview没用过）@@

还有返回鼠标选择记录的值啊

我发了一个 VB+ACCESS做的图书管理系统  里面有用到这个东西你去看看

先在listview 里面 ,单击右键,属性,新增几个相关的列
Dim objCn As New Connection
Dim objRs As New Recordset
dim item as listitem
打开连接,打开记录集,
do while not objrs.eof
set item =listview1.listitems.add()
item.text=objrs.fields(0)
for i=1 to objrs.fislds.count-1
item.subitems(i)=objrs.fields(i)
next
objrs.movenext
loop