Beep语句怎么用
Beep语句怎么用
2011-07-06 10:50
2011-07-06 13:10
Private Sub Command1_Click() Beep End Sub
2011-07-06 13:31
2011-07-06 16:54
2011-07-08 16:45
2011-07-10 11:06
Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
Private Sub Command1_Click()
Beep 500, 1000
End Sub
2011-07-10 11:13