[填空题] 在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮,背景色变为红色;再单击,背景色变为绿色;再单击,背景色变为蓝色;再单击背景色变为红色 ……如此循环。单击“结束”

16 查阅

[填空题] 在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮,背景色变为红色;再单击,背景色变为绿色;再单击,背景色变为蓝色;再单击背景色变为红色 ……如此循环。单击“结束”按钮,程序运行结束。请填空。  Private 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

首先过程中定义了一个模块级整型变量Mark,每次都保留上次运行后的 值。由程序可以看出:本题约定Mark等于0表示背景色为红色;Mark等于1表示背景色为 绿色;Mark等于2表示背景色为蓝色,每次单击运行后要将Mark变为下次运行时的值,以 便符合题目要求。所以第一个空应为Form1.BackColor= vbRed,第二个空为Mark=1;当背景色变 为蓝色后再单击背景色要变为红色,所以应将Mark变为0,所以第三个空为Mark=0。

计算机考试