Enabled属性为True,计算机将发出( )beep声。 Sub Timer1_Timer() Fori=1 to 10 Beep Nexti End Sub在窗体上有一个命令按钮Commandl,编写事件代码如下:Private Sub Commandl Click( ) Dim X As Integer,Y As Integ
Y处画一个点): Dim cmdmave As Boolean Private Sub Form_MouseDown(Button As Integer,X As Single,Y As Single) If cmdmave Then Forml.PSet(X,Y) End lf End Sub Private Sub Form_MouseUp(Button As Integer,j