基于VB语言课程的案例教学法
摘要： 该文主要探讨在高校计算机Visual Basic程序设计课程中引入案例教学法的目的意义、理论依据和基本特征，探索了案例教学法的框架结构和实施步骤，以及案例教学法的评价问题。案例教学改变了以讲授知识为主的传统教学模式，可以充分发挥学生的主观能动性及创造性。通过VB案例教学，让学生通过自己的观察、分析和编程实践，培养其提出问题、分析问题和解决问题的能力。
关键词：Visual Basic程序设计;案例教学;策略
当前，社会信息化不断向纵深发展，各行各业的信息化进程不断加速。在普通高校，大学计算机基础教育受到高度重视，结合各专业课程的需求及人才培养的目标，计算机基础教学继续不断完善。作为非计算机专业“大学计算机基础”课程的后续课程，高级语言程序设计的教学目标是使学生掌握程序设计的一般性规律，具有阅读程序、理解程序的能力，并能把程序设计方法应用到本专业与相关领域，培养学生的程序设计能力。
Visual Basic由于语法简单，以其图形化的界面和事件驱动编程机制大大简化了程序设计的复杂度，学生容易上手，可以高效开发出标准的Windows应用程序，成为非计算机专业高级语言程序设计课程的首选。
在传统的“VB 程序设计”教学中，教师大多采用“以教为主”的讲授教学法。信息单向传输，学生被动接受，尽管可以让学生初步接受VB 语言的基本概念、语法结构等基础知识，却不能很好地提高学生的编程动手能力，不能较好地培养学生提出问题、分析问题、解决问题的能力。
案例教学法是通过对一个案例或者一个情景的描述进行思考以掌握基本知识和培养学生能力的一种教学方法[1]。案例教学法可以充分发挥教师的主导作用，突出学生的主体地位，改变“以教为主”为“以学为主”或“学教并重”，改变重视教学的结果为重视教学的过程或过程和结果并重。在教学过程中，针对教学中的难点，尤其是涉及到程序结构和一些常用算法，运用案例教学法对提高学生兴趣和教学效果具有较大的作用。
1 VB案例教学的理论依据和特征
成立于1908年，被誉为商界“西点军校” 的哈佛商学院之所以能够培养出众多有影响力的企业家和职业经理人，与其独特的案例教学模式密不可分。
布鲁纳认为，应该培养学生提出假设、推测等解决问题的能力。案例教学是以案例为中心的分析、讨论、总结的教学过程。案例教学法符合布鲁纳教学理论。
现代教育观是反映现代社会发展对人才培养的要求，反映当代教育需求的教育观。现代教学强调学生是认识的主体，必须发展学生的主体性。所谓主体性，是学生在教师指导下积极主动地进行学习时表现出来的一种主观能动性。
建构主义理论认为，学习活动不是由教师向学生传递知识，而是学生根据外在信息，通过自己的背景知识，建构自己知识的过程。人类学习知识和积累技能的过程都是“从简单到复杂, 从形象到逻辑, 从感性到理性。”在这个过程中，学生不是被动的信息吸收者和刺激接受者，学习过程也不仅仅是信息的输入、存储和提取，而是新旧经验之间的相互作用过程[2]。
案例教学具有情境性、主体性、互动性、问题性、实践性五大特征[2-3]。
教师指导学生，选择身边案例作为课程学习的切入点，创设有挑战性的问题情境。引导学生逐步探讨所讲授的知识，将枯燥的理论知识贯穿在每一次案例中，形成学生自主学习、自主实践的空间。
为了解决案例内隐或外显的问题，学生个体或群组自主分析和研究案例资料，不断地从教学案例中感知、提取信息，进行“交互”。学生个体之间相互争辩、讨论、交流，对问题可以形成更丰富、 更深刻的理解，从而形成问题解决方案。
在整个案例教学过程中，学生的自学习惯和自学能力不自觉地得到提高，并亲身感受到程序设计的实际价值，提高了学习兴趣及程序设计的内在动力，使学生的创造潜能得到充分发挥。
2 VB案例教学法的框架结构
在VB程序设计课程教学中，一个案例一般就是一个软件项目。VB案例教学是师生双方通过共同实施一个较为完整的软件项目而进行的[1]。
VB程序设计课程的案例教学应遵循软件工程学的基本原理和课程教学的基本规律，并将两者有机结合。区别于一般的零碎实例教学，VB案例教学法将一个较为完整的软件项目贯穿在VB课程教学中。
作为教学案例的项目被分解为一个个小的子项目，将新的教学内容融入到一个个子项目中。在案例教学中，学生通过一个个子项目的设计和实现，加深了对新概念、新知识的理解和运用。VB案例教学实现了自顶向下、逐步细化的软件开发过程与学生知识结构的构建过程的有机统一。
VB案例教学法的教学过程可通过如图1所示的框架结构进行描述。
VB案例教学以案例项目的分解、子项目的分析、子项目的设计实现和子项目的扩展为轴心，教师的主导教学和学生的自主学习为两翼，对称平行推进。
3 VB案例教学法的实施
案例教学有效实施的一个重要的保障就是有大量生动、丰富和新鲜的案例。多元化的案例来源是案例教学成功的基础，校企合作、校际合作、软件项目实践、教师平时的案例积累、教学课题组成员建的交流、师生互动交流等都可成为案例的积累形式。
在案例教学的案例准备阶段，教师应根据不同专业、不同层次学生的实际需求，选择实用型强、易于扩展的VB典型性案例。对于学生自己准备的、反映兴趣爱好的个性化案例，教师尤其应加以重视和引导。案例成果可以采用案例数据库形式存储。
案例教学开始前，在教师指导下，学生按3~5人为单位，自主结合进行分组，并保持一定的稳定性。案例小组内实行组长负责制，组长的职责是制定计划、任务分工、人员组织协调、过程监控、难点攻关、业绩考核、文档管理等。组员接受组长分配的任务，进行资料检索和任务实施，并进行个体评价和组员互评。按照敏捷软件开发的方法，每组以两人为单位，进行结对编程准备，相互学习和互相促进。
在课堂教学时，教师通过案例演示，进行案例情景构建，使学生了解项目的背景、实际意义和应用需求，以便达到软件开发的需求分析效果。案例情景构建通常在案例开始时进行，并在案例教学过程中不断强化。
教师通过对案例子项目的分解，将教学案例项目划分为若干子项目。教师应注意子项目的层次性，把握好难度梯度，子项目通常与教学章节相对应，并与教学大纲的要求有机结合。课程开始前，各案例小组在组长的带领下，展开讨论，将问题细化，做出子项目分解预案。这种练习开始较为困难，但在下一个案例教学过程中，可进一步发挥学生的主动性，有助于学生软件工程思维的培养。
在课程教学开始时，教师通过对案例子项目的分析暴露出既有知识的局限，继而自然引出本次课的新的教学内容，确定完成子项目任务所需要的新概念和新知識。案例小组通过子项目分解，明确学习重点，进行子项目任务解决的知识储备。
在案例课程教学中，教师紧紧围绕子项目的设计与实现，采取切合实际的教学方法，讲授新的教学内容，提高教学效果。在知识讲授完以后，立即将新知识应用到子项目的设计和编程实现中去，增进学生对新知识的理解与运用。学生通过教师主导下的教学讨论，积极思考，平等参与设计，不仅完善了自身的知识结构，也促使子项目的设计和实现进一步推进和完善。
在案例课堂教学结束前，教师依据教学进展情况，对本次课的教学内容进行总结，对解题思路进行梳理。从满足实际需求、用户界面友好、系统的完整性、可靠性等多角度指出课堂上给出的子项目设计方案可能存在的待改进和完善之处，引导学生对子项目提出多种设计方法并加以扩展，使学生从多角度理解和巩固所学知识。
在课堂案例教学结束之后，学生一方面通过传统课堂教学的方式，完成知识巩固型习题，另一方面，案例小组对案例进行自主扩展或根据教师分配的子项目扩展任务，讨论改进和扩展子项目并进行案例子项目的集成。
在课堂案例教学结束之后，教师和案例小组还有一项重要的工作就是案例评比交流。学生首先独立思考，设计方案， 然后在小组交流、讨论，形成小组方案;老师则对各组的实现方案进行评价，每次选一组的实现方案在全班交流。这一步将课堂教学与课下练习紧密联系起来，将理论教学与上机实习紧密结合起来，将学生的能力培养过程延伸到课下。
4 VB案例教学法的教学评价
教学评价是衡量案例教学法成功与否的重要标准，通过科学合理的监测和评价方案，可以及时发现问题，确保达到预期的教学效果。
传统的教学评价基本上是以期末考试成绩作为唯一的评价标准，忽视过程的教学评价很难完全评价学生学习的整个过程和知识水平[4]。
构建科学、完善的案例教学评价体系有助于提高学生参与案例教学的积极性和主动性[5]。案例教学评价体系包括评价主体、评价指标、权重系数等。
案例教学法的评价主体包括：教师、小组、学生个体三级。小组成绩的评定方法为：其他小组长评价、小组长自评、教师评定;个体成绩的评定方法为：小组长评定、组员评定、个体自评三类成绩的加权结合。
案例教学法的评价不以知识多寡为评价标准，评价指标主要包括：案例的准备评价、案例的实施评价、案例的扩展评价三级指标。具体指标可由师生共同讨论制定，主要包括案例的完整性与创新性、任务表述的准确性、分析能力和解决问题能力发展性、团队参与度、团队精神与合作意识等多个参数指标。案例教学评价体系的权重系数表示某一指标在总体指标体系中的重要程度。
案例教学评价的结论具有多元性和开放性，评价指标或权重系数的变化都可能得到不同结果。一般情况下，教师可从多种结论中得出一个大家公认的最佳结果。教师对整个案例教学法的评价进行组织和监控，确保评价的公平、公正性。案例教学的教师评价应以激发学生和案例小组团队的学习兴趣、研究动力和创新活力为终极目标。
对案例教学涌现的优秀案例小组，任课教师还须进一步加以培养。建立优秀案例小组档案，促使其向项目小组转化，为承担软件项目，接受工程任务作准备。鼓励他们参加全国性的程序设计大赛，为新一轮的案例教学起到示范作用。
5 结论与展望
在VB 程序设计课程中，采用案例教学法遵循了教育学的基本理论，有利于提高学生的自学习惯和自学能力，培养高级语言程序设计课程的学习兴趣和编程实践的内在动力，发挥学生的自主性和创造潜能。同时，VB案例教学从案例项目的分解、子项目的分析、设计和实现以及扩展采用了软件项目开发的基本方法，实现了课程理论教学与项目开发实践的有机结合。
案例教学法不可能完全代替传统的讲授法，本文通过对VB案例教学法的框架结构研究，探讨了将案例教学法和传统的讲授法有机结合的途径。
在非计算机专业的VB案例教学中，让案例与学生专业相结合，能较好地调动学生的学习兴趣，激发学生的学习热情，并提高了学生灵活运用计算机语言解决实践问题的能力，通过组织学生思考、分析、讨论程序案例，使学生掌握了分析问题和解决问题的方法，提高了学生分析问题和解决问题的能力。
由于案例教学受到诸多客观因素的影响，还有许多课题有待进一步深入研究，主要包括以下方面：案例教材的编写、适宜的VB案例采集、案例教学中的课堂组织、人员的组织管理、合理的案例评价体系构建等等。
在高校扩招，班级规模增大，人数众多的新形势下，如何组织实施案例教学，发挥案例教学的优势，也是当前迫切需要探讨的问题。
参考文献:
[1] 陈龙猛,王保桂,李吉忠,等.大案例教学法在Visual Basic程序设计教学中的探究[J].计算机教育,2008(5):59-62.
[2] 王清红.数学案例式教学模式研究[J].教學与管理,2008(18):131-132.
[3] 李淑燕.案例教学法在旅游管理教学中的应用[J].中国成人教育,2010(24):157-158.
[4] 廖剑华.任务驱动型案例教学在“C语言”课程教学中的实施[J].教育与职业,2011(5):157-158.
[5] 崔树银.参与式案例教学在公共管理类课程教学中的应用[J].现代教育科学,2010(7):167-169.
作者：成新文
一.VB是啥?
VB 是Visual Basic编程言语
编写计算机程序需求运用计算机编程言语。计算机编程言语是人和计算机“对话”的桥梁。就像人类的言语相同，计算机编程言语也有许多。其时较为广泛运用的言语有“C++”、“Pascal”、“Basic”等。在许多的计算机编程言语中，以BASIC言语最为易学易用。
BASIC是英文Beginner’s All purpose Symbolic Instruction Code的缩写，意思为初学者通用符号指令代码，一向都是程序设计入门的首选言语。
二.学VB有啥用?
VB能做许多东西，只需你想去做。
运用程序。数据库程序。只需能想得到的根柢上都能够。可是像操作系统等大型杂乱的编程如今通常都用C来编的。用VB很难做得到。要做程序员，单单只会VB还不可。最许多学点其他的。比方ASP数据库 。NET。这样才做出十分好的东西来
三.如何学好VB
VB是一种很简略上手的言语,归于典型的入门简略,知晓很难。
在如今,VB仍然是世界上运用最广泛的言语.对比适合的范畴是C/S架构的MIS,衍生言语VBScript又是一种十分适合B/S架构MIS等的言语,他的简略和易修改十分适合处理系统需求多变的状况.对数据库的支撑也极好,有MS在后面支撑,你还忧虑啥,不过任何言语都在进化,VB也不破例,LZ能够以如今的根底学习.net架构,习气打开的需求.
若是你是一巧不通的话，我能够介绍一个学习的办法：
1.先看看书,大致的了解了一些根柢的东西,不至于"盲人摸象"
2.从小东西学起(全部在于实习)，例如:VB 的三角函数啊.时钟啊.我想在书中是会有的.也能够看看网上的教程...
3.一个很重要的主张:等你现已有所收效了,最佳去上个VB的高档补习班.打个比方:时辰练的最佳,也得有自个来帮你打通经脉啊...
课
题：vb语言编程概述 课 时:2课时 授课时间：2011.09.05 课堂类型：讲授
教学目的：1.熟悉VB界面和VB集成开发环境;
2.在实际操作中学会编简单的VB应用程序;
教学要求：1. 掌握VB基础知识。
2. 会编简单的VB应用程序。
教学重点：1.熟悉VB集成开发环境
2.编写简单VB应用程序。
教学难点：在熟悉VB界面的同时学习编写简单VB应用程序 教学方法：讲授 教学过程：
一、VB简介
BASIC是英文Beginner’s All-purpose Symbolic Instruction Code(初学者通用符号指令代码)的缩写，它是专门为初学者设计的高级语言。Visual Basic是Microsoft公司于1991年推出的基于窗口的可视化程序设计语言。
a.“Visual”是“可视化的”、“形象化的”的意思。 b.因此Visual Basic也具有易学易用的特点
c.目前Visual Basic的最新版本是Visual Basic 6.0(简称VB 6.0)
二、启动VB
1、首先显示“新建工程”对话框
直接单击“打开”按钮，创建“标准EXE”类型应用程序，进入集成开发环境主界面。
2、集成开发环境中的各元素 1)标题栏：用来显示窗口的标题。 2)菜单栏 3)工具栏 4)工具箱 5)窗体窗口 6)工程窗口 7)属性窗口 8)窗体布局窗口
三、通过一个简单的应用程序快速入门
【例1.1(实训1，p16)】制作一个的一个简单的应用程序的运行界面。它由一个窗体、一个文本框、一个标签和一个命令按钮组成。当用户单击命令按钮“显示”时，文本框中出现“教你学VB”。 1.新建工程 2.添加文本框Text1 3.添加命令按钮Command1 4.添加标签Label1 5.设置属性 6.编写事件过程代码
前面的工作把应用程序的界面设计好了，属性也设置完毕。但现在应用程序并不能实现实际的功能。为了使它具有一定的功能，还必须为对象编写实现某一功能的事件过程代码。 1)双击窗体上的“显示”按钮，屏幕上出现代码窗口，程序代码就在这里编写。 编写如下事件过程：
Private Sub Command1_Click() Text1.Text = "欢迎使用VB" End Sub 2)运行应用程序 3)保存应用程序
VB应用程序至少有两种文件需要保存： · 窗体文件(.frm) · 工程文件(.vbp) 4)生成EXE文件
四、总结步骤
设计VB应用程序主要有以下4个步骤： (1)设计用户界面。 (2)设置属性。 (3)编写代码。 (4)保存和运行调试程序，生成EXE文件。
五、知识延伸
1、只有一个文本框的实例 编写如下事件过程：
Private Sub Command1_Click() Text1.Text = “教你学VB" End Sub
2、多个文本框时 编写如下事件过程：
Private Sub Command1_Click() Text1.Text = "教你学VB“ Text2.Text = "欢迎使用VB“ End Sub
3、按照系统的元件特性分类(分别举例说明) 课后实训1 第二个命令按钮：清除 第三个命令按钮：退出 步骤：
1.添加2个命令按钮 2.双击按钮，进入编程状态 3.和显示按钮命令编程相似 编写如下事件过程： Private Sub Command2_Click() Text1.Text = " “ End Sub Private Sub Command3_Click() End End Sub
4、图片的加载方法
Private Sub Form_Load() Image1.Picture = LoadPicture(App.Path + "1.BMP") End Sub
六、小结 1. 熟悉界面。
2. 掌握完整编程过程以及运行及调试程序的过程。
VB程序设计的初步知识
1.VB的概述
VB是一种可视化、面向对象和采用事件驱动方式的结构化高级程序设计语言。
特点：▲ 可视化编程
▲ 面向对象程序设计 ▲ 结构化的程序设计语言
▲ 事件驱动编程机制 ▲ 访问数据库
2.VB的程序开发环境
(1)窗口设计器窗口。简称，窗体
(2)工程资源管理器窗口
▲ 工程文件和工程文件组
工程文件的扩展名是vbp，每个工程对应一个工程文件。
▲ 窗体文件
扩展名是frm，每一个窗体对应一个窗体文件，一个应用程序可以有多个窗体。
▲ 标准模块文件
扩展名bas，不属于任何一个窗体。
▲ 类模块文件
(3)属性窗口和工具箱窗口
3.VB常用对象及操作
(1)对象事件的名称Name是由VB预定的，不可以由编程者设定。
可以在运行期间改变窗体的Name属性的值。(?)
(2)控件
4.VB应用程序通常有3类模块组成，即窗体模块、标准模块和类模块。
VB应用程序以解释和编译方式执行。
5.VB中的变量和常量
(1)常量
▲ 文字常量：字符串和数值常量
▲ 符号常量
格式：Const 变量名=表达式
(2)变量
▲ 命名规则：名字只能由字母、数字和下划线组成。
第一个字符必须是英文字母，最后一个字符可以是类型说明符。
▲变量的类型和定义
①类型说明符放在变量名的尾部。 A#b(错)
%：整型 &：长整型 !：单精度型 #：双精度型 $:字符串型
②在定义变量时指定类型。
格式：Declare 变量名 as 类型
Declare 可以是 Dim、Static、Public或Private
(3)变量的作用域
变量分为:局部变量、模块变量和全局变量
① 局部变量
在事件过程或通用过程内定义的变量叫局部变量。
② 模块变量
窗体变量可用于窗体内的所有过程. 当同一个窗体内的不同过程使用相同的变量时，必须定义窗体层变量，在使用窗体层变量前，必须先声明。
③ 全局变量
全局变量只能在标准模块中声明，不能在过程或窗体模块中声明。用Public 声明。
6. VB常用内部函数
⑴ 转换函数
★ 取整函数Int和fix ★ 数值转换函数 ★ 类型转换函数
★ 格式转换函数
⑵数学函数
★ 三角函数
★ 绝对值函数(Abs)
★ 符号函数(Sgn) ★ 平方根函数(Sqr)
★ 指数和对数函数(Exp和Log)
⑶随机数函数
★ 随机数函数(Rnd) ★ Randomize语句
⑷ 时间函数
7. VB字符串处理
★左、中、右部截取 Left(字符串，n)Mid(字符串，n)Right(字符串，n)
★字符串长度测量函数 Len(字符串)
★Strings函数 Strings(n,ASCII码) Strings(n,字符串)
★查找某个字符串函数 InStr(首字符位置，字符串1，字符串2[，n]
★字母大小转换函数 Ucase(字符串) Lcase(字符串)
★插入字符串语句 Mid(字符串，位置)=字符串
★SetFocus语句
8.VB运算符与表达式
(1)算术运算符
★求模运算 Mod求余.
★算术运算符优先级 ^>>&
如：7^2 Mod 5^23=1
(1) 关系运算符和逻辑运算符
(2) 表达式的执行顺序
◆ 关系运算(=,>,<,<>,≦,≧)
◆ 最后进行逻辑运算,顺序为: Not→And→Or→Xor→Eqv
如：表达式： Not a<=c Or 4*c=b^2 And b<>a+c的值是(Flase)a=2,b=3,c=4
9.VB常用标准控件
(1).标签
●Alignment 确认标签中标题放置的位置，可设置0、
1、2，作用分别为标题设置在左、右、中。
●AutoSize 标题自动调整标签的大小，可设置为True和False.
●Borderstyle 设置标签的边框，可设置为0和1，0表示为无边框。
●Enabled 用于确定一个窗体或控件能否对用户产生的事件作出反应。
●BackStyle 设置标签是否覆盖背景，0表示为透明，1表示标签覆盖背景。
●WordWrap 决定标签的标题文本能否自动换行。
●其他：Height、Left、Top、Visible、Width等等。
(2) 文本框
属性：
●MaxLength 设置文本框中输入的最大字符数。
●MultiLine 设置是否允许多行显示。
●Passwordchar 用于口令输入。
●Scrollbars 用来设置文本框中的滚动条。
事件：
◎ Change 事件 当用户输入新信息或把Text属性设置为新值从而改变文本框的属性时，将可触发此事件。
◎ GotFocus事件 当文本框有输入焦点时，键盘上输入的字符都将在文本框中显示出来，只有当一个文本框被激活并且可见性为TRUE是才能收到焦点。
◎ Setfocus 事件 该方法可以把输入的光标(焦点)移到指定的文本框中。
格式： [对象.] Setfocus
(3) 图形控件
图片框和图像框：
▲ CurrentX和CurrentY属性 ▲ Picture属性
▲ Stretch属性 用于自动调整图像框中图形内容的大小。
▲ 区别:① 图片框是“容器”控件，可作为父控件，而图像框不能。
③ 图片框可接受文本和图片，图像框不能。
④ 图像框占用内存少，显示速度快。
⑤ 图片框更灵活，且适用于动态环境。
▲ 运行期间装入图片
格式：[对象.] Picture=LoadPicture(”文件名”)
直线和形状：
△ BorderColor属性
△ Borderstyle
1—实线 2—虚线 3—点线 4—点划线
△ BackStyle 设置标签是否覆盖背景，0表示为透明，1表示标签覆盖背景。
△ Shape 属性
0—矩形 1—正方形 2—椭圆形 3—圆形 4—四角圆化的矩形
△ BorderWidth 指定线宽或界宽
(3) 复选框和单选按钮
Enabled、FontBold、FontItalic、FontName、FontSize、FontUnderline
Value、Alignment、Height、Left、Top、Visible、Width
单选按钮：Value=True，表示选择了该单选按钮.
Value=False, 表示没有选择该单选按钮.
复选框：Value=0，表示没有选择该复选框。
Value=1，表示选择该复选框。
Value=2，表示该复选框被禁用。
(6) 列表框和组合框
列表框方法：AddItem 添加文本内容到列表框中。
Clear 清除列表框中所有内容。
RemoveItem 删除列表框中指定的项目。
组合框(ComboBox)：AddItem、Clear、RemoveItem同样适用。
Style是组合框的一个重要属性，其值可取0、
1、2，决定组合框的3个类型。
注意： 属性ListIndex和 ListCout的区别
108(7) 滚动条
属性：
除Enabled、FontBold、FontItalic、FontName、FontSize、FontUnderline
Value、Alignment、Height、Left、Top、Visible、Width外，还有以下属性：
◆ Max和Min
◆ LargeChange和SmallChange
◆ Value 表示滚动框在滚动条的位置。
事件：主要有Scroll和Change.当在滚动条内拖动滚动框时会触发Scroll事件，而改变滚动框的位置时会触发Change事件。
(8) 计时器
可以用Enabled和Name属性，其最重要的是Interval属性，取值范围0～65535.
(9) 框架
(10) 焦点与Tab顺序
★设置焦点
格式： [对象.] Setfocus
★ Tab顺序
Tab顺序是在按Tab键时焦点在控件间移动的顺序。影响Tab顺序的属性是TabIndex。 1.数据的输出方法:
⑴ print方法
与print方法有关的函数：tab(n)函数 【print tab(24); 800】
spc(n)函数 【print “china”; spc(4); ”中国” 】用于跳出n个空格输出
tab函数从第一列开始计数，n是绝对偏移量。spc(n)函数则是从前面的输出内容开始计数，n是相对偏移量。
⑵ 格式输出( )
#：表示数字，不补零
0：表示数字，在数字的前或后补零
.：指定小数点的位置
，：指定千分分隔符的位置 如：print format$ (12345.6,”####,#.##”)12,345.(3)msgbox函数 信息框→ 返回值→标题
2.数据输出方法
(1)inputbox方法
Inputbox函数的返回值默认为字符串。如：a=inputbox(“Enter an integer”)
b= inputbox(“Enter an integer”) text1.text=b+a 如果在输入对话框中输入8和10，则文本框中显示的内容为108
VB的控制结构
循环控制结构
(1)For循环控制结构
使用Exit for 语句，可以在循环变量到达终值前就退出循环。
Do ……loop While
(2)当循环结构
(4)多分支控制结构
While 条件
测试表达式=????→Select case 测
[语句块]
Wend
试表达式
(5)IIf函数
A=IIf(条件，true部分，false部分)
数组与过程
1.默认数组
默认数组就是数据类型为Variant的数组。 Static A(4)即为定义了四个默认数组。
2.动态数组
◆ 用变量作为下标定位的数组时动态数组
◆ 用数值常量或符号常量作为下标定维的数组是静态数组。
动态数组定义分两步：首先在窗体层、标准模块或过程中用DIM或Public声明一个没有下标的数组，然后再过程中在用ReDimd定义。
3. 数组的清除和重定义
Erase 数组名
(3)Do循环结构
Do While……Loop
Erase用于动态数组中，将删除整个数组结构并释放数组所占用的内存，即动态数组以后就不复存在。用于静态数组中只是内容清空，数组依然存在。
4. 数组元素的输入及输出
输入：一般通过For循环和Inputbox函数输出
如: Option base 1
Dim s() as string
Sub Form_Click()
Redim s(4) as string
For i= 1 to 4
Temp$=Inputbox(“Enter Name”)
S(i)= Temp$
Next i
5.控件数组
控件数组是一组相同类型的控件组成，这些控件有一个相同的控件名称，具有相同的属性设置，所有元素的Name属性相同，但Index属性不同。
6.Sub过程
● 通用过程：多个事件过程需要使用同一个程序代码，他可以单独建立，供事件过程或其他过程调用。
● 事件过程：当发生某个事件时，对事件作出响应的程序段。
函数过程的返回值只能有一个。
调用Sub过程：① Call语句调用过程。 如：Call Tryout(a,b)
② 把过程名作为一个语句使用。 如：Try out a,b 去掉call关键字，去掉“实际参数”括号。
End Sub
输出：用Print方法结合For循环实现
Option base 1
Dim s(4,4) as Integer
For i= 1 to 4
For j= 1 to 4
Print s(i,j); “ ” ;
Next j
Next i
7.通用sub过程和事件过程 ★重点★难点★
事件过程是一种特殊的sub过程，他附加在窗体和控件上。窗体的事件过程不能由用户任意定义，而是由系统指定。通常是在事件过程中调用通用过程，同时事件过程也可以被其他过程调用。
通用过程可以放在标准模块中，也可以放在窗体模块中，而事件过程只能放在窗体模块中，不同模块中的过程可以互相调用。
8.Function过程 ★重点★难点★
Sub过程不直接返回值，可以作为单独的基本语句使用，而Function过程要返回一个值，通常出现在表达式中。
键盘与鼠标事件
1.键盘事件
⑴KeyPress事件
当压下键盘上的某个键时，将发生KeyPress事件。该事件可以用于各控件。比如用在文本框上的格式：Private Sub Text- KeyPress(KeyAscii as integer)
KeyPress事件带有一个参数，参数有两种形式，第一种形式：Index As Integer,只用在控件数组。第二种形式是：KeyAscii As integer,用于单个控件。
KeyPress事件用于识别按键的Ascii码，捕捉击键动作，KeyAscii参数不能省略。
控件的键盘事件优先于窗体的键盘事件
⑵KeyDown和KeyUP事件
KeyDown和KeyUP事件返回的是键盘的直接状态。 KeyPress事件返回的是Ascii码。当按键“A”时，KeyDown事件所得到的Keycode码与键“a”的相同。
2.鼠标事件 第10章 键盘与鼠标事件
本章主要考查键盘事件与鼠标事件，包括KeyPress事件、KeyDown和KeyUp事件、鼠标事件、鼠标光标的形状与拖放等知识点。通过对历年试卷内容的分析，本章考核内容约占6%，属于一般考查对象。
10.1 键盘事件
使用键盘事件过程，可以处理当按下或释放键盘上某个键时所执行的操作。
10.1.1 考点1：KeyPress事件
当压下键盘上的某个键时，将发生KeyPress事件。该事件可用于窗体、复选框、组合框、命令按钮、列表框、图片框、文本框、滚动条及与文件有关的控件。严格地说，当按下某个键时，所触发的是拥有输入焦点(Focus)的那个控件的KeyPress事件。在某一时刻，输入焦点只能位于某一个控件上，如果窗体上没有活动的或可见的控件，则输入焦点位于窗体上。当一个控件或窗体拥有输入焦点时，该控件或窗体将接收从键盘上输入的信息。例如，假定一个文本框拥有输入焦点，则从键盘上输入的任何字符都将在该文本框中回显。
在窗体上画一个控件(指前面所讲的可以发生KeyPress事件的控件)，比如文本框，并双击该控件，进入程序代码窗口后，从“过程”框中选取KeyPress，即可定义KeyPress事件过程。一般格式如下：
Private Sub Text1 _ KeyPress(KeyAscii As Integer)
……
End Sub
KeyPress事件带有一个参数，这个参数有两种形式，第一种形式是Index As Integer，只用于控件数组;第二种形式是KeyAscii As Integer，用于单个控件。上面列出的是第二种形式。KeyPress事件用来识别按键的ASCII码。参数KeyAscii是一个预定义的变量，执行KeyPress事件过程时，KeyAscii是所按键的ASCII码。
说明：
利用KeyPress事件可以对输入的值进行限制;
利用KeyPress事件可以捕捉击键动作;
在KeyPress过程中可以修改KeyAscii变量的值。如果进行了修改，Visual Basic控件中输入修改后的字符，而不是用户输入的字符。
例10.1.1 以下关于KeyPress事件过程参数KeyAscii的叙述中，正确的是( )。[2005年9月 填空第29题]
A.KeyAscii参数是所按键的ASCII码
B.KeyAscii参数的数据类型为字符串
C.KeyAscii参数可以省略 D.KeyAscii参数是所按键上标注的字符
解析：KeyPress事件带有一个参数，这个参数有两种形式。第一种形式是Index As Integer，只用于控件数组;第二种形式是KeyAscii As Integer，用于单个控件。参数KeyAscii是一个预定义的变量，执行KeyPress事件过程时，KeyAscii是所按键的ASCII码，并且该参数不能省略。
答案：A
小技巧：在默认情况下，控件的键盘事件优先于窗体的键盘事件。因此在发生键盘事件时，总是先激活控件的键盘事件。如果希望窗体先接收键盘事件，则必须把窗体的KeyPreview属性设置为True，否则不能激活窗体的键盘事件。
10.1.2 考点2：KeyDown和KeyUp事件
与KeyPress事件不同，KeyPress并不反映键盘的直接状态，而KeyDown和KeyUp事件返回的是键盘的直接状态。换言之，KeyDown和KeyUp事件返回的是“键”，而KeyPress事件返回的是“字符”的ASCII码。例如，当按字母键“A”时，KeyDown所得到的KeyCode码(KeyDown事件的参数)与字母键“a”是相同的，而对KeyPress来说，所得到的ASCII码不一样。
KeyDown和KeyUp事件的参数也有两种形式，其中Index As Integer只用于控件数组，而KeyCode As Integer，Shift As Integer用于单个控件。
说明：
参数KeyCode是按键实际的ASCII码。该码以“键”为准，而不是以“字符”为准。也就是说，大写字母与小写字母使用同一个键，它们的KeyCode相同(使用大写字母的ASCII码);
转换键，指的是三个转换键的状态，包括Shift、Ctrl和Alt，这三个键分别以二进制形式表示，每个键有三位，Shift键为001，Ctrl键为010，Alt键为100;
KeyDown是当一个键被按下时所产生的事件，而KeyUp是松开被压下的键时所产生的事件。
例10.1.2 在窗体上画1个文本框，其名称为Text1，然后编写如下过程：
Private Sub Text1_KeyDown (KeyCode As Integer ,Shift As Integer)
Print Chr(KeyCode)
End Sub
Private Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer)
Print Chr(KeyCode+2)
End Sub
程序运行后，把焦点移到文本框中，此时如果敲击“A”键，则输出结果为( )。[2006年4月 选择第29题]
A.A B.A C.A D.A
A B C D
解析：敲击“A”键的动作，首先是按下该键触发Text1_KeyDown事件，通过Print Chr(KeyCode)输出“A”;然后是松开被按下的“A”键，此时触发Text1_KeyUp事件，通过Print Chr(KeyCode+2)输出“C”。
答案：C
警钟长鸣：在键盘上按下一个键总是会触发KeyDown事件、KeyUp事件和KeyPress事件。
例10.1.3 在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，然后编写如下代码：
Dim SaveAll As String
Private Sub Command1_Click()
SaveAll = SaveAll +Chr(KeyAscii)
Text1.Text=Left(UCase(SaveAll),4)
End Sub
End Sub
程序运行后，在文本框中输入abcdefg，单击命令按钮，则文本框中显示的内容是____。[2006年4月 填空第9题]
解析：Text1_KeyPress过程将用户在文本框中所输入的内容保存到变量SaveAll中，本例输入“abcdefg”，则SaveAll=“abcdefg”;Left(UCase(SaveAll),4)函数即为对“abcdefg”转换为大写后取前四个字母，即“ABCD”。
答案：ABCD
小技巧：利用逻辑运算符And可以判断是否按下了某个转换键，可以在事件过程中通过判断是否按下了某个或某几个键来执行指定的操作。
Private Sub Text1_KeyPress(KeyAscii As Integer)
可视化程序设计
1.当窗体为活动窗体时，可以使用“工具”菜单中的“菜单编辑器”打开菜单编辑器。
2.弹出式菜单：建立弹出式菜单首先用菜单编辑器建立菜单，然后用PopupMenu方法弹出显示。
各级菜单中的所有菜单项的名称必须唯一。
3.通用对话框： 对话框的类型可以通过Action属性设置，也可以用相应的方法设置。可以通过DialogTitle属性设置有实际意义的标题。
通用对话框，Action=1 打开文件; =2 保存文件
方法：showopen;showsave
4.文件对话框：
格式：【窗体】对话框名，Fliter=描述符1|过滤器1| 描述符2|过滤器2|…
FliterIndex 用来指定默认的过滤器。
5.多重窗体程序设计
Show方法：用来将指定的窗体装入内存并显示该窗体。
6.VB工程中，可以作为启动对象的程序是Sub main 过程或任何窗体。
一个工程中可以包括多个窗体文件。
数据文件
1基本文件操作语句与函数
⑴ 打开文件 ★重点★难点★
格式：Open文件名【for 方式】 as #文件号
如果省略【for 方式】，则打开文件的存取方式是随机存取方式。
方式指文件的输出方式，可以是Output(顺序输出)以写的方式打开、 input(顺序输入)、append(添加)。
使用open语句打开文件时，如果为输入input打开的文件不存在，则产生“文件未找到”的错误;如果为Output(顺序输出) 、append(添加)访问方式打开的文件不存在，则建立相应的文件。
(2)关闭文件
(3)EOF函数
用来测试文件的结束状态。利用EOF函数，可以避免在文件输入时出现“输入超出尾”错误。 DO While Not EOF
2.顺序文件与随机文件
⑴ 顺序文件写操作
Print #文件号，表达式
Write #文件号, 表达式
(3)随机文件的打开与读写操作
随机文件的记录是定长记录。在用open语言打开文件时必须指定记录的长度。
打开随机文件： Open”文件名” for random As #文件号 对文件的操作既可以读也可以写。
第12章 数 据 文 件
本章主要考查Visual Basic中的数据文件操作，包括Visual Basic文件概述、基本文件操作语句与函数、顺序文件与随机文件和文件系统控件。通过对历年试卷内容的分析，本章考核内容约占8%，属于一般考查对象。
12.1 Visual Basic文件概述
12.1.1 考点1：文件概述
1.文件概念
所谓“文件”，是指记录在外部介质上的数据的集合。
2.在程序设计中使用文件的原因
文件是使一个程序可以对不同的输入数据进行加工处理、产生相应输出结果的常用手段。
(2)顺序文件读操作
Input #文件号，变量表
使用文件可以方便用户，提高上机效率;
使用文件可以不受内存大小的限制。
3.文件结构
为了有效地存取数据，数据必须以某种特定的方式存放，这种特定的方式称为文件结构。Visual Basic文件由记录组成，记录由字段组成，字段由字符组成。
(1)字符
字符是构成文件的最基本单位。字符可以是数字、字母、特殊符号或单一字节。Visual Basic支持双字节字符，当计算字符串长度时，一个西文字符和一个汉字都可作为一个字符计算，但它们所占的空间是不一样的。例如：字符串“系统分析员协会顾问团CSAI”的长度为14个字符，而所占的存储空间为24个字节。
(2)字段
字段也称为域。字段由若干个字符组成，用来表示一项数据。
(3)记录
记录由一组相关的字段组成。
(4)文件
文件由记录构成，一个文件含有一个以上的记录。
4.文件种类
根据不同的分类标准，文件可分为不同的类型。
(1)根据数据性质划分
程序文件：存放的是可以由计算机执行的程序，包括源文件和可执行文件。
数据文件：存放普通的数据，这类数据必须通过程序来存取和管理。
(2)根据数据的存取方式和结构划分
顺序文件：文件中的记录一个接一个地存放。顺序文件的组织比较简单，但维护困难。主要优点是占空间少，容易使用。
随机存取文件：又称直接存取文件，每个记录的长度是固定的，根据记录号进行读写操作。优点是数据的存取灵活、方便，速度较快，容易修改。缺点是占空间较大，数据组织较复杂。
(3)根据数据的编码方式划分
ASCII文件：又称文本文件，它以ASCII方式保存文件。可以用字处理软件建立和修改。
二进制文件：以二进制方式保存的文件。不能用普通的字处理软件编辑，占空间较小。
例12.1.1 以下文件扩展名中，不属于程序文件的是( )。
A..exe B..frm C..mdb D..vbp
解析：.exe文件为可执行文件;.frm文件为Visual Basic的窗体文件;.mdb文件为Access数据库文件;.vbp文件为Visual Basic的工程文件。
答案：C
第二章 数据的输出与输入
1.Print方法的对象
2.MsgBox函数和InputBox函数中各参数的含义
格式：InputBox(prompt,title,default)
格式：MsgBox(msg,type,title)
9章 数组与过程
本章主要考查Visual Basic中的数组与过程，主要包括：数组基本概念、数组基本操作、控件数组、Sub过程、Function过程、过程中的参数、局部内存分配和Shell函数。通过对历年试卷内容的解析，本章考核内容约占18%，属于重点考查对象,但将保持下降趋势。
9.1 数组基本概念
9.1.1 考点1：数组的定义
数组是有序的数据的集合。在Visual Basic中，一个数组中的元素可以是相同类型的数据，也可以是不同类型的数据。在Visual Basic中，可以有两种格式定义数组：
1.第一种格式
(1)一维数组
一维数组的定义一般格式如下：
Dim 数组名(下标上界) As 类型名称
例如：Dim score (10) As Integer
该语句定义了一个一维数组，名字为score，类型为Integer，共6个元素。
(2)二维数组
二维数组的定义一般格式如下：
Dim 数组名(第一维下标上界，第二维下标上界) As 类型名称
例如：Dim stuScore (10,2) As Integer
该语句定义了一个二维数组，名字为stuScore，类型为Integer，共11X3=33个元素。
2.第二种格式
(1)定义数组
在定义数组时，指定数组下标的上界和下界。语句一般格式如下：
Dim 数组名([下界 To] 上界[，[下界 To] 上界]……) As 类型名称
例如：Dim score(1 To 5)
该语句定义了一个一维数组，下界为1，上界为5，共5个元素。
第二种格式实际上包含了第一种格式，只要省略“下界To”，即变为第一种格式。
(2)语句说明
“数组名”与简单变量相同，可以是任何合法的Visual Basic变量名，在同一过程中，数组名不能与变量名同名;
数组必须先定义后使用，并且每一维的元素个数必须是常数，不能是变量或表达式;
使用Dim语句定义数组时，数值数组中的全部元素初始化为0，字符串数组中的全部元素初始化为空字符串;
一般情况下，下标的下界默认为0，可以使用Option Base n(n只能为或1)改变下标的默认为1;使用LBound和UBound函数可以获得数组的上、下界值;
如果下标值从0开始，则数组元素的个数为最大下标值加1，如果下标值从1开始，则数组元素的个数与最大下标值相等。
3.定义数组的保留字
在Visual Basic中，定义数组时可使用4个保留字，以定义不同范围内的数组：
Dim：定义窗体模式或标准模块数组，也可用在过程中;
ReDim：用在过程中;
Static：用在过程中;
Public：用在标准模块中，定义全局数组。
例9.1.1 在窗体上画1个命令按钮，其名称为Command1，然后编写如下事件过程：[2006年4月 填空第7-8题]
Private Sub Command1_Click()
Dim arr (1 To 100) As Integer
For I = 1 To 100
arr(i)=Int(Rnd *1000)
Next i
Max = arr(1)
Min = arr(1)
For i= 1 To 100
If 【7】 Then
Max = arr(i)
End If
If 【8】 Then
Min =arr(i)
End If
Next i
Print "Max =";Max, "Min=";Min
End Sub
程序运行后，单击命令按钮，将产生100个1000以内的随机整数，放入数组arr中，然后查找并输出这100个数中的最大值Max和最小值Min，请填空。
解析：由条件判断可以得知，在【7】处的意思是将最大值Max中的数与arr(i)中的数相比较，【8】处的意思是将最小值Min中的数与arr(i)中的数相比较。
答案：【7】Maxarr(i)
9.1.2 考点2：默认数组
所谓默认数组，就是数据类型为Variant(默认)的数组。在一般情况下，定义数组应指明其类型。
例如：
Static Elec(1 To 100)As Integer
该语句定义了一个数组Elec，该数组的类型为整型，它有100个元素，每个元素都是一个整数。但如果使用语句：
Static Elec(1 To 100)
则定义的数组是默认数组，没有指定类型，则类型默认为Variant，该语句等价于：
Static Elec(1 To 100) As Variant
对于默认数组来说，同一个数组中可以存放各种不同的数据。因此，默认数组可以说是一种“混合数组”，这也就是默认数组的意义所在。
例9.1.2 阅读下面程序并填空。
Sub Form_Click()
【1】
Defau(1)=100
Defau(2)=234.56
Defau(3)= "CSAI"
Defau(4)= "20" & Now
第11章 可视化程序设计
本章主要考查可视化程序设计，包括菜单程序设计、对话框程序设计、多重窗体程序设计、Visual Basic工程结构与执行控制等知识点。通过对历年试卷内容的分析，本章考核内容约占6%，属于一般考查对象，下次考试将保持上升趋势。
11.1 菜单程序设计
For i=1 To 4
Print "Defau(";I; ")="; Defau(i)
Next i
End Sub
答案：【1】Static Defau(4)
菜单的基本作用有两个，一是提供人机对话的界面，以便让使用者选择应用系统的各种功能;二是管理应用系统，控制各种功能模块的运行。
在实际应用中，菜单可分为两种基本类型，即下拉式菜单和弹出式菜单。
11.1.1 考点1：下拉式菜单
下拉式菜单是一种典型的窗口式菜单。在下拉式菜单系统中，一般有一个主菜单，其中包括若干选择项，主菜单的每一项都可以“下拉”出下一级菜单供用户选择或输入信息。操作完毕后菜单从屏幕上消失，并恢复原来的屏幕状态。
1.菜单编辑器
Visual Basic中的菜单通过菜单编辑器，即菜单设计窗口建立。可以通过以下4种方式进入菜单编辑器：
执行“工具”菜单中的“菜单编辑器”命令;
使用热键Ctrl+E;
单击工具栏中的“菜单编辑器”按钮;
在要建立菜单的窗体上单击鼠标右键，将弹出一个菜单，然后单击“菜单编辑器”命令。
菜单编辑器窗口分为三个部分：即数据区、编辑区和菜单项显示区。
(1)数据区
数据区用来输入或修改菜单项、设置属性。在数据区中，必须提供菜单项的“标题”和“名称”属性，“有效”属性和“可见”属性一般默认为True，只有在必要时才设置其他属性。在设置“标题”属性时，如果输入一个减号(—)，则可在菜单中加入一条分隔线;如果在菜单“标题”中包含“&”，则可将该符号后的字母作为访问键(通过ALT加该键打开该菜单)。
(2)编辑区
编辑区用来对输入的菜单项进行简单的编辑。
(3)菜单项显示区
菜单项显示区用来显示所输入的菜单项。菜单在数据区输入，在编辑区进行位置调整，在菜单项显示区显示。
2.菜单项的控制
(1)有效性控制
菜单中的某些菜单项应能根据执行条件的不同进行动态变化，即当条件满足时可以执行，否则不能执行。
菜单项的“有效”属性，菜单项的有效性就是通过该属性来控制的。实际上，只要把一个菜单项的“有效”属性设置为False，就可以使其失效，运行后该菜单项变为灰色;为了使一个失效的菜单项变为有效，只要把它的“有效”属性重新设置为True即可实现。
(2)菜单项标记
所谓菜单项标记，就是在菜单项前加上一个“√”。它有两个作用：一是可以明显地表示当前某个(或某些)命令状态是“On”或“Off”二是可以表示当前选择的是哪个菜单项。菜单项标记通过菜单设计窗口中的“复选”属性设置，当该属性为True时，相应的菜单项前有“√”标记;如果该属性为False，则相应的菜单项前没有“√”标记。
(3)键盘选择
用键盘选取菜单通常有两种方法，即热键和访问键(Access Key)。
3.菜单项的增减
菜单项的增减通过控件数组来实现。一个控件数组含有若干个控件，这些控件的名称相同，所使用的事件过程相同，但其中的每个元素可以有自己的属性。控件数组和普通数组一样，可通过下标(Index)访问控件数组中的元素。控件数组可以在设计阶段建立，也可以在运行时建立。
例11.1.1 假定有一个菜单项，名为MenuItem，为了在运行时该菜单项失效(变灰)，应使用的语句是( )
A.MenuItem.Enabled= False
B.MenuItem.Enabled= True
C.MenuItem.Visible= True
D.MenuItem.Visible= False
解析：Enabled属性设置菜单是否可用;Visible属性设置菜单是否可见。菜单项标记通常是动态地加上或取消的，因此应在程序代码中根据执行情况动态设置。
答案：A
重要提示：只有当某个窗体为活动窗体时，才能用上面介绍的四种方法打开菜单编辑器窗口。
11.1.2 考点2：弹出式菜单
建立弹出式菜单通常分两步进行：首先用菜单编辑器建立菜单，然后用PopupMenu方法弹出显示。第一步的操作与前面介绍的基本相同，惟一的区别是必须把菜单名(即主菜单项)的“可见”属性设置为False(子菜单项不要设置为False)。PopupMenu方法用来显示弹出式菜单，其一般格式如下：
对象.PopupMenu菜单名，Flags，X，Y，BoldCommand
说明：
当省略“对象”时，弹出式菜单只能在当前窗体中显示。如果需要弹出式菜单在其他窗体中显示，则必须加上窗体名;
Flags的两组参数可以单独使用，也可以联合使用。当联合使用时，每组中取一个值，二者相加;如果使用符号常量，则两个值用Or连接;
弹出式菜单的位置由X、Y和Flags参数共同指定。
例11.1.2 在菜单编辑器中建立一个名称为Menu( )的菜单项，将其“可见”属性设置为False，并建立其若干子菜单，然后编写如下过程：
Private Sub Form_MouseDown (Button As Integer ,Shift As Integer ,X As Single, Y As Single)
If Button = 1 Then
PopupMenu Menu()
End If
End Sub
则以下叙述中错误的是( )[2006年4月 选择第32题]
A.该过程的作用是弹出一个菜单
B.单击鼠标右键时弹出菜单
C.Menu()是在菜单编辑器中定义的弹出菜单的名称
D.参数X、Y指明鼠标当前位置的坐标
解析：通常把PopupMenu方法放在MouseDown事件中，该事件响应所有的鼠标单击操作，用Button参数控制左右键选择。Button=1为单击鼠标左键时弹出菜单，Button=2为单击鼠标右键时弹出菜单。
答案：B
第九章.常用控件
认清事件触发的对象名
列表框
List属性——是一个字符数组，存放列表框的项。 ListIndex属性——选中的列表项序号。
ListCount属性——列表框中项目的数量。 Text属性——被选中列表项的文本内容。
Selected属性——是一个逻辑数组，表示对应的项在程序运行期间是否被选中。
第三章 VB程序设计语句
1. For循环
For <循环变量>=<初值> to <终值>[step 步长]
<循环体>
[Exit For]
Next <循环变量>
1) 多重循环
Do循环
格式一：Do While <条件> <语句块> Loop
格式二：Do Until <条件> <语句块> Loop
格式三：Do <语句块> Loop While <条件>
格式四：Do <语句块> Loop Until <条件>
2) 二重循环
1.典型案例：求100以内的素数。2.取矩阵对角线上的元素。3.打印“*”型图。
3) 程序范例：
Const n=5,m=4
Dim a(m,n)
Private Sub Command1_Click()
K=1
For i=1 To m
For j=1 To n
a(i,j)=k
k=k+1
Next j
Next i
End Sub
Private Sub Command2_Click()
End If
Summ=0
Next j
For i=1 To m
Next i
For j=1 To n
Print summ
If i=1 Or i=m Then
End Sub
Summ=summ+a(i,j)
Else
If j=I Or j=n Then
Summ=summ+a(i,j)
End If
过程Command1_Click()的作用是二维数组a 中存放1个 m行n列的矩阵;过程Command2_Click()的作用是
A) 计算矩阵外围一圈元素的累加和
B) 计算矩阵除外一圈以外的所有元素的累加和
C) 计算矩阵第1列和最后一列元素的累加和
D) 计算矩阵第1行和最后一行元素的累加和
VB中状态栏(StatusBar)和工具栏(ToolBar)经典实例分析
1. 状态栏的作用与组成
StatusBar 控件由 Panel(窗格) 对象组成，最多能被分成 16 个 Panel 对象，每一个 Panel 对象能包含文本和/或图片。控制个别窗格的外观属性包括 Width、Alignment(文本和图片的)和 Bevel(斜面)。此外，能使用 Style 属性七个值中的一个自动地显示公共数据，诸如日期、时间和键盘状态等。
2. 创建状态栏
先在窗体上画出一个StatusBar对象，再右击该对象，从快捷菜单中选择“属性”，进入属性页设置窗口，进行下面的设置：
(1) 选择窗格形状
在属性窗口里选择通用标签，在样式列表框里选择多窗格(缺省形式)或单窗格简单文本形式。
(2) 添加或删除状态栏窗格
在属性窗口里选择窗格标签，单击插入窗格按钮添加一个窗格，或单击删除窗格按钮删除一个窗格。
(3) 在单窗格里显示文本
在属性窗口里选择通用标签，在简单文本框里输入想显示在状态栏窗格里的文本。用代码显示的方式是：
StatusBar1.SimpleText = "要显示的内容"
(4) 在多窗格里显示文本或图形
1). 在属性窗口里选择窗格标签，用索引旁的按钮选择窗格序号。
2). 在文本框里输入想显示在状态栏窗格里的文本。用代码显示的方式是：
StatusBar1.Panels(x).Text = "要显示的内容"
3). 如果想加入图形，单击浏览按钮打开一个图形选择对话框，选择想加入的图形，然后单击打开按钮。
(5) 编写代码
如果是一个单窗格状态栏，当用户单击状态栏时，只需用下面的事件过程来响应：
Private Sub StatusBar1_Click()
<要执行的代码>
End Sub
如果是一个多窗格状态栏，就需要鉴别用户单击的是哪一个窗格，可用下面的事件过程来识别用户所单击的窗格：
Private Sub StatusBar1_PanelClick(ByVal Panel As Panel)
Select Case Panel.Index
Case 1
<要执行的代码>
Case 2
<要执行的代码>
……
End Select
End Sub
3.创建工具栏
(1).建立工具栏
1) 在工具箱里单击工具栏图标，拖到窗体的任何位置，Visual Basic自动将ToolBar移到顶部。再右击该对象，从快捷菜单中选择“属性”，进入属性页设置窗口;
2) 选择按钮标签，单击插入按钮，Visual Basic就会在工具栏上显示一个空按钮，重复此步插入多个按钮;
3) 单击确定按钮。如果想把按钮分组，首先插入一个分隔的按钮，再在对话框里将这个按钮的样式属性改为3-Separator。
(2) 为工具栏增加图画
1). 在Visual Basic工具箱里单击ImageList图标，并将它拖到窗体的任何位置(位置不重要，因为它总是不可见的)，再右击该对象，从快捷菜单中选择“属性”，进入属性页设置窗口;
2). 选择图象标签，单击插入图片，在选定图形对话框里选择想使用的位图或图标，然后单击打开按钮。为每个想添加图形的工具栏按钮重复此步。
3). 单击确定按钮。
4). 进入ToolBar属性对话框，选择通用标签，在图象列表框里选择刚才添加的ImageList控件。
5). 选择按钮标签，单击紧挨Index框的向左或向右箭头以选择一个按钮序号。出现在工具栏最左边的按钮序号为1。
6). 在Image框里输入一个数，输入为1，则显示刚才ImageList控件里的第一个图形，输入为2，则显示刚才ImageList控件里的第二个图形。
7). 为每个按钮重复第6步， 单击确定按钮，现在Visual Basic就会在工具栏上显示精美的图形了。
(3)为工具栏添加文本信息
在ToolBar属性对话框中选择按钮标签，在标题框里输入想显示在按钮上的文本。
(4)添加ToolTips
ToolTips是一种当点到工具按钮时弹出的小标签。ToolTips很方便，可以告诉那些新手每个按钮是干什么用的。在ToolBar属性对话框中选择按钮标签，在工具提示文本框里输入想作为ToolTip的文本。
(5)编写代码
双击工具栏，以下面的格式输入代码就可以了： Private Sub Toolbar1_ButtonClick(ByVal Button As Button)
Select Case Button.Index
Case 1
<要执行的代码>
Case 2
<要执行的代码>
……
End Select
End Sub VB进程条(ProgressBar)和滑块(Slider)基础教程
1. 进程条
作用：进程条控件用于监视操作完成的进度。
创建：在窗体上画出进程条控件，右击，选择属性，然后进行所需的外观设置。
主要属性：ProgressBar 控件有一个行程和一个当前位置。行程代表该操作的整个持续时间。当前位置则代表应用程序在完成该操作过程时的进度。Max 和 Min 属性设置了行程的界限。Value 属性则指明了在行程范围内的当前位置。
(1) Min属性代表进程条全空时的值，缺省时为0。
(2) Max属性代表进程条全空时的值，缺省时为100。
(3) Value属性代表进程条当前的值(但不出现在属性窗口中)，它大于Min属性，小于Max属性。改变Value属性的值将改变进程条的进度显示。
示例：
Private Sub Command1_Click()
If ProgressBar1.Value < ProgressBar1.Max Then
ProgressBar1.Value = ProgressBar1.Value + 5
Else
ProgressBar1.Visible = False „当进程条满了的时候让进程条消失
End If
End Sub 2.滑块
Slider 控件是包含滑块和可选择性刻度标记的窗口，在窗体上画出滑块控件，右击，选择属性，然后进行下列设置：
(1)选择滑块的外观
1)方向属性决定滑块的方位，可以是垂直的或水平的滑块。
2)滑块样式属性决定滑块标记的样子。
3)滑块频率属性规定了沿着滑块的标记的间隔大小，缺省的状态是1，表明每个可能值都出现标记，如果把值设置为3，则每三个可能值出现一个标记。
(2)滑块的主要属性及事件
1)Min，Max属性
Min属性决定滑块最左端或最顶端所代表的值。Max属性决定滑块最右端或最下端所代表的值。
2)LargeChange,SmallChange属性
SmallChange决定在滑块两端的箭头钮上单击时改变的值。LargeChange决定在滑块上方或下方区域单击时改变的值。
3)Value属性
Value属性代表当前滑块所处位置的值，这个值由滑块的相对位置决定。
4)Change事件
当滑块位置发生变化时就引发了Change事件。 图象列表(ImageList)和 图象组合框(ImageCombo)实例讲
解
1.图象列表
ImageList 控件是包含 ListImage 对象的集合，该集合中的每个对象都可以通过其索引或关键字被引用。ImageList 控件不能独立使用，只是作为一个便于向其它控件提供图象的资料中心。
ImageList 控件的作用象图像的储藏室，同时，它需要第二个控件显示所储存的图像。第二个控件可以是任何能显示图像 Picture 对象的控件，也可以是特别设计的、用于绑定 ImageList 控件的 Windows 通用控件之一。这些控件包括ListView、ToolBar、TabStrip、Header、ImageCombo、和 TreeView 控件。为了与这些控件一同使用 ImageList，必须通过一个适当的属性将特定的 ImageList控件绑定到第二个控件。对于 ListView 控件，必须设置其 Icons 和 SmallIcons 属性为 ImageList 控件。对于 TreeView、TabStrip、ImageCombo、和 Toolbar 控件，必须设置 ImageList 属性为 ImageList 控件。
一旦 ImageList 与某个 Windows 通用控件相关联，就可以在过程中用 Index 属性或 Key 属性的值来引用 ListImage 对象。
当与 Windows 通用控件一起使用 ImageList 控件时，在将它绑定到第二个控件之前，按照希望的顺序将全部需要的图像插入到 ImageList。一旦 ImageList 被绑定到第二个控件 ，就不能再删除图像了，并且也不能将图像插入到 ListImages 集合中间。但是可以在集合的末尾添加图像。
2.图象组合框
ImageCombo 控件是标准 Windows 组合框的允许绘图版本。控件列表部分中的每一项都可以有一幅指定的图片。它可以显示一个包含图片的项目列表，每一项可以有自己的图片，也可以对多个列表项使用相同的图片。
除了支持图片之外， ImageCombo 还提供了一个对象和基于集合的列表控件。控件列表部分的每一项是一个不同的 ComboItem 对象，而且列表中的所有项组合起来构成 ComboItems 集合。这就使它容易一项一项地指定诸如标记文本、ToolTip文本、关键字值以及缩进等级等属性。
2005-7-24
VB指导学习
1、if语句的另一种写法：
if num=10 then print num
当then后面(同一行)有执行语句时，if语句不能加end if
如有end if，则then后(同一行)不能有语句
2、两条语句放在同一行时用“：”分割
如：print num:print num+1
3、语句分多行写用“ _”连接，注意“空格&下划线”
如：print num _
+1
4、除法：a/ba
C++：“/”是除法，a、b都是int，则结果是int，如果其中一个是float，则结果float“”是转义字符。
VB：“/”是除法，有小数。“”取整(小数点后舍)
5、case语句用法：
private sub form1_click()
dim a
select case a
case 1to4,7to9,11,13<5
print a
case else
msgbox”不在范围内”
end select
end sub
6、VB中假是”0”，真是”-1”
C++中假是“0”，真是“1”
7、private sub form_click()
for I=2to4 step-1读完完整的一句之后，如发现问题，则跳过此句执行下一句。print I
next
print I本程序只执行此句一次
end sub
8、倒序输出字符串
取字符函数mid(string,2,3)表示从string字符串中第二位开始，一共取三位如：mid(abcdefg,2,3)，则结果为 bcd
lift(abcd,2)=ab
right(abcd,2)=cds
例：private sub command1_click()
dim x as integer,str_len as integer
dim str as string
for x=str_len to 1 step –1
text1.text=text1.text + dim(str,x,1)
next
end sub
form1窗体里有两个文本框和一个按钮
9、循环for I=1to5
„„
next (I)(next后最好不要加i)
10、声明变量：dim a,b as integer则a是变体，b是int
dim a as integer,b as integer则a,b都是int
11、webbrowser 网页
添加部件 ms internet controls 控件
private sub form_click()
webbrowser1.navigate app.path & “a心理测试.html”app.path表示当前目录end sub
private sub form1.resize()
wenbrowser1.height=form1.scaleheight-10“-10”可不写
webbrower1.width=form1.scalewidth-10如不加scale，则会覆盖一点边
12、有退出按钮的窗体，点击退出时询问，点击窗体右上角X则不询问，怎么办?Private sub form_unload(canel as integer„„)
If msgbox(”是否退出?”,vbokcancel,”询问”)=vbok=true=false
Cancel=true-取消关闭
End if
End sub
13、”关于”窗体
添加“关于”对话框
14、使用“选项卡”省地方
添加控件“ms tabbed dialog control 6.0”
如添加控件“ms windows common control 6.0”->”tabstrip”也可以作，但不好用。
15、帮助文件 msdn是世界最大的帮助文件，CHM格式的帮助文件
html help workshop
1. 目录 -> 节点&页面 -> 编译
2. new -> project -> ok -> 下一步 -> 保存路径&名称 -> 下一步 -> 勾中 html
files(.htm) -> 点击Add -> 下一步 -> 完成
3. 搜索proj -> 属性 compiler -> 勾中compiler -> ok
4. 作节点 页面 关键字
project(工程) ->contents(目录) ->index(索引) ->ok ->保存节 钥匙增加关键字contents(目录) ->是否创建 ->ok ->保存 ->点左第二个文件夹则属性换成书图标
16、用VB调用帮助文件
设工程属性的“帮助文件名”后，按“f1”弹出帮助
设一个“帮助菜单”，在菜单click事件中加入sendkeys“{F1}”，模拟用户按键盘还可以模拟alt + f4 , 但不可以模拟 control + alt + del (重启),
17、MDI无子窗体时，帮助无作用，调用ADI/ATI
把目录的成app.path ，把此文件拷贝到其它位置仍可使用
18、shell 只能调用.exe文件hh.exe是windows 自带的帮助打开“帮助文件”的exe文件shell”hh.exe 帮助文件的路径及文件名”
19、private sub a_click()
sendkeys”{f1}”
shell”hh.exe d:qiaosl„„.chm”,vbnormal focus
end sub
private sub form_load()
ap.help file=app.path &”„„.chm”
20、1.工程属性设“帮助菜单名”
2.App.helpfile= „„
3.Sendkeys”{f1}”
4.shell(“hh.exe„„”)
1&2作用是：按F1出帮助，便用2好一些，3是模拟按键盘F1，4可完全单独使用，3&4用在按键或菜单。
Api例子
下午
21、设置象素：窗体的lemode属性1-twip->缇，pixel->象素
22、动态生成控件必须用控件组
23、缺省事件是双击控件时自动出现的事件
缺省属性可省略：text1.text=”a”可写成text1=”a”,可省略“.text”
24、cotfouse->事件
25、模式&非模式窗体：
26、参数传递：默认按引用传递，Byval是按值传递
subs(byval x as single,y as single) 则x按值，y按引用，VB中真为-1
27、第十章，error
语法错误：
运行时错误：一般不出错，特定时出错，考虑不周全，如除数为0
逻辑错误：不报错，写的不对，如循环次数不对。
错误处理代码
1. 创建捕获错误代码
2. 处理此错误
3. 继续执行
on error goto 1标号(数字&字母都可以)
exit sub
1:
msgbox(“除数不为0”)
text1.text=””
text1.setfouse
end sub
resume (next/line)回到出错行，或出错行的下一行，或指定位置
on error resume next忽略错误/延迟最好少用，延迟后改不了
F8是单步运行
28、对象 –> err.属性&方法 number(错误编号)
29、dbpath=commondialog.filename
if dbpath=””
end
con.open
else resume
showopen
30、C++复习题：
简单
1. 用户接收一个数，调用一个函数，输出该数的立方
2. 写一个函数min(int a[])，求主程序中传来的数组中最小值
难度适中
3. 民主投票方法选班长，候选人编号A、B、C、D每位同学只能选一人作班长，
输入每张选票的候选人编号A~D，输入0终止，
调用函数process()输出每人得票数及当选人
4. 接收用户输入的数，直到有5个奇数，显示此5个奇数，
调用max()函数显示此5个奇数中最大数
高难度
5. 字符串变量A、B，B是A中的一部分，将B抠出A，再输出
超难度
6. 卖票，车站一共15，每站上(剩下站数)个人，然后剩下每站依次下一个人，问应
设几个座位，卖出多少张票
7. 发牌：按顺序发随机牌(使用随机数)
这学期选修了VB这门学科，想从学习中对计算机有更深刻的认知，也对我大学中的2级考试奠定基础。那么谈谈这学期的学习中对vb的认知和心体会。
通过学习vb我基本学会了编辑一些小程序，掌握了一些基本的知识，得到了以下一些收获：
1.富业余生活。曾经业余时间到处游手好闲的身影不见了，以前没事我肯定一动不动的坐在电脑面前摆弄电脑。是啊，想想以前，真是一无是处，一会找人砍大山，一会找人打游戏，一会就傻傻的坐在小板登上两眼无光，似是厌倦了红尘。现在有了VB，它给了我无穷的快乐，让我乐此不疲。
2、多了一门技术。VB是一门计算机编程语言，也算是一项知识含量较高的东西。采用的是可视化程序设计。学习的这段时间，我明白了万事开头难，刚刚开始，遇到些困难没关系，慢慢来。 我们每学一点，就赶快把它用到实际的程序中去，自己多学多用多实践，水平才能不断提高，这就是“学以致用”。 只有这样我才呢学有所成
3、锻炼意志。编程可不是一项轻松的活，尤其是一个人开发制作软件时，那工作量就多了。没有一定的坐功、细心程度及耐性那是绝对做不到的。有时，把程序做完了需要调试运行，但是就是不能达到自已设计的效果和目的，那你得戴上放大镜找啊找啊，也许就是因为一个符号或一个字母，
你就得花上个几个小时，半天，甚至更长。只要有一颗永不退缩的心，我相信你一定能找到问题所在，最后一定能见到你开心的笑容，也一定能找到成功者的感觉。
通过这个学期的学习，对了VB这种高级语言有了初步的认知，对一些小的程序有了初步的设计方案，能根据要求设计出想要的程序，锻炼了自己的创造性思维，是培养逻辑思维的好方法，同时我经常看同学设计好的程序代码，然后想想别人为什么这么计就能达到效果，我的设计能不能完成更多的功能，这样优秀了自己，帮助了自己，提高了自身水平，同样，也欣赏了别人，对别人是赞美，对自己是帮助，总而言之，这学期的VB课程让我收了很多。
chr码值对应列表大全
Chr("0") 为0的字符Chr("1")Chr("2")Chr("3")Chr("4")Chr("5")Chr("6")
Chr("7") 响铃Chr("8") 回格Chr("9") tab(水平制表符)
Chr("10") 换行Chr("11") tab(垂直制表符)
Chr("12") 换页Chr("13") 回车 chr(13)&chr(10) 回车和换行的组合
Chr("14")Chr("15")Chr("16")Chr("17")Chr("18")Chr("19")Chr("20")Chr("21")Chr("22")Chr("23")Chr("24")Chr("25")
Chr("26") 结束 End
Chr("27") 脱离 Pause breakChr("28")Chr("29")Chr("30")Chr("31")
Chr("32") 空格 SPACE
Chr("33") !Chr("34") "Chr("35") #Chr("36") $Chr("37") %Chr("38") &Chr("39") ’Chr("40") (Chr("41") )Chr("42") *Chr("43") +Chr("44") ,Chr("45") -Chr("46") .Chr("47") /Chr("48") 0Chr("49") 1Chr("50") 2Chr("51") 3Chr("52") 4Chr("53") 5Chr("54") 6Chr("55") 7Chr("56") 8Chr("57") 9Chr("58") :Chr("59") ;Chr("60") Chr("63") ?Chr("64") @Chr("65") AChr("66") BChr("67") CChr("68") DChr("69") EChr("70") FChr("71") GChr("72") HChr("73") IChr("74") J
Chr("75") KChr("76") LChr("77") MChr("78") NChr("79") OChr("80") PChr("81") QChr("82") RChr("83") SChr("84") TChr("85") UChr("86") VChr("87") WChr("88") XChr("89") YChr("90") ZChr("91") [Chr("92") Chr("92") Chr("93") ]Chr("94") ^Chr("95") _Chr("96") `Chr("97") aChr("98") bChr("99") cChr("100") dChr("101") eChr("102") fChr("103") gChr("104") hChr("105") iChr("106") jChr("107") kChr("108") lChr("109") m Chr("110") nChr("111") oChr("112") pChr("113") qChr("114") rChr("115") s
Chr("116") tChr("117") uChr("118") vChr("119") wChr("120") xChr("121") yChr("122") zChr("123") {Chr("124") |Chr("125") }Chr("126") ~Chr("127")Chr("128")Chr("129")Chr("130")Chr("131")Chr("132")
有个简单的查看方法，打开记事本，如要查看“Chr("119") w”，可以按下Alt+119
(先按住Alt不放，然后输入数字，输完后在放开)
注意：数字一定要从旁边的数字键盘输入，否则无效
推荐阅读：
vb资料学习笔记（精选5篇）09-13
如何入门学习vb语言（共6篇）07-08
vb学习心得体会10-11
vb学习心得（精选9篇）03-01
vb课程学习心得（精选9篇）01-23
学习vb的心得体会（共9篇）02-21
vb基本入门学习资料（共6篇）03-21
现代语言学学习笔记（通用6篇）06-29
党课学习笔记11-30
党课学习笔记模板07-01
