Visual Basic项目化程序设计教程

12433任务一ＶｉｓｕａｌＢａｓｉｃ6.0安装教程任务二编写第一个ＶｉｓｕａｌＢａｓｉｃ6.0应用程序任务三认识ＶｉｓｕａｌＢａｓｉｃ6.0集成开发环境任务四掌握ＶｉｓｕａｌＢａｓｉｃ6.0学习方法与术语返回项目一用ＶｉｓｕａｌＢａｓｉｃ开发第一个简单程序任务一ＶｉｓｕａｌＢａｓｉｃ6.0安装教程１ＶｉｓｕａｌＢａｓｉｃ6.0的版本简介ＶｉｓｕａｌＢａｓｉｃ6.0共有三个功能不同的版本：学习版、专业版和企业版。三个版本分别满足不同的开发需求，但相对而言，后者的功能比前者更强一些。用户可根据需要选用相应的版本，各版本的功能见表１－１。２安装ＶｉｓｕａｌＢａｓｉｃ6.0的系统要求为了能更好地运行ＶｉｓｕａｌＢａｓｉｃ6.０，建议安装ＶｉｓｕａｌＢａｓｉｃ6.0的计算机满足如下条件：３ＶｉｓｕａｌＢａｓｉｃ6.0软件安装（１）准备工作：下载软件（２）安装ＶｉｓｕａｌＢａｓｉｃ6.0的步骤下一页返回任务一ＶｉｓｕａｌＢａｓｉｃ6.0安装教程①把下载的软件从压缩包解压出来。②在解压出来的文件夹ＶｉｓｕａｌＢａｓｉｃ6.0ＣＨＳ中双击文件“ＳＥＴＵＰＥＸＥ”，执行安装程序，此时出现ＶｉｓｕａｌＢａｓｉｃ的安装向导，如图１－１所示。③直接单击“下一步（Ｎ）”，选中“接受协议”，再单击“下一步（Ｎ）”，如图１－２所示。④在产品的ＩＤ号中全部输入“１”（用一串“１”把两个空格填满），姓名和公司名称任意填写，再单击“下一步（Ｎ）”，如图１－３所示。⑤选中“安装ＶｉｓｕａｌＢａｓｉｃ6.0中文企业版（Ｉ）”，单击“下一步（Ｎ）”，如图１－４所示。⑥一般情况下，直接单击“下一步（Ｎ）”（公用文件的文件文件夹可以不用改变），如图１－５所示，接着单击“继续”，然后单击“确定”，最后单击“是”。上一页下一页返回任务一ＶｉｓｕａｌＢａｓｉｃ6.0安装教程⑦选择“典型安装”或“自定义安装”，初学者可以选择前者。选择后者可在弹出的对话框中选择选项，如图１－６所示。单击“继续”后，进入安装进度界面，如图１－８所示。⑧在弹出的对话框中，单击“重新启动Ｗｉｎｄｏｗｓ（Ｒ）”，如图１－９所示。４安装ＭＳＤＮ（帮助文件）①重装启动计算机后，在出现的ＶｉｓｕａｌＢａｓｉｃ6.0安装界面中直接安装帮助文件，选中“安装ＭＳＤＮ”项，再单击“下一步（Ｎ）”，如图１－１０所示。②在弹出的对话框中单击“浏览”，找到“ＭＳＤＮｆｏｒＶｉｓｕａｌＢａｓｉｃ6.０”文件夹。上一页下一页返回任务一ＶｉｓｕａｌＢａｓｉｃ6.0安装教程③单击“继续”按钮，再单击“确定”，选中“接受协议”，如图１－１１和图１－１２④单击“自定义安装”，在“ＶｉｓｕａｌＢａｓｉｃ6.0帮助文件”前打钩，再单击“继续”，如图１－１３所示。⑤完成ＭＳＤＮ的安装，单击“确定”。⑥直接单击“下一步（Ｎ）”，把“现在注册”项去掉，再单击“完成”，即完成了ＶｉｓｕａｌＢａｓｉｃ的安装。上一页返回任务二编写第一个ＶｉｓｕａｌＢａｓｉｃ6.0应用程序【功能描述】我们的第一个应用程序非常简单，使用者只需单击程序界面上的一个按钮，程序界面上就会显现“热烈欢迎您进入ＶＢ世界，学习方法可参考任务四。”的字样，如图１－１４所示。【开发思路】有了清晰的思路后，根据应用程序要实现的功能来设计程序：至少需要制作一个按钮、一个程序界面，为了让应用程序更规范，还需要创建一个用来显示“热烈欢迎您进入ＶＢ世界，学习方法可参考任务四。”字样的容器。无论是开发什么样的程序，都要创建一个新的“标准ＥＸＥ”文件，所用方法如下：依次单击“开始”→“程序”→“ＭｉｃｒｏｓｏｆｔＶｉｓｕａｌＢａｓｉｃ6.0中文版”→“ＭｉｃｒｏｓｏｆｔＶｉｓｕａｌＢａｓｉｃ6.0中文版”，启动ＶｉｓｕａｌＢａｓｉｃ6.０，如图１－１５所示。选中“标准ＥＸＥ”，单击“打开”按钮后，进入ＶｉｓｕａｌＢａｓｉｃ6.0的设计环境，就可以开始程序设计了。下一页返回任务二编写第一个ＶｉｓｕａｌＢａｓｉｃ6.0应用程序步骤一界面设计①在系统提供的默认窗体（Ｆｏｒｍ１）上进行用户界面设计，双击控件箱面板上的命令按钮（ＣｏｍｍａｎｄＢｕｔｔｏｎ）图标，如图１－１６所示。然后会发现程序界面上多了一个命令按钮，如图１－１７所示。②再创建一个标签控件。双击如图１－１８所示的图标。现在程序界面如图１－１９所示。③用鼠标单击选取“Ｌａｂｅｌ１”，按住鼠标左键的同时用鼠标拖动标签按钮到合适位置，如图１－２０所示。上一页下一页返回任务二编写第一个ＶｉｓｕａｌＢａｓｉｃ6.0应用程序将鼠标放在标签按钮左边缘任意一处，当鼠标呈左右箭头时横向拖动，把标签按钮拖长，用同样的方法将标签按钮右边也拖长，最后的程序界面如图１－２１所示。此界面即为最终用户界面。步骤二控件属性设置开发任何应用程序，都应该在完成界面布局后对每一个元素进行属性设置，以达到自己的要求，当然，也可以在元素布局的过程中进行属性设置，但大部分的属性都是在界面设计后进行设置的。选中程序界面上的命令按钮，然后在右边找到属性面板，如图１－２２所示。其中，“名称：Ｃｏｍｍａｎｄ１”是此按钮的名称，主要用于程序引用，所以不能用中文名字；“Ｃａｐｔｉｏｎ：Ｃｏｍｍａｎｄ１”是命令按钮的标题，也就是显示在命令按钮上的字样，我们将其改成“单击按钮”，如图１－２３所示。上一页下一页返回任务二编写第一个ＶｉｓｕａｌＢａｓｉｃ6.0应用程序接着，选中标签（Ｌａｂｅｌ１），将标签按钮的标题改成空字符串，也就是没有任何文字，如图１－２４所示。至此，控件属性设置完毕。步骤三编写程序代码，建立事件过程选中命令按钮Ｃｏｍｍａｎｄ１，然后双击它，弹出如图１－２５所示的程序代码输入窗口。事件过程名由对象名和事件名两部分组成。学习方法可参考任务四。”的内容，如图１－２６所示。单击Ｌａｂｅｌ１按钮即可显示。上一页下一页返回任务二编写第一个ＶｉｓｕａｌＢａｓｉｃ6.0应用程序步骤四保存工程在ＶｉｓｕａｌＢａｓｉｃ6.0中保存文件，常常用到“保存工程”命令。而在保存过程中，必须进行两次保存，一次是以ｆｒｍ为扩展名的文件保存（图１－２７），另一次是以ｖｂｐ为扩展名的文件保存（图１－２８）。前者是保存应用程序的窗体文件，后者是保存应用程序的工程文件。步骤五运行程序执行工具栏里“启动”命令，即用解释方式运行程序；执行工具栏“结束”命令，即可结束程序的运行。最终窗体显示结果如图１－２９所示。上一页返回任务三认识ＶｉｓｕａｌＢａｓｉｃ6.0集成开发环境要用ＶｉｓｕａｌＢａｓｉｃ6.0开发程序，就必须熟练掌握ＶｉｓｕａｌＢａｓｉｃ6.0的集成开发环境，我们在打开ＶｉｓｕａｌＢａｓｉｃ6.０，选中“标准ＥＸＥ”工程，单击“打开”按钮后，就可以进入ＶｉｓｕａｌＢａｓｉｃ6.0的集成开发环境了，如图１－３０所示。１标题栏标题栏用于显示正在开发或调试的工程名和系统的工作状态（设计态、运行态、中止态），如图１－３１所示。２菜单栏菜单栏用于显示所使用的ＶｉｓｕａｌＢａｓｉｃ命令。ＶｉｓｕａｌＢａｓｉｃ6.0标准菜单如图１－３２所示。下一页返回任务三认识ＶｉｓｕａｌＢａｓｉｃ6.0集成开发环境３工具栏在编程环境下，工具栏用于快速访问常用命令。缺省情况下，启动ＶｉｓｕａｌＢａｓｉｃ6.0后显示“标准”工具栏，如图１－３３所示。附加的编辑、窗体设计和调试的工具栏可以从“视图”菜单上的“工具栏”命令中移进或移出。４窗体设计器窗体设计器（图１－３４）用来设计应用程序的界面。启动ＶｉｓｕａｌＢａｓｉｃ6.0后，窗体设计器中自动出现一个名为Ｆｏｒｍ１的空白窗体，该窗体中可以通过添加控件、图形和图片等来创建所希望的外观。窗体的外观设计好后，从菜单中选择“文件”→“保存窗体”，在保存对话框中给出合适的文件名（注意扩展名），选择所需的保存位置并进行确定。当需要再设计另一个窗体时，单击工具栏上的“添加窗体”按钮即可。上一页下一页返回任务三认识ＶｉｓｕａｌＢａｓｉｃ6.0集成开发环境５控件（工具）箱控件箱由一组控件按钮组成，用于在窗体中放置控件，如Ｌａｂｅｌ控件、Ｔｅｘｔ控件、Ｃｏｍ⁃ｍａｎｄ控件等，如图１－３５所示。除了缺省的工具箱布局之外，还可以通过从上下文菜单中选定“添加选项卡”并在结果选项卡中添加控件来创建自定义布局。6.弹出式（上下文）菜单在要使用的对象上单击鼠标右键即可打开弹出式菜单。其上会出现与当前对象相关的常用操作，以加快操作速度。７工程管理器窗口工程管理器窗口（图１－３６）用于浏览工程中包含了哪些窗体和模块，还可以从中查看代码和对象。上一页下一页返回任务三认识ＶｉｓｕａｌＢａｓｉｃ6.0集成开发环境８属性窗口属性窗口是ＶｉｓｕａｌＢａｓｉｃ6.0中一个比较复杂的窗口，其中列出了对选定窗体或控件的属性设置值，如图１－３７所示。ＶｉｓｕａｌＢａｓｉｃ6.0中正是通过改变属性来改变对象的特征的，如大小、标题和颜色。９代码窗口右键单击窗体中的对象，从工程管理器中单击“查看代码”按钮，或者双击要修改的控件，即可弹出代码窗口，如图１－３８所示。上一页下一页返回任务三认识ＶｉｓｕａｌＢａｓｉｃ6.0集成开发环境１０窗体布局窗口ＦｏｒｍＬａｙｏｕｔＷｉｎｄｏｗ允许使用表示屏幕的小图像来布置应用程序中各窗体的位置，如图１－３９所示。１１立即、本地和监视窗口这些附加窗口是为调试应用程序而提供的，它们只在ＩＤＥ中运行应用程序时才有效。这三个窗口均可在视图菜单里打开，如图１－４０所示。上一页返回任务四掌握ＶｉｓｕａｌＢａｓｉｃ6.0学习方法与术语一、持之以恒———养成良好的学习习惯ＶｉｓｕａｌＢａｓｉｃ6.0程序设计的入门并不难，但却是一个十分重要的过程，因为程序设计思想就是在这一过程形成的。良好的程序设计习惯也在这个阶段养成，而良好编程习惯是一个优秀程序员的必备素质。二、理解概念———学习程序设计要注重理解一些重要的概念ＶｉｓｕａｌＢａｓｉｃ6.0程序设计本身并不复杂，翻开一本学习程序设计的书籍，看到的无非就是变量、函数、条件语句、循环语句等概念，但要真正能进行程序设计，需要深入理解这些概念。因此，在程序入门阶段还应该重视概念的学习与记忆。三、重点掌握———掌握ＶｉｓｕａｌＢａｓｉｃ6.0程序设计学习的重点下一页返回任务四掌握ＶｉｓｕａｌＢａｓｉｃ6.0学习方法与术语学习ＶｉｓｕａｌＢａｓｉｃ6.0程序设计的重点应放在思路、算法、编程构思和程序实现上。语句只是表达工具，要求在课堂上积极思考并融会贯通，并做到灵活应用。学会利用计算机编程手段分析问题和解决问题。四、阅鉴程序———阅读、借鉴别人设计的程序要想快速入门程序开发，就要多阅读别人设计的程序代码，包括网络上的源程序代码和教材上的例题程序。在读懂别人的程序后，要进一步思考别人为什么这么设计，能不能将别人的程序加以修改来完成更多的功能，即通过学习别人优秀的东西，来帮助提高自身水平。五、自编自练———自己动手编写程序上一页下一页返回任务四掌握ＶｉｓｕａｌＢａｓｉｃ6.0学习方法与术语程序设计入门阶段要借鉴别人的程序，但也要经常自己动手编写程序。亲自动手进行程序设计是应用创造性思维的体现，是培养逻辑思维的好方法，因此一定要多动手编写程序，而且要从开发小程序开始，逐渐提高开发程序的代码行数量与规模。五大课程学习具体要求：一、向课堂要效益要想有效地掌握课堂内容及技能，就必须在课前认真预习，课上认真听课并适当做笔记，课后认真复习以消化所学内容，并完成作业和课后练习题。二、注重实训，多写程序上一页下一页返回任务四掌握ＶｉｓｕａｌＢａｓｉｃ6.0学习方法与术语程序设计是高强度的脑力劳动，不是听会的，也不是看会的，而是练会的。只有自己动手编写一些程序，才会有成就感，进而对课程产生兴趣，学起来才比较从容。当你在编写大量程序之后，才能获得真知灼见，感到运用自如。三、树立学好程序设计的信心学习一门程序语言不是一蹴而就的事，也不是一劳永逸的事，要有自信、自强、积极主动的学习精神，同时，要能克服畏难情绪，保持良好的学习心态，树立学好程序设计的信心，并持之以恒。四、养成良好的编程习惯优秀的程序员，在编程过程中要强调可读性，如通常情况下变量要加注释，程序构思要有说明。此外，还要学会如何调试程序，对运行结果要做逻辑上正确与否的分析。上一页下一页返回任务四掌握ＶｉｓｕａｌＢａｓｉｃ6.0学习方法与术语五、上机调试程序具体要求认真预习课程内容，在上机前应认真把实训题目在纸上做一做，如窗体界面的设计、事件代码的编写等。实训过程中，应一边编写程序一边认真思考，为什么要这样设计，还有没有别的方法可实现？不这样写行不行？每次上机后应进行总结，把没有搞清楚的问题记录下来，请教老师或同学。平时应利用课余时间多上机调试程序。上一页返回表１－１不同版本的ＶｉｓｕａｌＢａｓｉｃ6.0的功能对比返回图１－１ＶｉｓｕａｌＢａｓｉｃ6.0的安装向导返回图１－２ＶｉｓｕａｌＢａｓｉｃ6.0的安装向导之接受协议返回图１－３ＶｉｓｕａｌＢａｓｉｃ6.0的安装向导之输入产品号返回图１－４ＶｉｓｕａｌＢａｓｉｃ6.0的安装向导之选择版本返回图１－５ＶｉｓｕａｌＢａｓｉｃ6.0的安装向导之选择安装目录返回图１－６ＶｉｓｕａｌＢａｓｉｃ6.0的安装向导之自定义安装返回图１－７ＶｉｓｕａｌＢａｓｉｃ6.0的安装向导之继续安装返回图１－８ＶｉｓｕａｌＢａｓｉｃ6.0的安装向导之安装进度界面返回图１－９ＶｉｓｕａｌＢａｓｉｃ6.0的安装向导之重新启动返回图１－１０ＭＳＤＮ安装向导返回图１－１１ＭＳＤＮＬｉｂｒａｒｙ安装返回图１－１２ＭＳＤＮ接受许可协议返回图１－１３ＭＳＤＮ自定义安装返回图１－１４应用程序效果图返回图１－１５新建工程返回图１－１６创建命令按钮返回图１－１７创建的命令按钮返回图１－１８创建标签（Ｌａｂｅｌ）返回图１－１９创建的标签与命令按钮返回图１－２０调整标签与命令按钮位置返回图１－２１调整标签大小后的效果返回图１－２２命令按钮属性设置返回图１－２３将按钮的Ｃａｐｔｉｏｎ属性改为“单击按钮”返回图１－２４将标签（Ｌａｂｅｌ１）的

Ｃａｐｔｉｏｎ属性删除为空返回图１－２５编写程序代码窗口返回图１－２６窗体代码返回图１－２７保存窗体文件（ｆｒｍ）返回图１－２８保存工程文件（ｖｂｐ）返回图１－２９执行代码结果返回图１－３０ＶｉｓｕａｌＢａｓｉｃ6.0集成开发环境返回图１－３１标题栏返回图１－３２菜单栏返回图１－３３工具栏返回图１－３４窗体设计器返回图１－３５控件（工具）箱返回图１－３６工程管理器窗口返回图１－３７属性窗口返回图１－３８代码窗口返回图１－３９窗体布局窗口返回图１－４０立即、本地和监视窗口返回谢谢观赏项目二文本标签类控件程序1233任务一掌握Ｌａｂｅｌ控件属性设置与使用任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用任务三计算长方形面积程序设计返回任务一掌握Ｌａｂｅｌ控件属性设置与使用一、认识Ｌａｂｅｌ控件在项目一中，我们已经知道，任何一个ＶｉｓｕａｌＢａｓｉｃ程序都是由操作界面及相应的程序代码组成的，而操作界面则是由诸如“命令按钮控件”“文本框控件”“标签控件”等控件以及窗体共同组成的。从本项目开始，我们进入控件的学习。在ＶｉｓｕａｌＢａｓｉｃ工具箱中，标签控件的图标如图２－１所示。标签的默认名称（Ｎａｍｅ）和标题（Ｃａｐｔｉｏｎ）为ＬａｂｅｌＸ（Ｘ为１、２、３等），比如Ｌａｂｅｌ１、Ｌａｂｅｌ２、Ｌａｂｅｌ３、…。下一页返回任务一掌握Ｌａｂｅｌ控件属性设置与使用标签控件的主要属性如下。１Ｃａｐｔｉｏｎ（标题）属性此属性用来设置在标签上显示的文本信息，而文本信息可以在创建界面时设置，也可以在程序中改变，如项目一中列举的例子，就是通过单击按钮改变标签显示的字样。２ＢｏｒｄｅｒＳｔｙｌｅ（边框）属性本属性用来设置标签的边框类型，有两种值可选：０，代表标签无边框；１，代表标签有边框，并且具有三维效果。两种标签如图２－２所示。ＢｏｒｄｅｒＳｔｙｌｅ属性可以在设计界面时指定，如图２－３所示。上一页下一页返回任务一掌握Ｌａｂｅｌ控件属性设置与使用３Ｆｏｎｔ（字体）属性０或１（０或１，两者取一）本属性用来设置标签显示的字体，既可以在创建界面时设定（图２－４），也可以在程序中改变。在图２－４的设置界面中，除了可以选择字体，还可以设置显示文字为粗体、斜体、下划线等特征。４Ａｌｉｇｎｍｅｎｔ（False）对齐）属性此属性用来设置标签上显示的文本的对齐方式，值为０表示左对齐；值为１表示右对齐；值为２表示居中显示。此属性可以在界面设置时设定，如图２－５所示。上一页下一页返回任务一掌握Ｌａｂｅｌ控件属性设置与使用５Ｖｉｓｉｂｌｅ（可见）属性本属性在大多数控件中都有，它能设置该控件是否可见，当值为Ｔｒｕｅ时，控件可见；当值为Ｆａｌｓｅ时，控件隐藏。控件的可见属性可以在界面设置时设置，如图２－６所示。二、标签控件（Ｌａｂｅｌ）的主要事件所谓的事件，其实就是用户对应用程序的操作，如项目一中用鼠标单击“命令按钮”触发的Ｃｌｉｃｋ事件。事件的作用在于触发程序的执行，如项目一中的Ｃｌｉｃｋ事件改变了标签控件的Ｃａｐｔｉｏｎ属性。上一页返回任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用在ＶｉｓｕａｌＢａｓｉｃ６０操作界面中，代表ＴｅｘｔＢｏｘ（文本框）控件的图标如图２－７所示。ＴｅｘｔＢｏｘ控件主要用来显示文本或输入文本，如Ｗｉｎｄｏｗｓ登录时的“口令”窗口，或者记事本的整个编辑区域。双击工具箱中的文本框控件或者单击文本控件，然后用鼠标在ＶｉｓｕａｌＢａｓｉｃ的工作区域拖拉，就可以创建文本框了，如图２－８所示。文本框控件的默认名称为ＴｅｘｔＸ（Ｘ为１、２、３等），比如Ｔｅｘｔ１、Ｔｅｘｔ２、Ｔｅｘｔ３、…。当然，也可以将其改为自定义的名称，如Ｔｘｔ＿Ｘ（Ｘ为用户自定义的名字，如Ｔｘｔ＿Ｓｈｏｗ、Ｔｘｔ＿２、Ｔｘｔ＿ｕｓｅｒ３等）。下一页返回任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用一、文本框控件的主要属性本控件最重要的属性，即显示在文本框中的文本内容（Ｔｅｘｔ），可以在界面设置时指定，如图２－９所示。文本内容也可以在程序中动态修改，其程序代码如下：文本框名Text="欲显示的文本内容"如果要在一个名为ＴｘｔＦｏｎｔ的文本框控件中显示“隶书”字样，那么输入代码为：

TxtFont

Text="隶书“２ＳｅｌＴｅｘｔ（选中文本）属性本属性返回或设置当前所选文本的字符串。如果没有选中的字符，那么返回值为空字符串，即“”。请注意，本属性的结果是个返回值，或为空，或为选中的文本，其具体用法可参考项目七。上一页下一页返回任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用３ＳｅｌＳｔａｒｔ与ＳｅｌＬｅｎｇｔｈ属性ＳｅｌＳｔａｒｔ属性用于选中文本的起始位置，返回的是选中文本的第一个字符的位置；ＳｅｌＬ⁃ｅｎｇｔｈ属性用于选中文本的长度，返回的是选中文本的字符串个数。例如，文本框Ｔｅｘｔ２中有内容如下：跟我一起进入ＶＢ世界。假设选中“一起进入”四个字，那么，ＳｅｌＳｔａｒｔ为３，ＳｅｌＬｅｎｇｔｈ为４。４ＭａｘＬｅｎｇｔｈ（最大长度）属性本属性限制了文本框中可以输入的字符个数的最大限度，默认为０，表示在文本框所能容纳的字符数之内没有限制。文本框所能容纳的字符数是６４ＫＢ，如果超过这个范围，则应该用其他控件来代替文本框控件。上一页下一页返回任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用文本框控件ＭａｘＬｅｎｇｔｈ属性既可以在界面设置过程中加以指定，如图２－１１所示，也可以在设计时进行改变，代码如下：文本框控件名Maxlength=X（X为阿拉伯数字，如10、20、57等）５ＭｕｌｔｉＬｉｎｅ（多行）属性本属性决定文本框是否可以显示或输入多行文本。当属性值为Ｔｒｕｅ时，表示文本框可以容纳多行文本；当属性值为Ｆａｌｓｅ时，表示文本框则只能容纳单行文本。本属性只能在界面设置时指定，不能在程序运行时加以改变，如图２－１２所示。上一页下一页返回任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用６ＰａｓｓｗｏｒｄＣｈａｒ（密码）属性本属性主要作为口令功能进行使用。例如，若希望在密码框中显示星号时，则可在“属性”窗口中将ＰａｓｓｗｏｒｄＣｈａｒ属性指定为“∗”，这时，无论用户输入什么字符，文本框中都显示星号，如图２－１３所示。７ＳｃｒｏｌｌＢａｒｓ（滚动条）属性本属性可以设置文本框是否有滚动条，当属性值为０时，文本框无滚动条；属性值为１时，文本框只有横向滚动条；属性值为２时，文本框只有纵向滚动条；属性值为３时，文本框具有横、纵向滚动条，如图２－１４所示。上一页下一页返回任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用８Ｌｏｃｋｅｄ（锁定）属性当本属性的属性值为Ｆａｌｓｅ时，文本框中的内容可以编辑；当属性值为Ｔｒｕｅ时，文本框中的内容不能编辑，只能查看或进行滚动操作。二、文本框控件的事件除了Ｃｌｉｃｋ、ＤｂＣｌｉｃｋ这些不常用的事件外，与文本框相关的主要是Ｃｈａｎｇｅ、ＧｏｔＦｏｃｕｓ、ＬｏｓｔＦｏｃｕｓ事件。１Ｃｈａｎｇｅ事件当用户向文本框中输入新内容，或当程序把文本框控件的Ｔｅｘｔ属性设置为新值时，将触发Ｃｈａｎｇｅ事件。２ＧｏｔＦｏｃｕｓ事件上一页下一页返回任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用ＧｏｔＦｏｃｕｓ事件又称“获得焦点事件”，所谓获得焦点，其实就是指处于活动状态。在电脑的日常操作中，我们常常用Ａｌｔ＋Ｔａｂ键在各个程序间进行切换，处于活动中的程序获得了焦点，非活动的程序则失去了焦点（ＬｏｓｔＦｏｃｕｓ）。３ＬｏｓｔＦｏｃｕｓ事件ＬｏｓｔＦｏｃｕｓ事件又称为“失去焦点”事件，其含义与ＧｏｔＦｏｃｕｓ事件相反。程序界面如图２－１５所示。上一页返回任务三计算长方形面积程序设计【开发思路】①至少需要一个程序界面和三个文本框，其中两个文本框用来输入边长，剩下一个用来输出面积数据；②每个文本框需要三个标签来标识，其中两个用来标识边长，剩下一个用来标识面积；③制作两个按钮，一个实现单击后的计算功能，另一个是用于退出程序。通过分析，我们要创建的应用程序用户界面如图２－１６所示。窗体（Ｆｏｒｍ）上含有三个标签（Ｌａｂｅｌ）、三个文本框（Ｔｅｘｔ）和两个命令按钮（Ｃｏｍ⁃ｍａｎｄ），三个标签（Ｌａｂｅｌ）分别用于显示文字“边长一”“边长二”和“面积”，三个文本框（Ｔｅｘｔ）用于输入数据和显示计算结果。下一页返回任务三计算长方形面积程序设计步骤一创建窗体，添加界面的控件①在默认窗体Ｆｏｒｍ１上添加两个标签（Ｌａｂｅｌ）、两个文本框（Ｔｅｘｔ）和两个命令按钮（Ｃｏｍｍａｎｄ），以构建用户界面。②设置控件的方法：在Ｆｏｒｍ１窗体上添加标签控件，其中，标签Ｌａｂｅｌ１用于显示文字“边长一”；标签Ｌａｂｅｌ２用于显示文字“边长二”；标签Ｌａｂｅｌ３用于显示文字“面积”。选择标签方法如图２－１７所示。③在Ｆｏｒｍ１窗体上添加文本框控件，其中，文本框Ｔｅｘｔ１用于输入边长一的数值，文本框Ｔｅｘｔ２用于输入边长二的数值，文本框Ｔｅｘｔ３用于显示计算结果（面积）。选择文本框的方法如图２－１８所示。上一页下一页返回任务三计算长方形面积程序设计选择按钮的方法如图２－１９所示。步骤二在“属性窗口”中设置对象的属性对于窗体Ｆｏｒｍ１的Ｃａｐｔｉｏｎ（标题名）属性，标签Ｌａｂｅｌ１、Ｌａｂｅｌ２、Ｌａｂｅｌ３的Ｃａｐｔｉｏｎ属性，文本框Ｔｅｘｔ１、Ｔｅｘｔ２、Ｔｅｘｔ３的Ｔｅｘｔ（文本内容）属性以及按钮Ｃｏｍｍａｎｄ１、Ｃｏｍｍａｎｄ２的Ｃａｐｔｉｏｎ属性，其设置见表２－１。步骤三建立事件过程，编写程序代码本项目中，只需要对“计算”按钮（Ｃｏｍｍａｎｄ１）和“退出”按钮（Ｃｏｍｍａｎｄ２）发生的单击（Ｃｌｉｃｋ）事件编写程序代码。上一页下一页返回任务三计算长方形面积程序设计计算长方形面积的程序设计代码如图２－２０所示。程序详细解析如下：第一行的ＰｒｉｖａｔｅＳｕｂ为私有过程，Ｃｏｍｍａｎｄ１＿Ｃｌｉｃｋ（）为Ｃｏｍｍａｎｄ１（按钮１）的Ｃｌｉｃｋ（单击）事件过程；第二行的Ｄｉｍ语句定义ｘ数据类型为Ｓｉｎｇｌｅ（单精度）；第三行的Ｄｉｍ语句定义ｙ数据类型为Ｓｉｎｇｌｅ（单精度）；第四行将Ｔｅｘｔ１的Ｔｅｘｔ值赋给ｘ；第五行将Ｔｅｘｔ２的Ｔｅｘｔ值赋给ｙ；上一页下一页返回任务三计算长方形面积程序设计步骤四保存和运行工程①保存窗体文件和工程文件，然后单击工具栏上的“启动”按钮，即可采用解释方式来运行程序。②运行后，在“边长”文本框中分别输入数值（如２，３），单击“计算”按钮时，系统会启动事件过程Ｃｏｍｍａｎｄ１＿Ｃｌｉｃｋ进行取数和运算，最后把计算结果显示在“面积”文本框（Ｔｅｘｔ３）中。③单击“结束”按钮，可以启动事件过程Ｃｏｍｍａｎｄ２＿Ｃｌｉｃｋ，执行Ｅｎｄ语句来结束程序的运行。运行效果如图２－２１所示。上一页下一页返回任务三计算长方形面积程序设计一、常用标准控件的基本属性ＶｉｓｕａｌＢａｓｉｃ中的每一个窗体和控件都有很多属性，但所有窗体和大多数标准控件都具有如下基本属性：１Ｎａｍｅ（名称）属性Ｎａｍｅ（名称）属性指所创建对象的名称，在程序设计过程中建议用汉字命名窗体，而控件名称一般使用系统默认名。２Ｃａｐｔｉｏｎ属性Ｃａｐｔｉｏｎ属性用于设置控件上显示的文字内容。３Ｈｅｉｇｈｔ、Ｗｉｄｔｈ、Ｔｏｐ、Ｌｅｆｔ属性上一页下一页返回任务三计算长方形面积程序设计这四个属性用于设置控件的高度、宽度、离屏幕顶部的距离、离屏幕左边的距离。４Ｅｎａｂｌｅｄ属性Ｅｎａｂｌｅｄ属性用于设置对象的可操作性（其值为Ｔｒｕｅ或Ｆａｌｓｅ）。５Ｖｉｓｉｂｌｅ属性Ｖｉｓｉｂｌｅ属性用于设置对象的可见性（其值为Ｔｒｕｅ或Ｆａｌｓｅ）。６Ｆｏｎｔ属性Ｆｏｎｔ属性用于设置对象的字体。７ＦｏｒｅＣｏｌｏｒ属性ＦｏｒｅＣｏｌｏｒ属性用于设置对象的前景颜色（字体颜色）。上一页下一页返回任务三计算长方形面积程序设计８ＢａｃｋＣｏｌｏｒ属性ＢａｃｋＣｏｌｏｒ属性用于设置对象的背景颜色。９ＢｏｒｄｅｒＳｔｙｌｅ属性ＢｏｒｄｅｒＳｔｙｌｅ属性用于设置对象的边框样式（０表示无，１表示单边）。１０Ａｌｉｇｎｍｅｎｔ属性Ａｌｉｇｎｍｅｎｔ属性用于设置对象的对齐方式（０表示左对齐，１表示右对齐，２表示居中）。上一页下一页返回任务三计算长方形面积程序设计１１ＡｕｔｏＳｉｚｅ属性当对象的ＡｕｔｏＳｉｚｅ属性为Ｔｒｕｅ时，自动调整大小；当ＡｕｔｏＳｉｚｅ属性为Ｆａｌｓｅ时，不可调，若正文太长，则自动裁掉。１２ＷｏｒｄＷａｒｐ属性当对象的ＷｏｒｄＷａｒｐ属性为Ｔｒｕｅ时，沿垂直方向显示文本。１３ＴａｂＩｎｄｅｘ属性ＴａｂＩｎｄｅｘ属性用于决定按下Ｔａｂ键时，焦点在各个控件中移动的顺序。上一页返回图２－１标签控件返回图２－２Ｌａｂｅｌ的ＢｏｒｄｅｒＳｔｙｌｅ（边框）属性返回图２－３Ｌａｂｅｌ的ＢｏｒｄｅｒＳｔｙｌｅ属性设置返回图２－４在创建界面时设定Ｆｏｎｔ（字体）属性返回图２－５在界面设置时设定Ａｌｉｇｎｍｅｎｔ（对齐）属性返回图２－６在界面设置时设定Ｖｉｓｉｂｌｅ（可见）属性返回图２－７ＴｅｘｔＢｏｘ（文本框）控件返回图２－８创建ＴｅｘｔＢｏｘ（文本框）返回图２－９在界面设置时指定Ｔｅｘｔ值返回图２－１０复制内容和粘贴内容的界面设计返回图２－１１ＭａｘＬｅｎｇｔｈ（最大长度）属性设置返回图２－１２ＭｕｌｔｉＬｉｎｅ（多行）属性设置返回图２－１３返回图２－１４ＳｃｒｏｌｌＢａｒｓ（滚动条）属性设置返回图２－１５ＧｏｔＦｏｃｕｓ事件程序设计返回图２－１６应用程序用户界面返回图２－１７双击选择标签返回图２－１８双击选择文本框返回图２－１９双击选择按钮返回表２－１程序控件属性设置返回表２－１程序控件属性设置返回图２－２０计算长方形面积的程序设计代码返回图２－２１运行效果返回谢谢观赏项目三按钮框架类控件程序12433任务一掌握按钮框架类控件属性设置任务二我的计算器程序设计任务三掌握ＶｉｓｕａｌＢａｓｉｃ的表达式及运算符用法任务四掌握ＶｉｓｕａｌＢａｓｉｃ的赋值语句与条件语句用法返回任务一掌握按钮框架类控件属性设置【相关知识】一、Ｆｒａｍｅ（框架）控件的属性Ｆｒａｍｅ（框架）控件可以用来对其他控件进行分组，以便用户识别。使用框架控件可以将一个窗体中的各种功能进一步分类，例如，将各种选项按钮控件分隔开。Ｆｒａｍｅ（框架）控件如图３－１所示。在大多数情况下，我们用框架控件对控件进行分组，但是并不响应它的事件，如鼠标单击或双击事件。不过，它的Ｎａｍｅ、Ｃａｐｔｉｏｎ和Ｆｏｎｔ属性是可以被经常修改的。Ｆｒａｍｅ控件的属性值及说明见表３－１。下一页返回任务一掌握按钮框架类控件属性设置二、Ｃｏｍｍａｎｄ（按钮）控件的属性命令按钮（Ｃｏｍｍａｎｄ）控件主要用于响应单击事件，单击命令按钮后即运行某一个程序或某一段代码。Ｃｏｍｍａｎｄ（按钮）控件如图３－２所示。Ｃｏｍｍａｎｄ控件的属性值及说明见表３－２。三、Ｆｒａｍｅ控件的使用Ｆｒａｍｅ控件为控件提供可标识的分组。当需要在同一窗体内建立几组相互独立的控件时，就需要用框架将每一组控件框起来，从而把控件分成几组。举例说明，用Ｆｒａｍｅ控件可以将ＯｐｔｉｏｎＢｕｔｔｏｎ分三组显示，如图３－３所示。用Ｆｒａｍｅ可以美化界面，形成视觉上清晰的感觉。上一页下一页返回任务一掌握按钮框架类控件属性设置四、控件数组的使用１框架内控件的创建方法为了将控件分组，首先需要绘制Ｆｒａｍｅ控件，然后绘制Ｆｒａｍｅ里面的控件，这样就可以将框架和框架里面的控件同时移动，组成一个整体。２控件数组的使用控件数组是一组具有相同的名称、类型和事件过程的控件，同一控件数组中的元素有自己的属性设置值。如Ｌａｂｅｌ（０）、Ｌａｂｅｌ（１）、Ｌａｂｅｌ（２）、…是控件数组，但Ｌａｂｅｌ１、Ｌａｂｅｌ２、Ｌａｂｅｌ３、…就不是控件数组。上一页下一页返回任务一掌握按钮框架类控件属性设置键入第二个控件的名称后，ＶｉｓｕａｌＢａｓｉｃ将显示一个如图３－４所示的对话框，询问是否确实要建立控件数组，单击“是”将建立控件数组，单击“否”将放弃建立控件数组。之后键入其他控件名称时，将不会出现类似的提示框。上一页返回任务二我的计算器程序设计【设计步骤】步骤一建立应用程序用户界面选择新建工程，进入窗体设计器，首先增加一个框架控件Ｆｒａｍｅ１。选中Ｆｒａｍｅ１后，在其中增加一个文本框控件Ｔｅｘｔ１、两个命令按钮数组Ｃｏｍｍａｎｄ１（０）～Ｃｏｍｍａｎｄ１（１０）和Ｃｏｍ⁃ｍａｎｄ２（０）～Ｃｏｍｍａｎｄ２（３）、一个命令按钮Ｃｏｍｍａｎｄ３。各控件排列如图３－６所示。步骤二对象属性设置◆修改Ｆｏｒｍ１的属性：将Ｃａｐｔｉｏｎ改为“我的计算器”，将ＭａｘＢｕｔｔｏｎ（最大化按钮）改为“Ｆａｌｓｅ”，即最大化按钮不可用，调整窗体至合适的大小。下一页返回任务二我的计算器程序设计◆修改Ｔｅｘｔ１的属性：对齐方式（Ａｌｉｇｎｍｅｎｔ）改为“１－Ｒｉｇｈｔ”，文本（Ｔｅｘｔ１）改为“无”。◆修改Ｃｏｍｍａｎｄ１（０）～Ｃｏｍｍａｎｄ１（１０）的属性：标题（Ｃａｐｔｉｏｎ）依次改为“１”、“２”、“３”、“４”、“５”、“６”、“７”、“８”、“９”、“０”、“”。◆修改Ｃｏｍｍａｎｄ２（０）～Ｃｏｍｍａｎｄ２（３）的属性：标题（Ｃａｐｔｉｏｎ）依次改为“＋”、“－”、“×”、“÷”。◆修改Ｃｏｍｍａｎｄ３的属性：标题（Ｃａｐｔｉｏｎ）改为“＝”。程序对象的属性见表３－３。界面设置效果如图３－７所示。步骤三程序代码编写双击窗体，打开代码窗口，进行代码的编写。上一页下一页返回任务二我的计算器程序设计【编程思想】用计算器进行运算时，至少需要存放两个操作数和一个运算符，所以需要声明三个变量，另外，需要设置一个开关变量来指示运算符的按下情况，从而根据情况处理运算的数据：①处理用户连续按下运算符而不按下等号的情况；②处理用户按下等号进行计算的情况。在“通用”过程中“声明”变量：DimdAsBoolean’是否第一次按运算符DimaAsString’存放上次按的运算符DimxAsDouble’存放第一个操作数DimyAsDouble’存放第二个操作数通用过程如图３－８所示。上一页下一页返回任务二我的计算器程序设计一、命令按钮控件数组Ｃｏｍｍａｎｄ１（）的Ｃｌｉｃｋ事件代码单击０～９按键以及小数点按键时，需要将用户单击的内容显示在计算器中，可以使用Ｃｏｍｍａｎｄ１（Ｉｎｄｅｘ）Ｃａｐｔｉｏｎ来获取相应按键的字符信息。每次用户按下数字键和小数点键时，系统都要调用Ｃｏｍｍａｎｄ１（）的Ｃｌｉｃｋ事件；当用户多次按下字符键时，就需要暂存用户以前按下的结果，因此可以设置一个临时变量ａ暂存用户最近按下的数字键，相应的程序为：a=Text1

Text’保存以前按下的内容Text1

Text=a＆Command1（Index）Caption’和现在按下的键的内’容连接在一起显示在text1文本框中，其中＆为字符连接符。上一页下一页返回任务二我的计算器程序设计【编程思想】运算符键的使用有两种情况：一种是用户第一次按下运算符号键，一种是用户不是第一次按下运算符键。（１）用户第一次按下运算符号键当用户第一次按下运算符号键的时候，需要做两个处理：①把ｔｅｘｔ１中内容保存为第一个操作数，即ｘ＝Ｔｅｘｔ１Ｔｅｘｔ②将运算符号的Ｉｎｄｅｘ值保存在ａ变量中，在获取第二个操作数后进行运算处理，对应的代码为ａ＝Ｉｎｄｅｘ；上一页下一页返回任务二我的计算器程序设计（２）用户不是第一次按下运算符键当用户多次按下运算符键而没有按下等号时，需要进行计算处理，此时包括三项工作：①保存第二个操作数到ｙ变量中，以便计算使用；②根据ａ中保存的运算符的Ｉｎｄｅｘ值，执行相应的计算；③将计算结果保存在ｘ中，作为下一次运算的第一操作数。三、编写命令按钮Ｃｏｍｍａｎｄ３的Ｃｌｉｃｋ事件过程【编程思想】用户单击等号以后需要做的事情包括如下三步：①保存第二个操作数到ｙ变量中，以便计算时使用；上一页下一页返回任务二我的计算器程序设计②使用ａ中保存的运算符的Ｉｎｄｅｘ值，执行相应的计算；③将计算结果保存在ｘ中，作为下一次运算的第一操作数；④把存放第二个操作数的变量ｙ清除，把保存运算符的变量ａ清除，以便下一次接收新的内容和进行下一次计算。将ｄ设置为ｆａｌｓｅ，表示已经按下过运算符。程序执行效果如图３－９所示。上一页返回任务三掌握ＶｉｓｕａｌＢａｓｉｃ的表达式及运算符用法表达式的类型由运算符的类型决定，在ＶｉｓｕａｌＢａｓｉｃ中常用的运算符和表达式有四类。第一类：算术运算符和算术表达式算术运算符是最常用的运算符，用来对数值型数据执行简单的算术运算。算术运算符的优先级见表３－４。运算顺序根据优先级从高到低进行，但括号可以改变优先级的高低，即当括号存在时，括号里的运算优先。数学表达式转换为ＶｉｓｕａｌＢａｓｉｃ算术表达式的形式见表３－５。下一页返回任务三掌握ＶｉｓｕａｌＢａｓｉｃ的表达式及运算符用法第二类：字符串运算符和字符串表达式ＶｉｓｕａｌＢａｓｉｃ中字符串运算符有两个，分别是“＆”和“＋”运算符。它们都是双目运算符，作用是把两个字符串连接在一起，生成一个较长的字符串。由字符串运算符与运算量构成的表达式称为字符串表达式。一般情况下，“＆”和“＋”运算符在连接两个字符串时，功能是等价的，但是在某些时候却有所不同，具体用法见表３－６，实际使用情况见表３－７。第三类：关系运算符和关系表达式上一页下一页返回任务三掌握ＶｉｓｕａｌＢａｓｉｃ的表达式及运算符用法关系运算符也称作比较运算符，用来对两个表达式的值进行比较。比较的结果为逻辑值，如果关系成立，则返回Ｔｒｕｅ，否则返回Ｆａｌｓｅ。在ＶｉｓｕａｌＢａｓｉｃ中用－１和０表示Ｔｒｕｅ和Ｆａｌｓｅ。在ＶｉｓｕａｌＢａｓｉｃ中，各种关系运算符见表３－８。第四类：逻辑运算符和逻辑表达式逻辑运算符是用来执行逻辑运算的运算符。常用的逻辑运算符有Ａｎｄ（与）、Ｎｏｔ（非）和Ｏｒ（或），见表３－９。逻辑表达式是用逻辑运算符将逻辑变量连接起来形成的式子。上一页返回任务四掌握ＶｉｓｕａｌＢａｓｉｃ的赋值语句与条件语句用法一、赋值语句（ＩｎｐｕｔＢｏｘ函数）ＶｉｓｕａｌＢａｓｉｃ具有结构化程序设计的三种结构，即顺序结构、选择结构和循环结构，这三种结构是程序设计的基础。顺序结构中各语句按出现的先后次序执行，一般的程序设计语言中，顺序结构的语句主要是赋值语句、输入／输出语句等。变量名＝表达式赋值语句的作用是计算右边表达式的值，然后赋给左边的变量。给变量赋值和设定属性是ＶｉｓｕａｌＢａｓｉｃ编程中常见的两个任务.下一页返回任务四掌握ＶｉｓｕａｌＢａｓｉｃ的赋值语句与条件语句用法赋值符号左边只能是变量，不能是常量、常数符号、表达式，下面的赋值语句均是错误的：Day（）=m+n’错误，左边不能是表达式（函数）9=sqr（s）+m+n’错误，左边不能是常量二、条件程序结构条件程序结构有两种：Ｉｆ…Ｅｌｓｅ语句和ＳｅｌｅｃｔＣａｓｅ…语句。计算机要处理的问题往往是复杂多变的，因此仅采用顺序结构是不够的，必须利用选择结构等来解决实际应用中的各种问题。ＶｉｓｕａｌＢａｓｉｃ中提供了多种形式的条件语句来实现选择结构，如Ｉｆ条件语句和Ｓｅｌｅｃｔ情况语句等，它们都是通过对条件进行判断，然后根据判断结果选择执行相应的分支的。上一页下一页返回任务四掌握ＶｉｓｕａｌＢａｓｉｃ的赋值语句与条件语句用法１第一种分支语句：Ｉｆ语句Ｉｆ语句分为三种结构：单分支结构、双分支结构和多分支结构，分别介绍如下。（１）Ｉｆ…Ｔｈｅｎ语句（单分支结构）If<表达式>Then语句块（可以是一句或多句语句）EndIf或If<表达式>Then<语句>上一页下一页返回任务四掌握ＶｉｓｕａｌＢａｓｉｃ的赋值语句与条件语句用法其中，表达式可以为关系表达式、逻辑表达式、算术表达式和字符表达式，表达式的值按非零为Ｔｒｕｅ、零为Ｆａｌｓｅ进行判断。单分支ＩＦ语句的执行流程如图３－１０所示。多分支ＩＦ语句的作用是根据不同表达式的值确定执行哪个语句块，其执行流程如图３－１１所示。（４）Ｉｆ语句的嵌套Ｉｆ语句的嵌套是指Ｉｆ或Ｅｌｓｅ后面的语句块中又包含Ｉｆ语句，其结构如下：If表达式1ThenIf表达式2Then…EndIf…EndIf上一页返回图３－１Ｆｒａｍｅ控件返回表３－１Ｆｒａｍｅ控件的属性表返回图３－２Ｃｏｍｍａｎｄ控件返回表３－２Ｃｏｍｍａｎｄ控件的属性表下一页表３－２Ｃｏｍｍａｎｄ控件的属性表返回图３－３Ｆｒａｍｅ控件示例返回图３－４建立控件数组提示返回图３－５设计按钮数组界面返回图３－６计算器界面设计返回表３－３设计程序对象属性返回图３－７修改属性后的界面返回图３－８在通用部分定义全局变量返回图３－９程序运算结果图返回表３－４算术运算符返回表３－５数学表达式转换为ＶＢ表达式返回表３－６“＆”和“＋”运算符的用法返回表３－７“＆”和“＋”示例返回表３－８关系运算符返回表３－８关系运算符返回表３－９逻辑运算符返回图３－１０单分支Ｉｆ语句执行流程返回图３－１１多分支Ｉｆ语句执行流程返回谢谢观赏项目四多媒体类控件程序12433任务一多媒体控件的添加任务二控件界面设计及属性设置任务三多媒体程序代码编写任务四屏幕保护程序的制作返回任务一多媒体控件的添加【控件设计】首先启动ＶｉｓｕａｌＢａｓｉｃ6.0中文版，在弹出的“新建工程”对话框中选择“标准ＥＸＥ”，即开发标准应用程序文件，如图４－１所示。单击“打开”按钮，将出现工程１界面及Ｆｏｒｍ１，如图４－２所示。图４－２就是上一项目中接触过的ＶｉｓｕａｌＢａｓｉｃ集成开发环境，其界面布局如下：①左侧是ＶｉｓｕａｌＢａｓｉｃ的控件工具箱，里面的各种图标是开发程序时经常用到的标准控件。下一页返回任务一多媒体控件的添加②正中间是窗体编辑器（Ｆｏｒｍ１），又称对象窗口，程序界面的大部分都是在窗体编辑器中设计的。③右侧上方部分是工程资源管理器，它能让我们对整个工程进行整体性的管理。④右侧中间部分是属性窗口，陈列着程序中所涉及的各种窗体和控件的属性。⑤右侧下方部分是窗体布局区，它能够调节程序运行时窗体在屏幕中的位置。接下来添加ＡｃｔｉｖｅＭｏｖｉｅ控件。首先，在工具箱上添加一个新控件ＡｃｔｉｖｅＭｏｖｉｅ，这是个能播放多媒体动画的控件。用右键单击工具箱，此时会弹出一个小窗口（快捷菜单），单击“部件”，如图４－３所示。上一页下一页返回任务一多媒体控件的添加单击后，在屏幕正中会出现一个部件对话框（图４－４），这里陈列着许多未在工具箱中列出的控件。我们需要添加一个ＡｃｔｉｖｅＭｏｖｉｅ控件：单击滚动条，找到ＭｉｃｒｏｓｏｆｔＡｃｔｉｖｅＭｏｖｉｅＣｏｎｔｒｏｌ，单击复选框选定。如果部件对话框中没有发现这个控件，那么可以单击图４－４里面的浏览按钮，选取ＡＭＯＶＩＥＯＣＸ，单击“打开”，如图４－５所示。如果还是没有ＡＭＯＶＩＥＯＣＸ，则需要通过上网进行下载，网站地址为：ｈｔｔｐ：／／ｗｗｗｏｃｘｄｕｍｐｃｏｍ／ｄｏｗｎｌｏａｄ－ｏｃｘ－ｆｉｌｅｓ＿ｎｅｗｐｈｐ／ｏｃｘ⁃ｆｉｌｅｓ／Ａ／ＡＭＯＶＩＥＯＣＸ／５０１７００３２７６／ｄｏｗｎｌｏａｄｈｔｍｌ。选择ＡＭＯＶＩＥＯＣＸ后，会出现部件对话框，找到ＭｉｃｒｏｓｏｆｔＡｃｔｉｖｅＭｏｖｉｅＣｏｎｔｒｏｌ，单击“确定”即可。上一页返回任务二控件界面设计及属性设置选中图４－４里的ＭｉｃｒｏｓｏｆｔＡｃｔｉｖｅＭｏｖｉｅＣｏｎｔｒｏｌ复选框，单击“确定”后，控件工具箱上会新增一个小图标，表示ＡｃｔｉｖｅＭｏｖｉｅ控件已经添加成功，如图４－６所示。现在，我们开始设计程序。首先设置控件的属性：双击工具箱中的ＡｃｔｉｖｅＭｏｖｉｅ控件图标，将ＡｃｔｉｖｅＭｏｖｉｅ控件放到正中的Ｆｏｒｍ１窗体（窗体编辑器）中，如图４－７所示。如图４－８所示，属性窗口里列出了这个控件的各种属性，我们需要改变它的一些属性，需要改变的属性见表４－１。下一页返回任务二控件界面设计及属性设置ＡｃｔｉｖｅＭｏｖｉｅ控件属性设置如图４－８所示。单击属性窗口的下拉菜单，选取Ｆｏｒｍ１Ｆｏｒｍ，再改变窗体Ｆｏｒｍ１的属性，见表４－２。Ｆｏｒｍ１控件属性设置如图４－９所示。用鼠标将窗体上的ＡｃｔｉｖｅＭｏｖｉｅ控件调整到与窗体同等大小，如图４－１０所示；然后在窗体布局区用鼠标将Ｆｏｒｍ１窗体调整至正中，如图４－１１所示。上一页返回任务三多媒体程序代码编写一、程序代码下面开始编写程序代码。单击工程资源管理器的“查看代码”按钮，如图４－１２所示。出现的窗口就是代码编辑器，它又称代码窗口，如图４－１３所示，我们的程序代码就在这里进行编写的。如图４－１３所示，代码窗口左侧列表框称为对象选择框，陈放着本程序的所有对象；代码窗口右侧列表框称为事件选择框，列表框里为对象的各个事件。当在左侧的对象选择框中选取Ｆｏｒｍ时，右侧的事件选择框里的事件相应地变为Ｌｏａｄ，同时代码窗口空白处出现两行代码，它们分别表示子程序Ｆｏｒｍ＿Ｌｏａｄ的首、尾两部分，而Ｆｏｒｍ＿Ｌｏａｄ则是当窗体刚调入内存时所执行的一个子程序，如图４－１４和图４－１５所示。下一页返回任务三多媒体程序代码编写在代码窗口编辑代码。当输入代码“ＡｃｔｉｖｅＭｏｖｉｅ１”时，窗口将弹出一个列表框，列出对象ＡｃｔｉｖｅＭｏｖｉｅ１的全部属性、方法和事件，如图４－１６所示。此时选择代码“ＡｃｔｉｖｅＭｏｖｉｅ１ＦｉｌｅＮａｍｅ”，在其后再键入代码“＝ａｐｐ”，在弹出的列表框中选取Ｐａｔｈ属性，如图４－１７所示。在上述代码之后再键入代码“＆”＼ＭｙＭｏｖｉｅｍｐｇ“”，如图４－１８所示，其中ＭｙＭｏｖｉｅｍｐｇ是一个多媒体文件，它与这个ＶｉｓｕａｌＢａｓｉｃ程序在同一级目录下，能通过所编的程序放映出来。继续在代码窗口进行操作。在对象选择框中选取ＡｃｔｉｖｅＭｏｖｉｅ１，在事件选择框中选取ＰｏｓｉｔｉｏｎＣｈａｎｇｅ，即位置发生改变的事件，如图４－１９所示。上一页下一页返回任务三多媒体程序代码编写然后，在窗口出现的代码之后添加代码“ＭｓｇＢｏｘ（”谢谢您的观赏！“）”，这一行代码表示当ＡｃｔｉｖｅＭｏｖｉｅ１对象出现位置改变事件时，执行消息框ＭｓｇＢｏｘ（“谢谢您的观赏！”），即弹出一个消息对话框，提示“谢谢您的观赏！”，如图４－２０所示。二、保存与编译现在对上述程序进行存盘。单击“文件”，在“文件”的下拉窗口中单击“保存工程”，如图４－２１所示。在保存工程时，有两个文件需要保存，一个是名为“工程１ｖｂｐ”的项目文件，如图４－２２所示；另一个是名为“Ｆｏｒｍ１ｆｒｍ”的窗体文件，如图４－２３所示。一个ＶｉｓｕａｌＢａｓｉｃ程序至少包含这两个文件，即项目文件和窗体文件缺一不可。上一页下一页返回任务三多媒体程序代码编写最后，将所编程序编译成可执行文件。编译的作用是将程序代码翻译成计算机能执行的语言，这样程序就能在ＶｉｓｕａｌＢａｓｉｃ6.0以外的环境中运行了。单击“文件”菜单下的“生成工程１.ｅｘｅ”即可生成相应的可执行文件，如图４－２４所示。上一页返回任务四屏幕保护程序的制作任务三中的多媒体程序还可以进一步开发，例如，将它改变成一个你所喜爱的屏幕保护程序。首先，使这个屏保程序的窗体是全屏的。将Ｆｏｒｍ１的ＷｉｎｄｏｗＳｔａｔｅ属性设置为２，它的功能是在程序运行时使窗体为全屏，如图４－２５所示。为使鼠标在屏幕保护程序运行中不可见，需要改动代码。单击“查看代码”按钮，同时关闭工具箱并将代码设计窗口适当放大，以便输入程序代码。如图４－２６所示，在通用＿声明区键入以下代码：’声明SetCursorPos函数过程，函数功能是把光标移到屏幕的指定位置。PrivateDeclareFunctionSetCursorPosLib"user32"（ByValXAsLong，ByValYAsLong）AsLong下一页返回任务四屏幕保护程序的制作’强制声明变量OptionExplicit如图４－２７所示，在Ｆｏｒｍ＿Ｌｏａｄ中键入以下代码：为实现在按任意键以及单击或者移动鼠标后，电脑退出屏幕保护程序，首先将Ｆｏｒｍ１的ＫｅｙＰｒｅｖｉｅｗ设为Ｔｕｒｅ，如图４－２８所示。为使按任意键后屏幕保护程序退出，在Ｆｏｒｍ＿ＫｅｙＤｏｗｎ中添加以下代码，并键入Ｅｎｄ，如图４－２９所示。PrivateSubForm_KeyDown（KeyCodeAsInteger，ShiftAsInteger）EndEndSub上一页下一页返回任务四屏幕保护程序的制作为使鼠标单击后屏幕保护程序退出，在Ｆｏｒｍ＿ＭｏｕｓｅＤｏｗｎ中添加以下代码，并键入Ｅｎｄ，如图４－３０所示。PrivateSubForm_MouseDown（ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle）EndEndSub为使鼠标移动后屏幕保护程序退出，在Ｆｏｒｍ＿ＭｏｕｓｅＭｏｖｅ中添加以下代码，如图４－３１所示为使屏幕保护动画能够循环播放，需要在ＡｃｔｉｖｅＭｏｖｉｅ１＿ＰｏｓｉｔｉｏｎＣｈａｎｇｅ中将下面两行注释掉。’MsgBox（"谢谢观赏！"）’EndActiveMovie1

FileName=App

Path＆"\MyMovie

mpg"接下来，对本次任务中所编代码进行编译。上一页下一页返回任务四屏幕保护程序的制作注意：为使编译出的文件成为屏幕保护程序，要在“工程１”后加上扩展名“ｓｃｒ”，如图４－３２所示。另外，如果一个程序中含有多个窗体或模块，则可以通过右上角的工程资源管理器来对它们进行切换。此外，如果某个部件被关闭，可以通过视图菜单来将它打开，如图４－３３所示。上一页返回图４－１标准ＥＸＥ工程的建立返回图４－２ＶＢ集成开发环境返回图４－３选择快捷菜单里的部件选项返回图４－４添加一个ＡｃｔｉｖｅＭｏｖｉｅ控件返回图４－５添加ＡＭＯＶＩＥＯＣＸ选项返回图４－６ＡｃｔｉｖｅＭｏｖｉｅ控件的添加返回图４－７将ＡｃｔｉｖｅＭｏｖｉｅ控件添加到Ｆｏｒｍ１窗体返回表４－１ＡｃｔｉｖｅＭｏｖｉｅ控件属性设置返回图４－８ＡｃｔｉｖｅＭｏｖｉｅ控件属性设置返回表４－２Ｆｏｒｍ１控件属性设置返回图４－９Ｆｏｒｍ１控件属性设置返回图４－１０将ＡｃｔｉｖｅＭｏｖｉｅ控件调整到与窗体同等大小返回图４－１１在窗体布局区用鼠标将

Ｆｏｒｍ１窗体调整至正中返回图４－１２工程资源管理器的查看代码按钮返回图４－１３代码窗口返回图４－１４代码窗口的对象选择返回图４－１５代码窗口的相关说明返回图４－１６输入“ＡｃｔｉｖｅＭｏｖｉｅ１”时弹出的列表框返回图４－１７在弹出的列表框中选取Ｐａｔｈ属性返回图４－１８Ｆｏｒｍ窗体加载时的代码输入返回图４－１９选择ＡｃｔｉｖｅＭｏｖｉｅ１对象的ＰｏｓｉｔｉｏｎＣｈａｎｇｅ事件返回图４－２０ＡｃｔｉｖｅＭｏｖｉｅ１对象的ＰｏｓｉｔｉｏｎＣｈａｎｇｅ事件代码编写返回图４－２１保存工程返回图４－２２工程文件的保存返回图４－２３窗体文件的保存返回图４－２４生成工程１ｅｘｅ返回图４－２５将Ｆｏｒｍ１的ＷｉｎｄｏｗＳｔａｔｅ属性设置为２返回图４－２６通用＿声明区键入代码返回图４－２７Ｆｏｒｍ＿Ｌｏａｄ（）事件的代码返回图４－２８设置Ｆｏｒｍ１的ＫｅｙＰｒｅｖｉｅｗ设为Ｔｕｒｅ返回图４－２９编写Ｆｏｒｍ＿ＫｅｙＤｏｗｎ的程序代码返回图４－３０编写Ｆｏｒｍ＿ＭｏｕｓｅＤｏｗｎ的程序代码返回图４－３１编写Ｆｏｒｍ＿ＭｏｕｓｅＭｏｖｅ的程序代码返回图４－３２工程文件另存为ｓｃｒ类型返回图４－３３通过视图菜单打开返回谢谢观赏项目五单复选列表框类控件程序12433任务一掌握复选列表框类控件属性设置任务二字体格式设置、程序界面及属性设置任务三字体格式设置的程序代码设计任务四掌握字体格式设置程序相关知识返回任务一掌握复选列表框类控件属性设置一、ＯｐｔｉｏｎＢｕｔｔｏｎ（单选框）控件的属性在ＶｉｓｕａｌＢａｓｉｃ编程中，经常遇到需要进行选择的情况，如从几个选项中选择一个或多个。这时，可以采用ＶｉｓｕａｌＢａｓｉｃ内部控件中的选择类控件———单选按钮或复选框。单选按钮控件（ＯｐｔｉｏｎＢｏｔｔｏｎ）的主要功能是让用户在一组相关的选项中选择其中一项。单选按钮必须成组出现，用户在一组单选按钮中必须并且只能选择一项。当某一项被选定后，其左边的圆圈中出现一个黑点。ＯｐｔｉｏｎＢｕｔｔｏｎ（单选按钮）控件如图５－１所示。１常用属性（１）Ｃａｐｔｉｏｎ属性设置单选按钮的文本注释内容，即单选按钮边上的文本标题。下一页返回任务一掌握复选列表框类控件属性设置（２）Ｖａｌｕｅ属性表明单选按钮是否被选中，选中时Ｖａｌｕｅ值为Ｔｒｕｅ，否则为Ｆａｌｓｅ，系统会根据操作情况来自动改变Ｖａｌｕｅ属性值。使用单选按钮属性组时，当一个单选按钮被选中后，其余的会自动关闭。（３）Ａｌｉｇｎｍｅｎｔ属性：设置标题和按钮的显示位置。其中，０表示控件钮在左边，标题显示在右边；１表示控件钮在右边，标题显示在左边。ＯｐｔｉｏｎＢｕｔｔｏｎ（单选按钮）控件的属性值及说明见表５－１。上一页下一页返回任务一掌握复选列表框类控件属性设置２常用事件单选按钮使用最多的是Ｃｌｉｃｋ事件。当程序运行时，单击单选按钮，或在代码中改变单选按钮的Ｖａｌｕｅ值（从Ｆａｌｓｅ改为Ｔｒｕｅ），都将触发Ｃｌｉｃｋ事件。在应用程序中，可以创建一个事件过程来检测控件对象的Ｖａｌｕｅ属性值，再根据检测结果执行相应的操作。二、ＣｈｅｃｋＢｏｘ（复选框）控件的属性ＣｈｅｃｋＢｏｘ（复选框）控件的主要功能是从用户处获取“是”或“否”的信息。复选框可以列出可供用户选择的多个选择项，而用户根据需要选择其中的一项或多项，或者不作选择。复选框与单选按钮在使用方面的主要区别在于：一组单选按钮中只能选中一项，而在复选框中可以同时选中多个选项。ＣｈｅｃｋＢｏｘ（复选框）控件如图５－３所示。上一页下一页返回任务一掌握复选列表框类控件属性设置１常用属性（１）Ｃａｐｔｉｏｎ属性设置复选框的文本注释内容，即复选框边上的文本标题。（２）Ｖａｌｕｅ属性表示复选框的状态，有３种取值，其中，０表示未选中（默认值），１表示选中，２表示不可用（灰色显示）。（３）Ａｌｉｇｎｍｅｎｔ属性设置标题和按钮的显示位置。其中，０表示控件钮在左边，标题显示在右边；１表示控件钮在右边，标题显示在左边。ＣｈｅｃｋＢｏｘ（复选框）控件的属性值及说明见表５－２。上一页下一页返回任务一掌握复选列表框类控件属性设置２常用事件复选按钮可响应的事件与单选按钮的基本相同，复选按钮使用最多的也是Ｃｌｉｃｋ事件。当程序运行时，单击复选按钮，或在代码中改变复选按钮的Ｖａｌｕｅ值（从Ｆａｌｓｅ改为Ｔｒｕｅ），都将触发Ｃｌｉｃｋ事件，进行复项选择。在应用程序中，还可以创建一个事件过程来检测控件对象的Ｖａｌｕｅ属性值，再根据检测结果执行相应的操作。三、ＬｉｓｔＢｏｘ（列表框）控件的使用列表框和组合框都是ＶｉｓｕａｌＢａｓｉｃ工具箱中的标准控件，它们都能提供若干个选项，供用户任意选择。这两种控件的特点是都能为用户提供大量的选项，并且占用屏幕空间少，操作简单、方便。上一页下一页返回任务一掌握复选列表框类控件属性设置ＬｉｓｔＢｏｘ（列表框）控件如图５－５所示。Ｓｔｙｌｅ属性用来设置列表框控件的风格，其中０表示标准风格，１表示复选框风格，如图５－６所示。ＬｉｓｔＢｏｘ（列表框）控件的属性值及说明见表５－３。２常用事件列表框能够响应Ｃｌｉｃｋ、ＤｂＣｌｉｃｋ等事件。３常用方法列表框中的表项可以通过Ｌｉｓｔ属性进行设置，也可以在程序中用ＡｄｄＩｔｅｍ方法来添加、用ＲｅｍｏｖｅＩｔｅｍ方法或Ｃｌｅａｒ方法来删除。（１）ＡｄｄＩｔｅｍ方法语句形式如下：上一页下一页返回任务一掌握复选列表框类控件属性设置对象AddItemitem[，index]若省略“索引”参数，则该表项将自动添加在最后一个表项的后面。（２）ＲｅｍｏｖｅＩｔｅｍ方法ＲｅｍｏｖｅＩｔｅｍ方法用来删除一个（ｉｎｄｅｘ）列表项，其语句形式如下：对象RemoveItemindex（３）Ｃｌｅａｒ方法Ｃｌｅａｒ方法用于清除列表框中所有的列表项，语句形式如下：对象Clear上一页下一页返回任务一掌握复选列表框类控件属性设置四、ＣｏｍｂｏＢｏｘ（组合框）在列表框中，用户无法输入列表中不包括的内容。如果用户需要输入列表中未包括的内容，就要用到组合框。ＣｏｍｂｏＢｏｘ（组合框）是另一种特殊的列表框，它是文本框和列表框的组合，同时兼具文本框的键盘输入及列表框的鼠标选取功能，因此应用十分广泛。ＣｏｍｂｏＢｏｘ（组合框）控件如图５－７所示。１常用属性组合框除了具有列表框和文本框的大部分属性和方法之外，还有一些自己的属性。上一页下一页返回任务一掌握复选列表框类控件属性设置（１）Ｓｔｙｌｅ属性用来设置下拉列表框的三种类型，如图５－８所示。（２）Ｔｅｘｔ属性表示用户所选定项目的文本或直接从文本框输入的文本。ＣｏｍｂｏＢｏｘ（组合框）控件的属性值及说明见表５－４。上一页返回任务二字体格式设置、程序界面及属性设置步骤一建立应用程序用户界面选择“新建工程”，进入窗体设计器，首先增加三个组合框（Ｃｏｍｂｏ１、Ｃｏｍｂｏ２、Ｃｏｍｂｏ３）、一个列表框（Ｌｉｓｔ１）和三个框架控件（Ｆｒａｍｅ１、Ｆｒａｍｅ２、Ｆｒａｍｅ３）。然后，选中Ｆｒａｍｅ１，在其中增加三个单选按钮数组Ｏｐｔｉｏｎ１（０）、Ｏｐｔｉｏｎ１（１）、Ｏｐｔｉｏｎ１（２）；选中Ｆｒａｍｅ２，在其中增加两个复选框按钮数组Ｃｈｅｃｋ１（０）、Ｃｈｅｃｋ１（１）；选中Ｆｒａｍｅ３，在其中增加一个文本框按钮（Ｔｅｘｔ１）。最后，增加四个标签控件（Ｌａｂｅｌ１、Ｌａｂｅｌ２、Ｌａｂｅｌ３、Ｌａｂｅｌ４），用来说明其他控件的名称。各控件排列如图５－９所示。下一页返回任务二字体格式设置、程序界面及属性设置控件数组是由一组类型相同的控件组成的，这些控件共用一个相同的控件名，并且具有相同的属性设置。控件数组中每个控件都有唯一的索引号即下标，下标值由Ｉｎｄｅｘ属性指定。控件的Ｎａｍｅ属性必须相同。步骤二设置对象属性修改Ｆｏｒｍ１的属性：Ｃａｐｔｉｏｎ改为“字体格式设置程序”，ＭａｘＢｕｔｔｏｎ（最大化按钮）改为Ｆａｌｓｅ，即最大化按钮不可用；调整窗体到一般对话框大小。修改ＣｏｍｂｏＢｏｘ的属性：清空Ｃｏｍｂｏ１、Ｃｏｍｂｏ２、Ｃｏｍｂｏ３的Ｔｅｘｔ内容，留空；将Ｃｏｍｂｏ３的Ｓｔｙｌｅ属性改为１－ＳｉｍｐｌｅＣｏｍｂｏ。修改ＬｉｓｔＢｏｘ的属性：Ｌｉｓｔ属性置为空。修改Ｆｒａｍｅ属性：Ｆｒａｍｅ１的Ｃａｐｔｉｏｎ改为“颜色”，Ｆｒａｍｅ２的Ｃａｐｔｉｏｎ改为“效果”，Ｆｒａｍｅ３的Ｃａｐｔｉｏｎ改为“预览效果”。上一页下一页返回任务二字体格式设置、程序界面及属性设置修改ＯｐｔｉｏｎＢｕｔｔｏｎ单选按钮属性：Ｏｐｔｉｏｎ１（０）、Ｏｐｔｉｏｎ１（１）、Ｏｐｔｉｏｎ１（２）的