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

2024-11-22 21:51:49

推荐回答（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