![[填空题] 在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮，背景色变为红色；再单击，背景色变为绿色；再单击，背景色变为蓝色；再单击背景色变为红色 ……如此循环。单击“结束”](http://www.mshxw.com/aiimages/31/247794.png "[填空题] 在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮，背景色变为红色；再单击，背景色变为绿色；再单击，背景色变为蓝色；再单击背景色变为红色 ……如此循环。单击“结束”")
[填空题] 在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮，背景色变为红色；再单击，背景色变为绿色；再单击，背景色变为蓝色；再单击背景色变为红色 ……如此循环。单击“结束”按钮，程序运行结束。请填空。 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。
