VB中窗体cls的使用方法

2025-02-03 03:51:04
推荐回答(1个)
回答1:

Private Sub Command1_Click()
Print "zhonghuarenmingongheguo"
Form1.Line (0, 0)-(10000, 8000)
Form1.Circle (Me.Width / 2, Me.Height / 2), 1000
End Sub

Private Sub Command2_Click()
Form1.Cls
End Sub