包含vb.net时间计算器的词条

VB.net做计时器。。。

加个timer，两个label，以下是代码:

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

Label1.Text = Format(Now(), "yyyy-MM-dd HH:mm:ss")

End Sub

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

Label2.Text = Format(Now(), "yyyy-MM-dd HH:mm:ss")

If DateDiff(DateInterval.Hour, DateTime.Parse(Label1.Text), DateTime.Parse(Label2.Text)) = 3 Then

MsgBox("超过3小时了！", , "信息提示")

Timer1.Enabled = False 'timer终止，不然会一直谈对话框！

End If

End Sub

相关问答

Q1: 怎样用VB.NET制作计算器

简单的说拖出一些控件，设置相应的caption和属性等等，双击每个button控件，进行相应的处理，即可

Q2: 用VB.net做一个时间计时器

'添加一个label标签名字label1 用来显示时间

'再添加一个timer控件 名字timer1 interval属性=1000 用来计时

'窗体添加代码

Dim t As Date '用来记录时间

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As _

System.EventArgs) Handles Timer1.Tick

t = t.AddSeconds(1)

Label1.Text = "登录时间:" t.TimeOfDay.ToString

End Sub

Q3: VB.NET,如何用TIMER控件计时

这种功能用不到TIMER，TIMER控件用在这种地方也不适合。（假如你所统计的时间很短，在几分中内话，可以使用，假如你统计的时间很长：几小时、几天几夜，建议改用以下方式）：

在你需要开始计时的地方加入一个记录当前时间，在你想结束的地方也得到一个当前时间。然后将两个时间相减。

希望以上思路可以帮到你。

Q4: 有关vb.net制作计算器的问题

判断吧，如果点击+按钮，则一个全局变量为1，-按钮，则全局变量为2.以此类推，然后if或case判断哪个数，如果为1，就两个数相加。