影音先锋AⅤ天堂资源站,13小箩利洗澡无码视频APP,午夜理论片日本中文在线,最近新免费韩国日本电影

萬(wàn)能百科  > 計(jì)算機(jī)?  > 

[填空題] 在窗體上有一個(gè)“背景色變換”按鈕和一個(gè)“結(jié)束”按鈕。單擊“背景色變換”按鈕,背景色變?yōu)榧t色;再單擊,背景色變?yōu)榫G色;再單擊,背景色變?yōu)樗{(lán)色;再單擊背

2021-07-20   

[填空題] 在窗體上有一個(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í)羁铡! rivate Sub cmdChange_Click()   If Mark=0 Then    【 】     Mark=1    ElseIf【 】Then    Forml.BackColor=vbGreen    Mark=2    ElseIf Mark=2 Then    Form1.BackColor;vbBlue    【 】    End If  End Sub  Private Sub cmdExit_Click()   End  End Sub

正確答案:

Form1.BackColor = vbRed

參考解析:

首先過(guò)程中定義了一個(gè)模塊級(jí)整型變量Mark,每次都保留上次運(yùn)行后的 值。由程序可以看出:本題約定Mark等于0表示背景色為紅色;Mark等于1表示背景色為 綠色;Mark等于2表示背景色為藍(lán)色,每次單擊運(yùn)行后要將Mark變?yōu)橄麓芜\(yùn)行時(shí)的值,以 便符合題目要求。所以第一個(gè)空應(yīng)為Form1.BackColor= vbRed,第二個(gè)空為Mark=1;當(dāng)背景色變 為藍(lán)色后再單擊背景色要變?yōu)榧t色,所以應(yīng)將Mark變?yōu)?,所以第三個(gè)空為Mark=0。

詞條內(nèi)容僅供參考,如果您需要解決具體問(wèn)題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。

標(biāo)簽

<蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <文本链> <文本链> <文本链> <文本链> <文本链> <文本链>