vb怎么在窗体上做时间显示？

2024年11月22日 21:51

有5个网友回答

网友（1）：

VB可使用Timer控件实现在窗体的标签控件中显示系统时间等信息。

Timer 控件，通过引发 Timer 事件，Timer 控件可以有规律地隔一段时间执行一次代码。

实现代码：

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

Private Sub Timer1_Timer()
   If lblTime.Caption <> CStr(Time) Then
      lblTime.Caption = "后台服务：连接正常" & "  系统日期：" & Date & "  系统时间：" & Time
   End If
End Sub

网友（2）：

实时的时间显示需要一个计时器Timer,，图显示的应该是状态栏，在Timer事件里改写状态栏的内容。用Now,Time等等函数获取的就是本机的时间。
记录要有记录首先要保存这个时间，即表要增加专门的字段来保存这个时间。

网友（3）：

假设有一个标签label1和一个按钮command1外加一个列表框list1还有最重要的计时器timer1

.........
timer的interval设置为100
代码

label1.caption="当前时间"+time

按钮的代码

list1.additem "在"+time+"我卖出了一瓶红酒"

网友（4）：

不用计时器，给一个变量aa=time$就行，如果有时间比较，才用时间控件

网友（5）：

这个是状态栏控件、关于记录时间那就要在数据库增加交易时间字段设置为默认：now