Visual Basic编程语言程序设计 第10章 Visual Basic编程实例.doc

Visual Basic编程语言程序设计第10章 Visual Basic编程实例
第10章
Visual Basic编程实例
显示时间和信息
1
改变字体大小和颜色程序
2
色彩调节程序
3
改变鼠标指针形状程序
4
输入框和输出框实例
5
运动的汽车
6
“VB应用程序向导”自动生成应用程序
7
显示时间和日期
通过时钟控件、mandButton控件来完成本例的功能。具体步骤如下:
图10-1 打开窗口
(1)选择“文件/新建”菜单,打开如图10-1所示对话框。
图10-2 添加控件后的VB界面
(2)选中图10-1所示对话框中“标准EXE”,然后单击“打开”按钮创建一个新的应用程序。
(3)对窗体中各控件的属性值进行设置。

图10-3 Label1的Font属性值图10-4 完成各控件属性设置后的窗体
图10-5 程序运行结果
改变字体大小和颜色程序
在窗体中添加如下Label1、monDialog控件。
(1)Label1的属性值:Aligrment=Center,Caption=;改变字体大小和颜色程序;,Backstyle=;0-Trans;。
(monDialog控件的添加方法:

图10-6 部件选择

图10-7 选择高级控件

图10-8 引入控件后的界面图10-9 完成设置后的窗体
图10-10 完成代码添加后的代码框
色彩调节程序
(1)在窗体中添加控件并设置属性值
(2)完成属性设置后所得窗体如图10-12所示。

图10-11 属性窗口图10-12 完成属性设置后的窗体
(3)添加本程序代码如图10-13所示。
(4)运行程序时把颜色值属性值设为74D377,结果如图10-14所示。

图10-13 程序源代码图10-14 程序运行结果
改变鼠标指针形状程序
设置列表框属性
Label1的主要属性

图10-15 Columns的属性值图10-16 Caption等属性值
Timer1的主要属性

图10-17 Font属性值图10-18 Interval属性值


图10-19 引入控件后的界面图10-20 完成属性设置后的界面
添加程序代码

图10-21 添加代码
运行程序

图10-22 程序运行结果
输入框和输出框实例
输入框与输出框
MsgBox函数
表10-1 Buttons参数可选值
系统模式对话框。所有应用程序在用户回应消息之前处于暂停状态
4096
vbSystemModel
应用模式对话框。用户必须在当前应用程序工作之前对信息作出反应
0
vbApplicationModel
以第四个按钮为缺省按钮
768
vbDefaultButton4
以第三个按钮为缺省按钮
512
vbDefaultButton3
以第二个按钮为缺省按钮
256
vbDefaultButton2
以第一个按钮为缺省按钮
0
vbDefaultButton1
显示如图10-26所示图标
64
vbInformation
显示如图10-25所示图标
48
vbExclamation
显示如图10-24所示图标
32
vbQuestion
显示如图10-23所示图标
16
vbCritical
显示“重试”及“取消”按钮
5
vbRetryCancel
显示“是”及“否”按钮
4
vbYesNo
显示“是”、“否”及“取消”按钮
3
vbYesNoCancel
显示“取消”、“重试”及“忽略”按钮
2
vbAbortRetryIgnore
显示“确定”及“取消”按钮
1
vbOkcancel
只显示“确定”按钮
0
vbOkOnly
说明
值
常量


图10-23 “叹号”图标图10-24 “问号”图标

图10-25 “停止”图标图10-26 “信息”图标
表10-2 返回值列表
选择“否”按钮
7
vbNo
选择“是”按钮
6
vbYes
选择“忽略”按钮
5
vbIgnore
选择“重试”按钮
4
vbRetry
选择“终止”按钮
3
vbAbort
选择“取消”按钮
2
vbCancel
选择“确定”按钮
1
Book
按钮
值
常量
建立窗体框架

图10-27 引入控件后的窗体界面图10-28 完成属性设置后的窗体界面
添加程序代码
(