三分鐘解決VB.NET定時器事件重入
喜歡VB.NET朋友一定會很喜歡研究定時器方面的問題吧。本人就很喜歡，在網(wǎng)上我收集了很多東西，在這個就VB.NET定時器事件重入的問題來和大家一起探討一下。不論在客戶端應(yīng)用程序還是服務(wù)器組件(包括窗口服務(wù))定時器通常扮演一個重要的角色。寫一個高效的定時器驅(qū)動型可管理代碼要求對程序流程有一個清晰的理解及掌握.NET線程模型的精妙之處。.NET框架類庫提供了三種不同的定時器類：System.Windows.Forms.Timer, System.Timers.Timer, 和System.Threading.Timer。每個類為不同的場合進(jìn)行設(shè)計和優(yōu)化。本文章將研究這三個類并讓你理解如何及何時應(yīng)該使用哪一個類。
VB.NET定時器事件處理重入
當(dāng)和異步定時器事件打交道時，如由System.Timers.Timer和System.Threading.Timer產(chǎn)生的定時器事件，有另外一個細(xì)微之處你需要考慮。問題就是必須處理代碼重入。如果你的定時器事件處理函數(shù)代碼執(zhí)行時間比你的定時器引發(fā)定時器事件的時間間隔要長，你預(yù)先又沒有采取必要的措施保護(hù)防止多線程訪問你的對象和變量，你就會陷入調(diào)試的困境。看一下下面的代碼片斷：
- private int tickCounter = 0;
- private void tmrTimersTimer_Elapsed(object sender, System.Timers.ElapsedEventArgse)
- {
- System.Threading.Interlocked.Increment(ref tickCounter);
- Thread.Sleep(5000);
- MessageBox.Show(tickCounter.ToString());
- }
假設(shè)你的定時器間隔屬性設(shè)置為1000毫秒，你也許會奇怪當(dāng)***個信息框彈出時顯示的值是5。這是因為在這5秒期間***個定時器事件正在睡眠，而定時器卻在不同的工作者線程上繼續(xù)產(chǎn)生時間消失事件。因此，在***個VB.NET定時器事件處理完成之前tickCounter變量被增加了5次。注意我使用了Interlocked.Increment方法以線程安全的方式增加tickCounter變量的值。也有其它方法可以這樣做，但是Interlock.Increment是為這種操作而特別設(shè)計的。
解決這種問題的簡單方法就是在你的事件處理函數(shù)代碼塊中暫時禁止定時器，接著再允許定時器，就像下面的代碼：
- private void tmrTimersTimer_Elapsed(object sender, System.Timers.ElapsedEventArgse)
- {
- tmrTimers.Enabled = false;
- System.Threading.Interlocked.Increment(ref tickCounter);
- Thread.Sleep(5000);
- MessageBox.Show(tickCounter.ToString());
- tmrTimersTimer.Enabled = true;
- }
有了這段代碼，消息框就會每5秒鐘顯示一次，就像你所期望的那樣，tickCounter的值每次只增加1。另外一些可選的原始同步對象就是Monitor或mutex去確保所有將來的事件被排隊直到當(dāng)前的事件處理函數(shù)執(zhí)行完成。
結(jié)論
當(dāng)使用定時器類時有一點你要考慮的就是是否可以使用Windows調(diào)度器去定期的運(yùn)行標(biāo)準(zhǔn)的可執(zhí)行程序來更簡單的解決問題。
【編輯推薦】
