If paintnow = True Then 为什么不能作为条件语句？请问我这个程序为什么不能执行画园

Private Sub Form_DblClick()
Cls
End SubPrivate Sub Form_Load()
 
DrawWidth = 2
ForeColor = RGB(0, 225, 0)
End SubPrivate Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
Print "an xia you jian"
paintnow = TrueEnd IfEnd SubPrivate Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If paintnow = True ThenIf Button = 2 Then
   r = Rnd * 1000
   Circle (X, Y), r
   Else
  PSet (X, Y)
 End If
   End If
   Print paintnow
End SubPrivate Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
paintnow = False
End Sub