[填空題] 在Visual Basic 程序啟動(dòng)運(yùn)行中設(shè)置一個(gè)封面窗口，顯示一些有意義的信息，要求顯示時(shí)間5秒。 Sub dlys(ByVal n As S
2021-07-20
[填空題] 在Visual Basic 程序啟動(dòng)運(yùn)行中設(shè)置一個(gè)封面窗口，顯示一些有意義的信息，要求顯示時(shí)間5秒。 Sub dlys(ByVal n As Single) Dim tl As Single Dim t2 As Single t1 = Timer Dot2 = TimerIf t2 ＜ t1 Then t2 = t2 + 86400If t2 - tl ＞ n Then Exit Do 【12】 Loop End Sub Sub main( ) Form2. Show dlys 【13】 【14】 Form1. Show End Sub
正確答案：[12]DoEvents [13]5 [14]Unload Form2
參考解析：在空【12】處，為了在閑置循環(huán)狀態(tài)下可響應(yīng)其他事件，使用語(yǔ)句DoEvents；接下來(lái)，在空【13】處，使用延時(shí)子程序dlys，因?yàn)槭茄訒r(shí)5秒鐘，因此此處n的值為5；在空【14】處，應(yīng)該將封面窗體form2卸載掉，因?yàn)樗皇窃趩?dòng)的時(shí)候給用戶(hù)展示一個(gè)畫(huà)面信息，在以后程序運(yùn)行中將不再用到它，將它從內(nèi)存中徹底清除，使用語(yǔ)句Unload Form2。
詞條內(nèi)容僅供參考，如果您需要解決具體問(wèn)題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢(xún)相關(guān)領(lǐng)域?qū)I(yè)人士。