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