VB程序设计基础教程第10章

VB程序设计基础教程第10章

ID:43443692

大小:3.34 MB

页数:37页

时间:2019-10-08

VB程序设计基础教程第10章_第1页
VB程序设计基础教程第10章_第2页
VB程序设计基础教程第10章_第3页
VB程序设计基础教程第10章_第4页
VB程序设计基础教程第10章_第5页
资源描述:

《VB程序设计基础教程第10章》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、第10章VisualBasic编程实例www.uestcp.com.cn10.1显示时间和信息110.2改变字体大小和颜色程序210.3色彩调节程序310.4改变鼠标指针形状程序410.5输入框和输出框实例510.6运动的汽车610.7“VB应用程序向导”自动生成应用程序710.1显示时间和日期通过时钟控件、Label控件及CommandButton控件来完成本例的功能。具体步骤如下:图10-1打开窗口(1)选择“文件/新建”菜单,打开如图10-1所示对话框。图10-2添加控件后的VB界面(2)选中图10-1所示对话框中“标准EXE”,然后单击“打开”按钮创建一个新的应用程序。(3)对窗体中各

2、控件的属性值进行设置。图10-3Label1的Font属性值图10-4完成各控件属性设置后的窗体图10-5程序运行结果10.2改变字体大小和颜色程序在窗体中添加如下Label1、Text1、Command1、Command2、CommonDialog控件。(1)Label1的属性值:Aligrment=Center,Caption="改变字体大小和颜色程序",Backstyle="0-Trans"。(2)CommonDialog控件的添加方法:图10-6部件选择图10-7选择高级控件图10-8引入控件后的界面图10-9完成设置后的窗体图10-10完成代码添加后的代码框10.3色彩调节程序(1)

3、在窗体中添加控件并设置属性值(2)完成属性设置后所得窗体如图10-12所示。图10-11属性窗口图10-12完成属性设置后的窗体(3)添加本程序代码如图10-13所示。(4)运行程序时把颜色值属性值设为74D377,结果如图10-14所示。图10-13程序源代码图10-14程序运行结果10.4改变鼠标指针形状程序设置列表框属性Label1的主要属性图10-15Columns的属性值图10-16Caption等属性值Timer1的主要属性图10-17Font属性值图10-18Interval属性值图10-19引入控件后的界面图10-20完成属性设置后的界面添加程序代码图10-21添加代码运行程序

4、图10-22程序运行结果10.5输入框和输出框实例输入框与输出框MsgBox函数表10-1Buttons参数可选值常量值说明vbOkOnly0只显示“确定”按钮vbOkcancel1显示“确定”及“取消”按钮vbAbortRetryIgnore2显示“取消”、“重试”及“忽略”按钮vbYesNoCancel3显示“是”、“否”及“取消”按钮vbYesNo4显示“是”及“否”按钮vbRetryCancel5显示“重试”及“取消”按钮vbCritical16显示如图10-23所示图标vbQuestion32显示如图10-24所示图标vbExclamation48显示如图10-25所示图标vbInf

5、ormation64显示如图10-26所示图标vbDefaultButton10以第一个按钮为缺省按钮vbDefaultButton2256以第二个按钮为缺省按钮vbDefaultButton3512以第三个按钮为缺省按钮vbDefaultButton4768以第四个按钮为缺省按钮vbApplicationModel0应用模式对话框。用户必须在当前应用程序工作之前对信息作出反应vbSystemModel4096系统模式对话框。所有应用程序在用户回应消息之前处于暂停状态图10-23“叹号”图标图10-24“问号”图标图10-25“停止”图标图10-26“信息”图标表10-2返回值列表常量值按钮B

6、ook1选择“确定”按钮vbCancel2选择“取消”按钮vbAbort3选择“终止”按钮vbRetry4选择“重试”按钮vbIgnore5选择“忽略”按钮vbYes6选择“是”按钮vbNo7选择“否”按钮建立窗体框架图10-27引入控件后的窗体界面图10-28完成属性设置后的窗体界面添加程序代码(1)在通用声明中添加如下代码:DimPosChkAsBoolean它的功能是检查X、Y坐标是否有效。(2)在Check1_Click()的事件中添加如下代码:IfCheck1.Value=1ThenLabel1(3).Enabled=TrueLabel1(4).Enabled=TrueText1(3

7、).Enabled=TrueText1(4).Enabled=TruePosChk=TrueElseLabel1(3).Enabled=FalseLabel1(4).Enabled=FalseText1(3).Enabled=FalseText1(4).Enabled=FalsePosChk=FalseEndIf图10-29“退出”对话框在程序运行时图10-30程序运行图之一图10-31程序运行图

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。