今天就跟大家聊聊有關如何使用doevents，可能很多人都不太了解，為了讓大家更加了解，小編給大家總結了以下內容，希望大家根據(jù)這篇文章可以有所收獲。

創(chuàng)新互聯(lián)公司堅持網頁設計，我們不會倒閉、轉行，已經持續(xù)穩(wěn)定運營十多年。專業(yè)網站建設公司技術，豐富的成功經驗和創(chuàng)作思維，提供一站式互聯(lián)網解決方案，攜手廣大客戶，共同發(fā)展進步。我們不僅會設計網站，更會營銷型網站建設。幫助中小型企業(yè)在“互聯(lián)網+"的時代里通過推廣營銷傳播路線轉型升級，累計幫助多家客戶實現(xiàn)網絡營銷化，與我們一起攜手共創(chuàng)未來！

如何使用doevents

Doevents

把權限轉讓給操作系統(tǒng)，處理事件使用。好處就是，系統(tǒng)界面不會卡頓。

使用場景：我們一般處理大量數(shù)據(jù)，導致系統(tǒng)卡在當前界面上面，考慮到用戶體驗，我們要使用doevents

doevents注意點

1、使用doevents的時候，如果事件還沒有結束，就馬上關掉，程序還在執(zhí)行中，并沒有真正關鍵應用程序。

2、在拖動系統(tǒng)界面的時候，doevents對程序需要刷新的值就不會被刷新

防止doevents造成無法關閉進程的解決方案

使用在form_unload事件中，即窗體結束之前執(zhí)行

1、在循環(huán)中加入一個結束循環(huán)的標記 

2、使用end結束

課堂總結

1、學會使用doevents，了解應用場景，可以使用在讀取大文件時候

2、掌握doevents造成進程存留的解決方案

3、在執(zhí)行系統(tǒng)其它事件的時候，會使得對應的界面不會被刷新界面：

源代碼：

Dim flag As BooleanPrivate Sub Command1_Click()flag = TrueDim i As DoubleWhile flagText1.Text = Val(Text1.Text) + 1DoEventsWendEnd Sub
Private Sub Form_Unload(Cancel As Integer)flag = FalseEndEnd Sub

看完上述內容，你們對如何使用doevents有進一步的了解嗎？如果還想了解更多知識或者相關內容，請關注創(chuàng)新互聯(lián)行業(yè)資訊頻道，感謝大家的支持。

分享題目：如何使用doevents
分享URL：http://chinadenli.net/article46/gchchg.html

成都網站建設公司_創(chuàng)新互聯(lián)，為您提供網站營銷、品牌網站建設、營銷型網站建設、網站內鏈、App設計、品牌網站設計

廣告

聲明：本網站發(fā)布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創(chuàng)新互聯(lián)