VB中time是什么类型的数据
在VB中PrivateSubTimer1_Timer()a=time-1endsub可以实现时间的倒数为什么time可以用运算符进行计算呢?time是什么类型的数据我想从...
在VB中
Private Sub Timer1_Timer()
a = time - 1
end sub
可以实现时间的倒数
为什么time可以用运算符进行计算呢?time是什么类型的数据
我想从文本框中输入一个时间,同样进行倒数,
该怎样把文本框输入的文本数据转变成同time一样的数据呢>
有么有可能?
如果我文本框输入的是“12:12:12”那如何实现倒数呢??
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~]
谢谢 展开
Private Sub Timer1_Timer()
a = time - 1
end sub
可以实现时间的倒数
为什么time可以用运算符进行计算呢?time是什么类型的数据
我想从文本框中输入一个时间,同样进行倒数,
该怎样把文本框输入的文本数据转变成同time一样的数据呢>
有么有可能?
如果我文本框输入的是“12:12:12”那如何实现倒数呢??
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~]
谢谢 展开
3个回答
展开全部
我想从文本框中输入一个时间,同样进行倒数,
该怎样把文本框输入的文本数据转变成同time一样的数据呢>
---
不知道你想输入的是什么样的时间 简单的说 你输入的是50秒倒计时
那你可以这样写
Dim a
Private Sub Command1_Click()
Command1.Enabled = False
Text1.Locked = True
a = Val(Text1.Text)
Timer1.Interval = 1000
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
a = a - 1
If a = 0 Then
MsgBox "时间到"
Timer1.Enabled = False
End If
End Sub
--------
那就把你指定的输入格式转换成秒
该怎样把文本框输入的文本数据转变成同time一样的数据呢>
---
不知道你想输入的是什么样的时间 简单的说 你输入的是50秒倒计时
那你可以这样写
Dim a
Private Sub Command1_Click()
Command1.Enabled = False
Text1.Locked = True
a = Val(Text1.Text)
Timer1.Interval = 1000
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
a = a - 1
If a = 0 Then
MsgBox "时间到"
Timer1.Enabled = False
End If
End Sub
--------
那就把你指定的输入格式转换成秒
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
开玩笑,VB中哪里来的time数据类型,日期和时间都是用Date数据类型表示的.Timer1是计时器控件.用cDate(text1.text)可以将合法的输入转化为DATE数据类型,记住是合法的.
不晓得怎么给你解释,你对VB一点都不懂
建议你找本VB的基础教材来看看.
不晓得怎么给你解释,你对VB一点都不懂
建议你找本VB的基础教材来看看.
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询