高校问答忻州市委副书记:VB-难题！请高手进入！！
来源：百度文库 编辑：高校问答 时间：2024/04/30 21:38:05
问题:
现在有2个TIMER,一个是TIMER1,另外一个是TIMER2
还有一个listview1。
Timer1不停地进行230分秒/次 的向ListVIew1添加TEXT
TEXT1
TEXT2
TEXT3
TEXT4
TEXT5
.
.
.
.
TEXTn
-------------------------
TIMER2 每230分秒/次 要检查TIMER1是否把LISTVIEW1添加出"TEXT91"，
检测到添加"TEXT91" 就立刻退出。
TIMER1的问题我已经解决了，可是TIMER2的不会，请各位高手知道一下！
TIMER2的代码的代码完全没有反应。。。。。。。晕
TIMER2的代码如下：
Dim i As Long
With LISTVIEW1.ListItems
For i = .Count To 1 Step -1
If LISTVIEW1.ListItems(1).Text = "TEXT91" Then
END
End If
Next
End With
现在有2个TIMER,一个是TIMER1,另外一个是TIMER2
还有一个listview1。
Timer1不停地进行230分秒/次 的向ListVIew1添加TEXT
TEXT1
TEXT2
TEXT3
TEXT4
TEXT5
.
.
.
.
TEXTn
-------------------------
TIMER2 每230分秒/次 要检查TIMER1是否把LISTVIEW1添加出"TEXT91"，
检测到添加"TEXT91" 就立刻退出。
TIMER1的问题我已经解决了，可是TIMER2的不会，请各位高手知道一下！
TIMER2的代码的代码完全没有反应。。。。。。。晕
TIMER2的代码如下：
Dim i As Long
With LISTVIEW1.ListItems
For i = .Count To 1 Step -1
If LISTVIEW1.ListItems(1).Text = "TEXT91" Then
END
End If
Next
End With
If LISTVIEW1.ListItems(i).Text = "TEXT91" Then
是i不是1啊！你写错了！
LISTVIEW1.ListItems(1).Text
改成LISTVIEW1.ListItems(i).Text