新聞中心
vb.net,如下代碼,我想在MsgBox("A")和MsgBox("B")之間延時(shí)3秒(兩個(gè)msgbox要在同一個(gè)Sub)
Private Sub Button1_Click()
為會(huì)澤等地區(qū)用戶提供了全套網(wǎng)頁(yè)設(shè)計(jì)制作服務(wù),及會(huì)澤網(wǎng)站建設(shè)行業(yè)解決方案。主營(yíng)業(yè)務(wù)為網(wǎng)站設(shè)計(jì)、成都做網(wǎng)站、會(huì)澤網(wǎng)站設(shè)計(jì),以傳統(tǒng)方式定制建設(shè)網(wǎng)站,并提供域名空間備案等一條龍服務(wù),秉承以專業(yè)、用心的態(tài)度為用戶提供真誠(chéng)的服務(wù)。我們深信只要達(dá)到每一位用戶的要求,就會(huì)得到認(rèn)可,從而選擇與我們長(zhǎng)期合作。這樣,我們也可以走得更遠(yuǎn)!
MsgBox("A")
Threading.Thread.Sleep(3000)
MsgBox("B")
End Sub
如果暫停的3秒有影響,就給他開(kāi)一個(gè)線程:
Private Sub Button1_Click()
Dim th As New Threading.Thread(AddressOf MsgBoxProc)
th.Start()
End Sub
Private Sub MsgBoxProc()
MsgBox("A")
Threading.Thread.Sleep(3000)
MsgBox("B")
End Sub
vb中如何使啟動(dòng)對(duì)話框延遲3秒
你加入一個(gè)定時(shí)器Timer1
使Enable屬性為T(mén)RUE
然后調(diào)用Private Sub Timer1_Timer()
Timer.interval=3000
MsgBox "錯(cuò)誤!", vbInformation + vbOKOnly, "提示"
Timer.Enable=FALSE
end Sub
vb延時(shí)方法
延時(shí)最好的方法是鍛煉身體,飲食營(yíng)養(yǎng)健康加上好的心態(tài),增加情趣以及延長(zhǎng)時(shí)間都能夠起到幫助的。
炒肉類菜肴,要求炒得鮮嫩可口。炒菜的火候,投料的順序都有講究。以炒豬肉片為例說(shuō)明:豬肉洗凈切片,炒鍋上火燒熱,加入底油,油熱后,先將蔥花與肉片一同下鍋煸炒,見(jiàn)肉表面發(fā)白接近半熟時(shí),先烹入少許醋拌炒,待醋味迅速蒸發(fā),再加入姜汁攪拌入味。然后加醬油、少許水,水沸后,放入副料,最后勾交,淋少許明油出勺。炒蔬菜類菜肴,則可用熱鍋溫油,先下鮮姜末,炸出香味后,再下切好的蔬菜,迅速翻炒,待蔬菜響聲已過(guò),質(zhì)地變軟時(shí),再加醬油炒勻,再放入少許湯水、食鹽、白糖、味精,炒勻后,勾芡并淋香油即可出勺。
f
名稱欄目:vb.net延遲3秒,vbs延遲
標(biāo)題路徑:http://www.dlmjj.cn/article/dseocop.html