Visual Basic 程序设计 第2章 可视化编程初步
1 Visual Basic 程序设计 第2章 可视化编程初步
2.1时钟程序设计任务 2.1.1任务描述 创建一个倒计时的简单应用程序。功能是： 当在文本框内输入倒计时的分钟数后，单 击“开始”按钮就开始倒计时，倒计时结 束时，弹出“时间到！”的信息框
2 2.1 时钟程序设计任务 2.1.1 任务描述 创建一个倒计时的简单应用程序。功能是： 当在文本框内输入倒计时的分钟数后，单 击“开始”按钮就开始倒计时，倒计时结 束时，弹出“时间到！”的信息框
2.1.2界面设计 1.界面设计 新建工程并创建窗体。 见下页图。（演示）
3 2.1.2 界面设计 1. 界面设计 新建工程并创建窗体。 见下页图。（演示）
s.工程1-Form1(Gorm) ▣☒ .Form1 ▣x☒
4
2.向窗体上添加控件 添加的控件有： 一个标签 一个文本框 一个命令按钮 一个计时器控件 见下页图
5 2. 向窗体上添加控件 添加的控件有： 一个标签 一个文本框 一个命令按钮 一个计时器控件 见下页图
工程1-Form1(Form) ✉回x 倒计时器 ▣☒ 请输入倒计时的分钟数： Textl 开始
6
3设置对象属性 (1)Form1窗体 Caption一”倒计时器” (2)Labe11控件 Caption-—”请输入倒计时的分钟数” AutoSi ze-—True (3)》 Command1控件 Caption- ”开始” (4) Text1控件 Al i gnment—”2-Center” (5)》 Timer1控件 Interve1”1000
7 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.进入代码编辑器窗口 见下页图
8 2.1.3 代码设计 1.进入代码编辑器窗口 见下页图
,工程1-Form1(Code) 回☒ Command1 Click Private Sub Command1_Click( End Sub
9
2.书写程序代码 （1)代码编辑器“通用”部分代码 Dim m As Long声明一个变量 (2)Command1控件代码 '使控件计时器开始工作 Timer1.Enabled True '将分钟数转换为秒数，并保存在变量m中 m Val (Text1.Text)60 '改变标签控件的标题 Label'1.Caption="现在开始倒计时" ,使命令按钮不可见 Command1.Visible False
10 2. 书写程序代码 （1）代码编辑器“通用”部分代码 Dim m As Long ’声明一个变量 （2）Command1控件代码 '使控件计时器开始工作 Timer1.Enabled = True '将分钟数转换为秒数，并保存在变量m中 m = Val(Text1.Text) * 60 '改变标签控件的标题 Label1.Caption = "现在开始倒计时" '使命令按钮不可见 Command1.Visible = False