您的位置:首页 > 其它

生成画圆程序的实现步骤

2012-04-25 17:05 253 查看
Private Sub Command1_Click()

Form1.Circle (1200,1500),800,vbBlue

Text1.Text=”画一个实心圆”

End Sub

Private Sub Command2_Click()

Form1.Cls

Text1.Text=”清除实心圆”

End Sub

Private Sub Command3_Click()

End

End Sub
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签:  command