我想在窗体中显示时间,如何实现呢?

Private Sub Form_Load()
Timer1.Interval = 1000
End Sub

Private Sub Timer1_Timer()
Me.Caption = Time
End Sub

同意,但这个是在窗体的标题栏上显示时间的,你可修改下

不好意思，没看清楼主要求，改一下
Print Time

这样的问题...BAIDU下就OK了吧