我这样写的Dim Yuan As boolean
........
Yuan=True
.....
If Button=1 And Yuan=True Then
Circle(X,Y),R
End If
怎么画不出来呢?
參考答案:你想实现什么,单击窗体画圆还是别的,说清楚
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
Me.Circle (1000, 1000), 1000
End If
End Sub