育才学习网1.vb timer控件的用法
简单的说Timer是一个时间的控件，不能说Timer的值等于2秒时，因为Timer相当于时间，只能说当Timer跳动两秒时触发某事件。
例如：
1、在窗体上添加一个timer控件，默认名称为Timer1。
2、将Timer1的Interval属性设置为1000，即每隔1000毫秒（1秒）触发一次。
3、在Timer1的Timer（)事件中编写如下代码
Private Sub Timer1_Timer()
Print Time
End Sub
4、运行该程序，窗体上每隔1秒就会输出一次系统当前时间。
扩展资料：
具体代码如下：
首先要确定启动控件
Me.Timer1.Enabled = True '启动控件
Me.Timer1.Interval = 1000 '设定跳动频为1秒。1000=1秒
dim sTime as string=0
然后在控件的 Timer1.Tick事件下写下面的代码
sTime=stime+1
if sTime=2 then
'你所要触发事件的代码
msgbox("OK")
end if
参考资料：百度百科—C语言
2.如何利用VB中的时钟控件计时,
每隔一秒是吧？试试这个：
Option Explicit
Dim T As Date
Private Sub Form_Load()
T = Time
End Sub
Private Sub Timer1_Timer()
If Time - T >= "00:00:01" Then
'你要执行的操作，必须得保证这个操作不超过1秒，不然就不准了
T = Time
End If
End Sub
时间可以自己改
3.VB中日期控件如何使用
DateTimePicker控件使您可以提供格式化的日期字段，使得进行日期选择很容易。另外，用户还可以从类似于MonthView控件的下拉式日历界面中选择日期。
DateTimePicker控件，有两种操作模式：
下拉式日历模式（缺省）—允许用户显示一种能够用来选择日期的下拉式日历。
时间格式模式—允许用户在日期显示中选择一个字段（例如：月、日、年等等），按下控件右边的上下箭头来设置它的值。
可以自定义控件的下拉式日历的外观。使用各种颜色属性，例如CalendarBackColor、CalendarForeColor、、和，允许创建属于您自己的颜色方案。
DateTimePicker控件是ActiveX控件组的一部分，包含在 MSCOMCT2.OCX 文件中。
要在应用程序中使用DateTimePicker控件，须将 MSCOMCT2.OCX 文件加入到工程之中。
添加方式：工程->；部件->microsoft windows common controls-2 6.0
4.关于VB中的计时器控件的用法
'添加一个label和一个timer1
Private Sub Form_Load()
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
Label1 = Format(Now(), "yyyy年m月d日 HH时MM分SS秒"）
End Sub
详细请参阅我的博客：
5.新学的VB,里面的时间控件是什么
Timer（) 功能 在指定的时间间隔内反复触发指定窗口的定时器事件。
语法Timer ( interval {, windowname } ) 参数interval：指定两次触发Timer事件之间的时间间隔，有效值在0到65之间。如果该参数的值指定为0，那么关闭定时器，不再触发指定窗口的Timer事件windowname：窗口名，指定时间间隔到时要触发哪个窗口的Timer事件。
省略该参数时，触发当前窗口的Timer事件返回值Integer。函数执行成功时返回1，发生错误时返回-1。
如果任何参数的值为NULL,Timer（)函数返回NULL。用法使用Timer（)函数可以周期性地触发指定窗口的Timer事件，这样，每当时间间隔过去时，应用程序都可以完成一些周期性的工作，比如绘制简单动画等。
将Timer（)的interval参数设置为非0值时启动定时器并开始计时；将该函数的interval参数设置为0时关闭定时器，终止计时任务。需要注意的是，在Microsoft Windows系统中，该函数能够计时的最小时间间隔为0.055秒（约1/18秒），如果把interval参数的值设置小于0.055，那么该定时器将每隔0.055秒触发一次窗口的Timer事件。
Microsoft Windows 3.x最多只支持系统中同时启动16个定时器。
6.VB 时钟控件（Timer）的使用
Private Sub Form_Load()
Timer1.Interval = 2000
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Static i As Long
i = i + 1
If i > 6 Then i = 1
Picture1.Picture = LoadPicture(App.Path & "\" & i & ".jpg")
End Sub
转载请注明出处育才学习网 » vb时钟控件怎么用(vbtimer控件的用法)