如何取出listview中的值和wb.LocationName进行比较!
Private Sub lv1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
For i = 1 To lv1.ListItems.Count
If intx.SubItems(i)<>wb.LocationName Then
'循环查找listview中的值，如果没找到和wb.LocationName相同的就把wb.LocationName的值存到listview中,我不知道怎么写,请高手帮忙!
Set intx = lv1.ListItems.Add(s, , wb.LocationName, 0, 0)
intx.SubItems(1) = address.Text
End If
Next
End Sub
问题点数：20、回复次数：4Top
1 楼yiboy（哇,好奇怪呢!真的变了耶!呵呵）回复于 2006-06-06 23:53:24 得分 0
怎么没人回答啊，我快急死了
自己顶下！Top
2 楼yechat（点尘不惊[QQ: 675475127]--可以讨论问题,禁止聊天打屁）回复于 2006-06-07 00:30:47 得分 0
没明白你的意思,WB又是什么？
是WB不存在于lv中的值都add lv吗？ WB是集合吗？Top
3 楼yiboy（哇,好奇怪呢!真的变了耶!呵呵）回复于 2006-06-07 17:10:56 得分 0
lv1是listview
wb是webbrowseTop
4 楼yiboy（哇,好奇怪呢!真的变了耶!呵呵）回复于 2006-06-10 11:15:52 得分 0
大家帮帮忙啊，我等了一个星期了！Top
