=====================================
大家好,今天给大家带来一个关于VB的教程, 教程内容:<用VB打造会走动的时钟>
先打开 visual basic 6.0 ........
代码我事先打好了
Private Sub Timer1_Timer()
If Label1.Left + Label1.Width < Form1.Left + Form1.Width Then
Label1.Left = Label1.Left + 50
Else
Label1.Left = Form1.Left - Label1.Width
End If
End Sub
Private Sub Timer2_Timer()
Label1.Caption = Hour(Time) & "时" & Minute(Time) & "分" & Second(Time) & "秒" 这个是时钟
End Sub
OK ! 是不是很简单啊!!!!代码自己去研究一下,很简单!