可以利用Timer時鐘控件實現(xiàn),這樣做的好處是無需等待,釋放CPU時間去做別的事
創(chuàng)新互聯(lián)建站-專業(yè)網(wǎng)站定制、快速模板網(wǎng)站建設(shè)、高性價比文成網(wǎng)站開發(fā)、企業(yè)建站全套包干低至880元,成熟完善的模板庫,直接使用。一站式文成網(wǎng)站制作公司更省心,省錢,快速模板網(wǎng)站建設(shè)找我們,業(yè)務(wù)覆蓋文成地區(qū)。費用合理售后完善,10余年實體公司更值得信賴。
在你給textbox設(shè)置text值后直接使用sleep(),因為在使用sleep()的時候,當(dāng)前的主進程是被掛起了,也就是說設(shè)置的text屬性后,還來不及在屏幕上顯示lbi的內(nèi)容就執(zhí)行了sleep,所以在執(zhí)行sleep()掛起主進程前,你必須讓textbox的內(nèi)容先顯示出來再執(zhí)行sleep,可嘗試使用下DoEvents()將控制權(quán)暫時移交一下,讓系統(tǒng)有時機來刷新textbox里面的內(nèi)容,讓系統(tǒng)有機會來刷新textbox里面的內(nèi)容。由于我沒有安裝visual studio的開發(fā)環(huán)境,無法調(diào)試代碼的正確性,但我記得我以前也遇到此類問題,采取的DoEvents()的方式。你可嘗試下。
lbl.Visible = True
Sleep(5000)
lbl.Text = "我是中國人"
lbi.Refresh '刷新一下lbi,具體你可以調(diào)試下,看需要不需要這條
Application.DoEvents() ‘設(shè)置完lbi的text屬性,將操作權(quán)限釋放一下,讓系統(tǒng)有機會顯示lbi的內(nèi)容。
Sleep(3000) ’待顯示后,再執(zhí)行掛起
lbl.Text = "我愛自己的祖國"
lbi.Refresh ‘同上
Application.DoEvents() ’同上
DoEvents()的功能解釋是:轉(zhuǎn)讓控制權(quán),以便讓操作系統(tǒng)處理其它的事件。
如執(zhí)行一次不行,可嘗試重復(fù)多執(zhí)行幾次,特別在循環(huán)語句中,對于窗口的刷新顯示DoEvents特別有用,但是在循環(huán)體內(nèi)使用了DoEvents后,當(dāng)前進程的執(zhí)行效率會有大幅降低,因為移交控制權(quán)必然損失當(dāng)前進程的運行效率。
同學(xué)。。你這里的寫法其實根本沒有用到多線程
原因很簡單
你是定義了一個T的新線程,但是很可惜你在BeginDoSub這個獨立的線程中又定義了一個deSomeSub的委托,并且直接用Me.Invoke把實際的執(zhí)行任務(wù)提交給界面主線程運行了
所以你的圖片的處理函數(shù)實際上是在主線程中運行的,新線程等于沒用
正確的作法是,T定義為SomeSub這個函數(shù)為入口的線程,并啟動它
在界面進度條更改的時候再使用Invoke來調(diào)用委托來進行界面更改。
自己再好好看看吧,時間問題我要走了。
當(dāng)前題目:vb.net線程停頓 vb6 線程
路徑分享:http://www.rwnh.cn/article40/dosheeo.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供定制網(wǎng)站、軟件開發(fā)、商城網(wǎng)站、外貿(mào)網(wǎng)站建設(shè)、全網(wǎng)營銷推廣、響應(yīng)式網(wǎng)站
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)