作者maxding0430 (momo)
看板Visual_Basic
標題[.NET] timer執行問題
時間Wed Apr 6 16:43:55 2016
各位大大好
小弟目前碰到一個問題想來請教一下
目前有一個Listbox1以及Button1
Listbox1有N個項目
按Button1後會依序執行Listbox1裡的項目
每一個項目結束會傳ok.ini
接到ok.ini後刪除ok.ini在執行下一個項目
我想要加一個timer去dir(C:log/ok.ini)
每一秒去檢查有沒有收到
有收到就next i執行下一個項目
目前寫法如下
Private ok As Boolean
timer內:
Dim MyFile As String
MyFile = Dir("C:\log\ok.ini")
If MyFile = "ok.ini" Then
ok = True
End If
If MyFile = "" Then
ok = False
End If
butter內:
Select Case s
......
......
......
End Select
Timer1.Enabled = True
If ok = True Then
Timer1.Enabled = False
My.Computer.FileSystem.DeleteFile("C:\log\ok.ini")
End If
Next i
目前不會等到ok=True才做下一項
而是連續做下去
請問要怎麼改呢?
謝謝各位
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 223.140.31.106
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Visual_Basic/M.1459932237.A.A73.html
1F：→ MOONRAKER: 這樣你何必用timer 用sleep()不就好了04/06 18:07
因爲規定要timer.....
※ 編輯: maxding0430 (223.140.31.106), 04/06/2016 19:10:32
2F：推 garyl62327: 把timer.enabled =false 改到timer內 exit sub試試 04/06 22:53
3F：→ garyl62327: 看不太懂你的意思 04/06 22:53
4F：→ MOONRAKER: 那就把for拆掉，寫到timer裡面 04/07 14:58
5F：→ MOONRAKER: 不然用timer毫無意義 04/07 14:58
6F：推 evil2004: Button.Click啟動Timer, Do ListBox放Timer裡,做完Exit? 04/08 23:01
7F：→ evil2004: 認真講 我真的看不懂你在說啥 04/08 23:11
8F：推 garyl62327: 我自己都看不懂他的意思了ww整理一下 04/09 20:13
9F：→ garyl62327: 原po說想每一秒都檢查卻要開開關關timer讓我百思不得 04/09 20:13
10F：→ garyl62327: 其解 04/09 20:13
11F：推 garyl62327: 至於他說不會等到ok=true 如果是只button那邊的 有可 04/09 20:17
12F：→ garyl62327: 能是timer內程式碼還沒跑完 把判斷式丟到timer 做完 04/09 20:17
13F：→ garyl62327: 離開 等下一次呼叫timer啟動 這有可能是原p o想要的? 04/09 20:17