如何在VB程序中设计一个倒计时器_第1页
如何在VB程序中设计一个倒计时器_第2页
如何在VB程序中设计一个倒计时器_第3页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

时钟程序设计1 任务描述创建一个倒计时的简单应用程序。功能是:当在文本框内输入倒计时的分钟数后,单击“开始”按钮就开始倒计时,倒计时结束时,弹出“时间到!”的信2 界面设计添加的控件有:一个标签一个文本框一个命令按钮一个计时器控件设置对象属性:Form1窗体: Caption”倒计时器”Label1控件:Caption”请输入倒计时的分钟数”、AutoSizeTrueCommand1控件:Caption”开始”Text1控件:Alignment”2-Center”Timer1控件:Intervel”1000”3 代码设计 1.代码编辑器“通用”部分代码:Dim m As Long 声明一个变量2.Command1控件代码:使控件计时器开始工作Timer1.Enabled = True将分钟数转换为秒数,并保存在变量m中m = Val(Text1.Text) * 60改变标签控件的标题Label1.Caption = 现在开始倒计时使命令按钮不可见Command1.Visible = False 3.Timer1控件代码:Private Sub Timer1_Timer()当timer1.enabled=true时,本程序每秒自动执行一次每运行一次,就将m变量的值减1秒m = m - 1If m 0 Then 如果倒计时结束,则Timer1.Enabled = False 关闭计时器MsgBox 时间到!, 0, 倒计时Label1.Caption = 请输入倒计时的分钟数Text1.Text = 清空文本框Command1.Visible = True 使命令按钮可见Else 否则显示倒计时数Text1.Text = mEnd IfEnd Sub4 保存和运行程序1. 保存工程(1)单击“文件”菜单中的“保存工程”或单击工具栏上的“保存工程”按钮,系统弹出“文件另存为”对话框,提示用户输入窗体文件名。将窗体文件名该为Timer.frm。(2)紧接着出现“工程另存为”对话框,以来保存工程文件。将文件名改为Timerapp.vbp,然后单击“保存”按钮。2.运行程序单击工具栏上的启动按钮就可以运行该时钟程序了。5 编译与打包1.编译应用程序编译应用程序就是把一个应用程序制成一个可执行文件,即.EXE文件。这样程序被编译在磁盘上,应用程序就可以脱离VB环境,在操作系统下单独运行了。 编译方法:单击“文件”菜单中的“生成Timerapp.exe”选项,出现“生成工程”对话框,在其中输入Timerapp.exe,然后单击“确定”按钮就可以了。2. 打包如上所述,.EXE文件可以脱离VB环境,在操作系统下单独运行,但不能简单地认为这样就可以将该.EXE文件发布给他人,或者可以拷贝到活动磁盘上 带到任意的系统上去使用。因为在执行已编译的代码时,VB要运行特定的运行库,但每台计算机安装的运行库不一定相同,因此必须创建一个安装程序来发布文 件。6 安装运行当用户需要在其它机器上运行已打包的程序时,必须进行程序安装。首先找到压缩包所在的目录,然后双击Setup.exe文件,Windows就会执行 安装程序显示欢迎对话框,单击“确定”按钮后,系统将显示“安装程序”对话框。接下来的安装步骤和安装其他软件方法是

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论