Question

编写一个VB事件程序：运行后（在运行后连续完成）第一次单击窗体使背景颜色为红色，二次黄色，三次为绿色

要完整的编写代码，用到static和case非常谢谢！！！

Answer 1

复制下边的代码就OK了：

Private Sub Form_Click()

Static Times As Integer

Times = Times + 1

Select Case Times

   Case 1

       Me.BackColor = vbRed

   Case 2

       Me.BackColor = vbYellow

   Case 3

       Me.BackColor = vbGreen

End Select

End Sub 

运行效果可以看图，完全OK！！

Answer 2

我来晚了