Dim P As Single,SJ,SHI As Integer,FEN As Integer,MIAO As Integer
Private Sub Form_Load()
Timer1.Interval = 1000
Timer1.Enabled = True
P = 3.1415926
End Su
Dim P As Single,SJ,SHI As Integer,FEN As Integer,MIAO As Integer
Private Sub Form_Load()
Timer1.Interval = 1000
Timer1.Enabled = True
P = 3.1415926
End Su