VB时间怎么表示？

答案:4 悬赏:0 手机版

解决时间 2021-11-23 07:05

提问者网友：临风不自傲
2021-11-23 03:08

VB时间怎么表示？

最佳答案

五星知识达人网友：何以畏孤独
2021-11-23 03:38

如下：
Dim str As String = DateTime.Now().ToLongTimeString()
str = str.Replace("AM", "")
str = str.Replace("PM", "")
labTime.Text = str

全部回答

1楼网友：未来江山和你
2021-11-23 06:33

Private Sub Command1_Click()
a = #12/2/2007 6:47:59 PM#
MsgBox IIf(DateDiff("n", a, Now) > 0, "时间已过", "时间还未到")
End Sub

2楼网友：拜訪者
2021-11-23 04:55

time$

Visual Basic 概念
日期和时间（针对 Visual Basic 6.0 用户）
请参见
语言筛选器：全部语言筛选器：多个语言筛选器： Visual Basic 语言筛选器： C# 语言筛选器： C++ 语言筛选器： J# 语言筛选器： JScript
Visual Basic（声明）
Visual Basic（用法）
C#
C++
J#
JScript

Visual Basic 2005 将 Date、Date$、Time 和 Time$ 函数更新为属性并将 Now 和 Timer 函数替换为属性。

Visual Basic 6.0
在 Visual Basic 6.0 中，Date 和 Time 函数以四字节 Date 的格式返回系统日期和时间。同样，Date 和 Time 语句使用 Visual Basic 6.0 格式设置系统日期和时间。

Date$ 和 Time$ 函数以 String 的格式返回系统日期和时间。

Now 和 Timer 函数指定当前日期和时间，以及自午夜以来经过的秒数。

Visual Basic 2005
Visual Basic 2005 将 Date 和 Time 替换为 Today 和 TimeOfDay 属性，后面的两种属性使用八字节公共语言运行库 (CLR) DateTime 结构。这符合 Visual Basic 2005 中的 Date 数据类型。可以使用 Today 和 TimeOfDay 设置和获取系统日期和时间。

Visual Basic 2005 将 Date$ 和 Time$ 函数替换为 DateString 和 TimeString 属性。可以使用 DateString 和 TimeString 设置和获取系统日期和时间。

Now 和 Timer 函数由同名只读属性替代。它们的调用序列保持不变。

请参见
参考
Format 函数
Today 属性
TimeOfDay 属性
Date 数据类型 (Visual Basic)
DateString 属性
TimeString 属性
Now 属性
Timer 属性

概念
Format 函数（针对 Visual Basic 6.0 用户）
编程元素支持更改总结

要提出有关“帮助”或本产品其他功能的建议或错误报告，请转到反馈站点。

3楼网友：轻雾山林
2021-11-23 04:19

呵呵这个很简单：
在form中加入一个timer，然后粘贴如下代码，运行看效果：

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

Private Sub Timer1_Timer()
Dim t
Form1.Cls
t = Now
If t > "2007-12-2 18:47:59" Then Print "时间已过！" Else Print "时间还没到呢！"
End Sub

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息