VB中如何获得窗体打开的时间?

在窗体加载(Load事件)时获取系统时间,然后把按按钮的时间减去它

Dim LoadTime as Date '声明变量,用来储存打开时的系统时间

Private Sub Form_Load() '当打开窗体时,把系统时间赋给LoadTime

LoadTime = Now 'Now 是获取系统时间的函数

End Sub

Private Sub Command1_Click()

Text1="已经打开窗体 " & Format(Now - LoadTime, "hh时mm分ss秒") '计算时间差,用Format函数把Date类型的数据转为时间格式的字符串

End Sub

_______________

欢迎追问

@替天行盗

````````````````````````

你可能想看:
标签: 替天行盗
分享给朋友: