问题
填空题
在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮，背景色变为红色；再单击，背景色变为绿色；再单击，背景色变为蓝色；再单击背景色变为红色……如此循环。单击“结束”按钮，程序运行结束。请填空。
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
解析：【命题目的】考核条件控制语句的使用方法。
【解题要点】首先过程中定义了一个模块级整型变量Mark，每次都保留上次运行后的值。由程序可以看出：本题约定Mark等于0表示背景色为红色；Mark等于1表示背景色为绿色；Mark等于2表示背景色为蓝色，每次单击运行后要将Mark变为下次运行时的值，以便符合题目要求。所以【13】应为Form1．BackColor= vbRed，【14】为Mark=1；当背景色变为蓝色后再单击背景色要变为红色，所以应将Mark变为0，所以【15】为Mark=0。
【考点链接】多分支控制语句。