使用VB.NET的五个技巧之在组件中显示时间

开发过程过程中我们通常对特定代码片运行所花的时间很感兴趣 当然有一些标准程序和代码工具可以查看到它 但是有经验的Visual Basic 开发者有更快的办法 仅仅捕捉开始时间（使用Now关键字）和终止时间（再次使用Now关键字） 两种相减 就能知道结果了

成都创新互联2013年开创至今，先为南山等服务建站，南山等地企业，进行企业商务咨询服务。为南山企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。

如果使用Visual Basic NET编写 首先尝试的代码可能是这样的

Dim StartTime As DateTime = Now {code to check for timing goes here} Dim EndTime As DateTime = Now Console WriteLine((StartTime EndTime) ToString)

但是这段代码的最后一行有语法错误 错误消息是 日期类型没有定义 － 操作符 这意味着我们不能执行减法 日期数据类型不支持减法操作 那么我们怎么得到两次时间的差别呢？

答案就是使用TimeSpan类 它是用于保持时间段的 上面的代码看起来与 NET框架组件中的相似

Dim StartTime As DateTime = Now {code to check for timing goes here} Dim EndTime As DateTime = Now Dim RunLength As System TimeSpan RunLength = EndTime Subtract(StartTime) Console WriteLine(RunLength ToString)

计算使用的是类Date的Subtract方法 最后一行将输出时间的跨度 格式化成小时 分钟和秒（包括秒的小数位） 典型的输出是这样的

该时间跨度是 秒半 尽管显示了 位小数 但是只能相信两位 但是已经足够了

结论

lishixinzhi/Article/program/net/201311/11820

怎么用vb.net实现点击按钮显示时间

设计界面双击那个按钮(自动跳到代码里)

然后输入 要显示时间的那个Label.Text = DateTime.Now.ToString()

怎么在VB.net中实时显示时间

定时器中处理

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Timer1.Interval = 10 '10毫秒刷新一次

Timer1.Start() '开启定时器

End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

Label1.Text = Now

End Sub

vb.net datetime怎么显示时分秒

将datePicker设置为该日期，这样就可以确保每次从nib中加载此视图时，选取器都会重置为当前得日期和时间就可以了。

网站栏目：关于vb.net实时显示时间的信息
网页链接：http://ybzwz.com/article/ddohheg.html