[填空題] 在窗體上有一個(gè)“背景色變換”按鈕和一個(gè)“結(jié)束”按鈕。單擊“背景色變換”按鈕,背景色變?yōu)榧t色;再單擊,背景色變?yōu)榫G色;再單擊,背景色變?yōu)樗{(lán)色;再單擊背
[填空題] 在窗體上有一個(gè)“背景色變換”按鈕和一個(gè)“結(jié)束”按鈕。單擊“背景色變換”按鈕,背景色變?yōu)榧t色;再單擊,背景色變?yōu)榫G色;再單擊,背景色變?yōu)樗{(lán)色;再單擊背景色變?yōu)榧t色……如此循環(huán)。單擊“結(jié)束”按鈕,程序運(yùn)行結(jié)束。請(qǐng)?zhí)羁铡?/p>
Private Sub cmdChange_Click()
If Mark=0 Then
【13】
Mark=1
ElseIf 【14】 Then
Forml.BackColor=vbGreen
Mark=2
ElseIf Mark=2 Then
Form1.BackColor;vbBlue
【15】
End If
End Sub
Private Sub cmdExit_Click()
End
End Sub
正確答案:【13】Form1.BackColor = vbRed【14】Mark=1【15】Mark=0
參考解析:【命題目的】考核條件控制語(yǔ)句的使用方法?!窘忸}要點(diǎn)】首先過(guò)程中定義了一個(gè)模塊級(jí)整型變量Mark,每次都保留上次運(yùn)行后的值。由程序可以看出:本題約定Mark等于0表示背景色為紅色;Mark等于1表示背景色為綠色;Mark等于2表示背景色為藍(lán)色,每次單擊運(yùn)行后要將Mark變?yōu)橄麓芜\(yùn)行時(shí)的值,以便符合題目要求。所以【13】應(yīng)為Form1.BackColor= vbRed,【14】為Mark=1;當(dāng)背景色變?yōu)樗{(lán)色后再單擊背景色要變?yōu)榧t色,所以應(yīng)將Mark變?yōu)?,所以【15】為Mark=0?!究键c(diǎn)鏈接】多分支控制語(yǔ)句。
詞條內(nèi)容僅供參考,如果您需要解決具體問(wèn)題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。