第2章VB可视化编程初步.ppt

Visual Basic程序设计 第2章 可视化编程初步 2.1 时钟程序设计任务 2.1.1 任务描述 创建一个倒计时的简单应用程序。功能是：当在文本框内输入倒计时的分钟数后，单击“开始”按钮就开始倒计时，倒计时结束时，弹出“时间到！”的信息框。 2.1.2 界面设计 1. 界面设计 新建工程并创建窗体。 见下页图。（演示） 2. 向窗体上添加控件 添加的控件有： 一个标签 一个文本框 一个命令按钮 一个计时器控件 见下页图。 3 设置对象属性 （1）Form1窗体 Caption——”倒计时器” （2）Label1控件 Caption——”请输入倒计时的分钟数” AutoSize——True （3）Command1控件 Caption——”开始” （4）Text1控件 Alignment——”2-Center” （5）Timer1控件 Intervel——”1000” 2.1.3 代码设计 1.进入代码编辑器窗口 见下页图 2. 书写程序代码 （1）代码编辑器“通用”部分代码 Dim m As Long ’声明一个变量 （2）Command1控件代码 使控件计时器开始工作 Timer1.Enabled = True 将分钟数转换为秒数，并保存在变量m中 m = Val(Text1.Text) * 60 改变标签控件的标题 Label1.Caption = 现在开始倒计时 使命令按钮不可见 Command1.Visible = False 2. 书写程序代码 （3）Timer1控件代码 Private Sub Timer1_Timer() 当timer1.enabled=true时，本程序每秒自动执行一次 每运行一次，就将m变量的值减1秒 m = m - 1 If m 0 Then 如果倒计时结束，则 Timer1.Enabled = False 关闭计时器 MsgBox 时间到！, 0, 倒计时 Label1.Caption = 请输入倒计时的分钟数 Text1.Text = 清空文本框 Command1.Visible = True 使命令按钮可见 Else 否则显示倒计时数 Text1.Text = m End If End Sub 2.1.4 保存和运行程序 1. 保存工程 （1）单击“文件”菜单中的“保存工程”或单击工具栏上的“保存工程”按钮，系统弹出“文件另存为”对话框，提示用户输入窗体文件名。将窗体文件名该为Timer.frm。 （2）紧接着出现“工程另存为”对话框，以来保存工程文件。将文件名改为Timerapp.vbp，然后单击“保存”按钮。 （演示） 2.运行程序 （演示） 习题 教材 P47 一、 1. 在Visual Basic的集成开发环境中创建Visual Basic应用程序时，除了工具箱窗口、窗体设计窗口、属性窗口外，必不可少的窗口是（ ）。 A. 窗体布局窗口 B. 立即窗口 C. 代码窗口 D. 监视窗口 答案：C 2.1.5 编译与打包 1.编译应用程序 编译应用程序就是把一个应用程序制成一个可执行文件，即.EXE文件。方法是单击“文件”菜单中的“生成Timerapp.exe”选项，出现“生成工程”对话框，在其中输入Timerapp.exe，然后单击“确定”按钮，程序即被编译在磁盘上，这样该应用程序就可以脱离VB环境，在操作系统下单独运行了。 （演示） 习题 教材P48 二、 2. 简述建立可执行文件的步骤。 答：单击“文件”菜单中的“生成Timerapp.exe”选项，出现“生成工程”对话框，在其中输入工程名.exe，然后单击“确定”按钮，程序即被编译在磁盘上，这样该应用程序就可以脱离VB环境，在操作系统下单独运行了。 习题 教材P48 二、 3. Visual Basic应用程序中包括哪些类型的文件？ 答：可能包含下列不同类型的文件： 1. 跟踪所有部件的工程文件（.vbp） 2. 每个窗体的文件（.frm） 3. 每个窗体的二进制数据文件（.frx） 4. 每个类模块的文件（.cls），可选 5. 每个标准类模块的文件（.bas），可选 6.