
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