重庆分公司,新征程启航

为企业提供网站建设、域名注册、服务器等服务

vb.net倒计秒表,vbs倒计时

VB.net中如何用timer控件编出一个简单的倒计时器?

用Timer控件吧,设置1秒执行1次。然后直接在Timer中写代码,将全全局的值来

创新互联专注骨干网络服务器租用10年,服务更有保障!服务器租用,西部信息机房 成都服务器租用,成都服务器托管,骨干网络带宽,享受低延迟,高速访问。灵活、实现低成本的共享或公网数据中心高速带宽的专属高性能服务器。

减减1,如果值为0,则停止Timer

跳出提示框

以下示例:

int

Tatal

=

100;

Timer.Inveral

=

1000;

Timer_()

{

if

(

Tatal

==

0)

{

MessageBox.Show("完成!");

Timer.Stop();

}

else

{

Tatal

--;

}

}

求高手用vb.net做一个倒计时程序。

画面添加textbox1 timer1

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

Timer1.Interval = 1000

TextBox1.Text = "2011/12/07 10:35:00"

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

If IsDate(TextBox1.Text) = True Then

Timer1.Start()

End If

End Sub

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

If Format(Now, "yyyy/MM/dd hh:mm:ss") = TextBox1.Text Then

MsgBox("It's time to go")

Timer1.Stop()

End If

End Sub

VB倒计时怎么做

1、首先,建立一个工程,并在窗口中添加三个命令按钮,caption分别改为“设置倒计时”、“启动倒计时”、“继续”,将窗体Form1的caption属性改为“倒计时”,再添加一个计时器控件,并且添加一个文本框,将界面设置成如下图所示。

2、将文本框的Text里的属性清空干净,再把字体Font的属性调整成为小四,方便接下来的观察,一定记得把背景色属性Backcolor调为浅黄色。

3、接下来,双击“设置倒计时”命令这个按钮,就会进入到代码编辑窗口,输入如图所示代码:

4、接着双击“启动倒计时”命令这个按钮,接下来会进入代码编辑窗口,再输入如下图所示代码:

5、再接着双击“计时器”控件,然后进入代码编辑窗口,输入如图所示代码:

6、在代码编辑窗口的通用段进行这三个变量的定义:Dim h As Integer, m As Integer, s As Integer '分别存储这三个量时、分、秒,如下图所示。

7、最后再双击窗体,然后就会进入代码编辑器,在 Form_Load事件中写入代码,代码如下图红框所示:

8、接着关闭代码窗口,按一下F5运行程序,再单击“设置倒计时”这个命令按钮,这时候就会弹出一个输入对话框,一定要记得此时输入分钟数,数字为1,然后确定,如图所示:

9、最后一定要单击“启动倒计时”这个命令按钮,然后文本框就会显示倒计时时间,并会不断地变动,这个时候你就可以看见时间在变动,这就是实现了倒计时功能,如图所示:

扩展资料:

使用VB倒计时设置计时参数5X60=300秒,然后设置定时器1S中断.当计时器为0就是5分钟,将计时器参数显示在文本框中就可以了。这个题目需要使用计时器控件,所以计时器的控件的Timer事件以及Enable属性、Interval属性需要熟知。

VB中怎样制作一个计时器? 能够设置倒计时的时间,并进行倒计时

1、打开VB6.0,新建一个工程,在窗体中添加三个命令按钮,caption分别改为“设置倒计时”、“启动倒计时”、“继续”,将窗体Form1的caption属性改为“倒计时”,添加一个计时器控件,添加一个文本框。

2、将文本框的Text属性清空,将字体Font属性调整为小四,便于观察,将背景色属性Backcolor调为浅黄色。

3、双击“设置倒计时”命令按钮,进入代码编辑窗口。

4、双击“启动倒计时”命令按钮,进入代码编辑窗口。

5、双击“计时器”控件,进入代码编辑窗口。

6、在代码编辑窗口的通用段进行变量定义:Dim h As Integer, m As Integer, s As Integer '分别存储时分秒Dim a As Integer。

7、双击窗体,进入代码编辑器,在 Form_Load事件中写入代码:Timer1.Enabled = False '先关闭计时器。

8、关闭代码窗口,按下F5运行程序,单击“设置倒计时”命令按钮,弹出输入对话框,此时输入分钟数为1,确定。

9、单击“启动倒计时”命令按钮,文本框显示倒计时时间,并时刻变动,至此实现了倒计时功能。


网页题目:vb.net倒计秒表,vbs倒计时
文章起源:http://cqcxhl.com/article/dsiepgc.html

其他资讯

在线咨询
服务热线
服务热线:028-86922220
TOP