※ 引述《maxding0430 (momo)》之銘言：
: 各位大大好
: 小弟目前碰到一個問題想來請教一下
: 目前有一個Listbox1以及Button1
: Listbox1有N個項目
: 按Button1後會依序執行Listbox1裡的項目
: 每一個項目結束會傳ok.ini
: 接到ok.ini後刪除ok.ini在執行下一個項目
: 我想要加一個timer去dir(C:log/ok.ini)
: 每一秒去檢查有沒有收到
: 有收到就next i執行下一個項目
: 目前寫法如下
無聊試寫的 沒編過 不知道能不能跑
File寫入跟刪除的部分懶得開Visual Studio看方法了 你自己研究看看
有多丟一個Timer進來, 這樣應該比較可以看得出有在判斷ok.ini存不存在
你可以再把Interval設得極端一點 用逐行跑 效果更佳
讀入時記得把兩個Timer的Enable都設為False ok設False
Private ok As Boolean
Private Sub Timer1_Tick() Handles Timer1.Tick
If Dir("C:\log\ok.ini") = "ok.ini" Then
'刪除ok.ini
ok = True
End If
End Sub
Private Sub Button1_Click() Handles Button1.Click
Timer1.Interval = 1000
Timer1.Enabled = True
Timer2.Interval = 1
Timer2.Enabled = True
ok = True
End Sub
Private Sub DoListBox() Handles Timer2.Tick
If ListBox1.Items.Count = 0 Then
Timer2.Enabled = False
Exit Sub
End If
If ok = True Then
ListBox1.Items.RemoveAt(0)
'建立ok.ini
ok = False
End If
End Sub