请问,在ListView中点选一项,想要对应的在数据库中的内容在TextBox中显示,如何实现?--在线急等

[feilong215]

Select MAKERNAME, UNITCODE, OTEL, FAX, DOMAIN, EMAIL, ADDRESS, CONNECTER, APARTMENT, CTEL, CEXT, MOBILE, COMMENTS From MAKER Where MAKERNO = ? Order By MAKERNO 假如用上述的来显示.望解答!

[lxcc]

item_click事件

[飘零风]

?= TView1.SelectedItem.Text

[射天狼]

Option Explicit

Dim rs As New ADODB.Recordset

Private Sub ListView1_ItemClick(ByVal Item As MSComctlLib.ListItem)
rs.Open "Select MAKERNAME, UNITCODE, OTEL, FAX, DOMAIN, EMAIL, ADDRESS, CONNECTER, APARTMENT, CTEL, CEXT, MOBILE, COMMENTS From MAKER Where MAKERNO = " & Item.Text & " Order By MAKERNO ", cn, adOpenForwardOnly, adLockReadOnly

If Not rs.EOF Then
text1.Text = rs!NAKERRNAME
End If
End Sub

[谢紫枫]

首先要连接上数据库
能够读取数据
然后用listview_click事件触发

[feilong215]

我是个刚学的菜鸟,这个触发事件不会搞,希望各位讲清楚点好啊.

[feilong215]

要显示的内容在一列的TextBox中怎样分开显示啊.

[xayzmb]

text1.text = rs.fields("字段名")

[ufozq77]

这是选择地行
Text1 = ListView1.SelectedItem.Text 第1列
Text1 = ListView1.SelectedItem.ListSubItems(1) 第2列

[射天狼]

晕,这些都不知道,先看书~~

[feilong215]

哈哈,不好意思,都搞定了,给分,不好意思,少了点,我现在没分了.