如何用api查找符合条件的listview中的subitem项出来呢? 你找到了item,不就可以通过item来找他的subitem了吗? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Private Sub txtInput_Change(Index As Integer)On Error Resume Next Dim Search As String, listIndex As Long Search = txtInput(Index).Text If Len(Search) > 0 Then listIndex = SendMessage(list1(Index).hwnd, LB_FINDSTRING, -1, ByVal Search) list1(Index).listIndex = listIndex Else list1(Index).listIndex = 0 End IfEnd Sub lb_findstring是用来查找listbox的,要查找listview要用lvm_finditem,而且还要搞个lv_findinfo出来,但我用lv_findinfo只能找到item的text,至于subitem就不能了,虽然listview本身就有查找 subitem的方法,不过我还是想知道用sendmessage如何实现 我看错了行,分给错了怎么办! 求教 控制针样式打打印三联票据 在模态窗口中(Form.Show vbModal),如何响应仿真键盘?(用于无键盘输入) 实在解决不了了 用VB6打包成功,但在别的机器上有时安装不成功,不知为什么? 关于SQL SERVER7 数据导出的问题 如何向DataEnviroment下的Command传递参数 text如何透明 vb问题?!急 请教大家一个问题:如何做逻辑锁? 如何用PostMessage发送组合键呢? 请指教:用sql语句怎样实现?谢谢!
On Error Resume Next
Dim Search As String, listIndex As Long
Search = txtInput(Index).Text
If Len(Search) > 0 Then
listIndex = SendMessage(list1(Index).hwnd, LB_FINDSTRING, -1, ByVal Search)
list1(Index).listIndex = listIndex
Else
list1(Index).listIndex = 0
End IfEnd Sub
虽然listview本身就有查找 subitem的方法,不过我还是想知道用sendmessage如何实现