VB初学者的一点问题

Dim x As Long         定义全局变量，本窗体可见
Private Sub Form_Click()       窗体单击时发生
  x = x + 1           计数，累加单击次数
  If x > 3 Then       计数值超过3时
  x = 1               计数值 回 1
  End If
  If x = 1 Then       计数是否等于 1 时
  Form1.BackColor = vbRed     窗体背景色 设为红色
  ElseIf x = 2 Then   如果不等1时，是否等于 2
  Form1.BackColor = vbGreen   窗体背景色 设为 绿色
  Else: Form1.BackColor = vbBlue   以上二次二次判断是否都不成立，那么窗体背景设为 蓝色。注意 这里写了二条语句，用冒号分隔。
  End If             结束判断
  Cls                窗体清屏，擦除所有画的内容