面向对象程序设计VB
VB程序设计 第一章Visual Basic 程序设计概述
VB程序设计第一章Visual Basic 程序设计概述Visual Basic程序设计第一章 Visual Basic程序设计概述1.1 Visual Basic简介Visual Basic（简称VB）是一种面向对象的事件驱动编程语言，它是Microsoft公司开发的一种高级计算机程序设计语言。
VB的主要特点是简单易学、可视化编程、快速开发和广泛应用。
1.2 VB的历史发展VB最初于1991年推出，是作为Windows操作系统的开发工具而设计的。
经过多次版本更新，目前最新的版本是Visual Basic 2019.1.3 VB的编程环境VB使用Visual Studio作为主要的开发工具，提供了可视化的设计界面以及强大的编程功能。
开发者可以通过拖拽控件、设置属性以及添加事件来构建程序界面，并使用VB编写代码逻辑。
1.4 VB的基本语法VB的语法类似于英语，采用英语关键字和固定的语法规则。
VB程序由一系列语句构成，每个语句以换行符或分号结束。
1.4.1 变量和数据类型VB中的变量需要先声明才能使用，可以使用关键字Dim来声明变量。
VB支持多种数据类型，包括整型、浮点型、字符串型、布尔型等。
1.4.2 控制流程VB提供了多种控制流程语句，如条件语句（If-Then-Else语句）、循环语句（For循环、Do循环）以及跳转语句（GoTo语句）等，用于控制程序的执行流程。
1.4.3 函数和子程序VB可以定义函数和子程序来封装一段特定的代码逻辑。
函数可以返回一个值，而子程序则不返回任何值。
开发者可以在程序中调用函数和子程序来实现代码的重复利用。
1.5 VB的应用领域VB广泛应用于Windows环境下的软件开发，尤其在企业管理系统、数据库应用、人机交互界面等方面具有重要地位。
附录：本文档涉及附件本文档的附件包含了VB相关的示例代码、项目文件以及其他相关文档，可以帮助开发者更好地理解和学习VB程序设计。
法律名词及注释：1.Visual Basic（VB）：一种面向对象的事件驱动编程语言。
VB程序概述
Visual Basic 概述VB语言是一种面向对象的可视化程序设计语言一、面向对象程序设计的基本概念面向对象程序设计：面向对象的程序设计通过类、对象、继承、多态等机制形成一个完善的编程体系。
它是一种以对象为基础、以事件驱动对象对事件进行处理的程序设计技术。
对象：概念：对象既包含数据，又包含接受事件后对数据进行操作的方法，将两者封装起来的一个独立逻辑实体。
也就是说，对象都有自己的属性（数据）、方法、事件。
对象包含属性和方法，能够识别和响应一定的事件。
事件刺激对象，用一定方法处理数据，从而完成一定的功能任务。
属性：定义：用来描述对象的特征。
包括公共属性和专业属性。
设置：每个对象的属性都有一个默认值，可在属性窗口中设置改变，也可在代码窗口中通过编程设置改变（格式：对象名.属性名称=属性值）。
事件：定义：指对象能够识别并做出反应的外部刺激。
每个事件都有其事件名。
对象事件是由VB预先定义好的能被对象识别和响应的动作。
分类：系统事件：由系统或对象自己的产生的，如Load事件。
用户事件：由用户操作引起的事件，如Click事件。
驱动机制：事件发生→刺激对象→对象响应→执行事件代码→完成一定功能（所执行的事件代码称为事件过程）能由用户引发也可以由系统引发。
VB应用程序的运行过程就是对事件的处理过程。
事件过程格式：Private Sub 对象名_事件名()[括号不能省略]……End Sub方法：定义：指系统已设计好的、在编写事件过程中可以使用的一些特殊程序。
从而实现完成显示、隐藏、移动、聚焦、卸载、加载、打印等功能。
不同对象具有不同的方法，方法的内容是不可见的，用户只需要知道有哪些方法，完成哪些功能，熟悉其使用规则即可。
使用格式：对象名.方法名[参数1,][参数2,]…[参数n]常用方法：Print、Show、Cls、SetFocus类：概念：具有相同性质的对象的集合，类中的每个单个对象称为类的一个实例。
属于同一类的对象具有同一组属性、事件、方法，只是类的对象一旦建立，每个对象的属性值、响应事件、设计方法可以不同。
程序设计基础知识2(VB应用程序建立和面向对象程序设计)
20.有VB程序设计界面部分截图如第28题图所示，观察分析可知：
（1）该对象的名称是_。
（2）“Interval”是该对象的；“1920”是。（选填：对象名/属性名/属性值）。
C. Form_ClickD. Form_DblClick
3． 设置窗体标题时，应改变窗体的 ( )
A、Name属性B、Caption属性
C、BackColor属性D、Font属性
4．在Visual Basic中，语句List_11.AddItem "hello"中的“AddItem”是( )
A.对象名B.方法名C.属性值D.事件
B. Form VB程序 Caption
C. Form1 Caption VB程序
D. Form1 VB程序 Caption
8．下列关于对象的描述中，错误的是( )
A.对象的属性用于描述对象的状态
B.对象的属性与方法可以有多个
C.对象事件的发生会驱动对象相应事件处理过程的执行
D.对象的属性值只能在属性窗口中设置
5．有如下VB程序段：
Private Sub Command1_Click()
Dim s As String
s =Str(Val("20") + Len("student"))
Label1.Caption = s
End Sub
下列说法正确是 ( )
A．发生事件的对象名为“Label1”
B．这是一个“鼠标单击”事件
D.工程的名称是“圆”
17．某VB窗体上有一个文本框、一个命令按钮和一个标签，对象如下表所示：
对象类型
窗体
面向对象程序设计第1章 VB程序设计概述
1.3 VB的安装和启动
❖ 运行环境：586、16MB内存、100MB硬盘 Windows95/98以上
❖安装 ❖启动
1.4 集成开发环境
❖ 窗体与工具箱
界面设计示例
利用工具箱的工具在 窗体中画出各个对象
1.4 集成开发环境
❖ 属性窗口
在窗体中选中一 个对象，即可在属 性窗口中查看该对 象有哪些属性以及 属性的取值。
❖工具栏：常用菜单项的快捷工具（如运 行按纽）
1.4 集成开发环境
❖ 关于集成开发环境的说明
将鼠标置于工具栏和工具箱的工具一段时间， 可弹出该工具的简要说明。
对于各窗口，可执行视图菜单下的子菜单交 互显示。
面向对象程序设计
第1章 VB程序设计概述
➢1.1 VB简介 ➢1.2 VB功能特点 ➢1.3 VB的安装和启动 ➢1.4 集成开发环境
1.1 VB简介
❖程序欣赏
VB简介：Visual+Balsic
1.2 VB功能特点
❖1、提供了面向对象的可视化编程工具
程序员在界面设计时只需利用现有工具根据界面设计要 求在窗体中“画出”命令按纽、文本框等对象。
1.2 VB功能特点
❖2、事件驱动的编程机制
1.2 VB功能特点
❖3、界面友好、交互式开发
可视化的界面 强大的出错示功能 交互开发
鼠标双击按纽，代码 窗在输口入自代动码弹时出,并提完供成了 部强分大代 的码 提示。功能.
1.2 VB功能特点
❖4、完善的联机帮助功能
MSDN帮助：帮助>>内容\索引\搜索 对象浏览器帮助：视图>>对象浏览器 在线帮助
❖ 代码窗口
交互式开发：在 窗体中双击某个对 象，即可弹出代码 窗口并完成部分代 码。
第2章VB程序设计
2.类
类是创建对象实例的模板，是同种 对象的集合与抽象，它包含所创建对象 的属性描述和行为特征的定义。类含有 属性和方法，它封装了用于类的全部信 息。 在VB中，所见到的类大多是系统 已经设计完成的，我们只需使用就可以 了，如VB工具箱中的可视类图标是VB 系统设计好的标准类控件。
对象中的数据，所有对象都有自已的 属性。它们是用来描述和反映对象特征 的参数。例如：控件名称（Name)、标 题（Caption)、颜色（Color)、字体 （FontName)等属性决定了对象展现给 用户的界面具有什么样的外观及功能。
对象属性设置的方法：
方法一： 在设计模式下，通过属性窗口直 接设置对象的属性。 方法二： 在程序的代码中通过赋值实现， 其格式为：
注意：这四个 属性决定窗体 （或控件）的 大小，在容器 中的位置。如 右图。
3．Caption 标题属性： 决定出现在窗体的标题栏上的文本内容，也
是当窗体被最小化后出现在窗体图标下的文本。
4 字体Font属性组 FontName属性是字符型，决定对象上正文的字体（缺省 为宋体）。 FontSize属性是整型，决定对象上正文的字体大小。 FontBold属性是逻辑型，决定对象上正文是否是粗体。 FontItalic属性是逻辑型，决定对象上正文是否是斜体。 FontStrikeThru属性是逻辑型，决定对象上正文是否加 一删除线。 FontUnderLine属性是逻辑型，决定对象上正文是否带下 划线。
第11章 面向对象程序设计语言—VBA
对象
表示实体，如一个学生等。一种对象包含多种属性，如 学号、姓名、入学总分、所在班级等。对象还带自己的方法， 即对象所能执行的行为，如查询学生情况等。
典型Access应用程 序是由窗体、表、查询 和其他对象构成的集合。 数据库窗口把可供选择 的对象排列在一起，形 成不同的类。
换不同类的数据库对象
属性和方法
事件代码
窗体模块代码：
Option Compare Database Private Sub bClear_Click() Me!tText.SetFocus ' 聚焦文本框 Me!tText.Text =“ ” ' 清空文本框表面文字 End Sub Private Sub bOk_Click() Me!tText.SetFocus ‘ 聚焦文本框 Me!tText.Text = “欢迎学习VBA!” ' 显示文字 End Sub
变量、常量与数据类型
常量、变量与数据类型
数据类型：划分变量的种类，以表示不同种类的数据。
常量：数据的字面值。
字面常量：如3.721、“VBA”、#2006-7-1#
符号常量：用Const语句说明，可在模块中引用 系统定义常量：True、False、Null等
变量：数据代名词，变量名可随意定义，但不能与VBA关键
Dim a(10) As Integer, i As Integer For i = 0 to 10 a(i) = 0 Next i
默认地，数组下标从零开始。可使其从其他值开始： 在模块顶部添加 Option Base 语句。例如，语句 Option Base 1 Dim a(10) As Integer 声明的数组有10个元素。下标起始值为1。 也可用To子句对数组下标显示声明，例如，语句 Dim a(1 To 10) As Integer
VB程序设计面向对象程序设计初步
• Selected：选择属性。值为True或False。该 属性只能在程序代码中使用 。
✓常用属性：
•Name •Text：文本属性。值为用户从文本框输入的内容。 •PasswordChar：口令属性。 •MaxLength：最大长度属性。缺省值为0，表示 可接收任意个字符。 •MultiLine：多行属性。值为“True”可输入多行 文本。只在设计时设置。 •ScrollBars:滚动条属性。可设置值为0、1、2、3， 分别表示无滚动条、只有水平滚动条、只有垂直 滚动条、水平和垂直滚动条都有。
装载窗体时触发。 • Unload：用Unload语句卸载窗体时触发。 • Resize：窗体大小被改变时触发。 • Activate：当窗体变为当前窗体时触发。 • Deactivate：当窗体变为非当前窗体时触发。 • Paint：用Show方法显示窗体或窗体界面需要重绘
（如增大窗体宽度或高度等）时触发
5
2.2.3 窗体的常用方法
• Show：显示方法。此方法会自动将尚未装入内存的窗体装入，
并触发Load事件、Activate事件、Paint事件（注意先后次序）。
• Hide：隐藏方法。
• Print：打印方法。 • Cls: 清除屏幕上用Print方法输出的内容。 • Move：移动方法。用以移动窗体或控件。
6
常用的三条语句
Load语句：Load 窗体名
触发窗体的Load事件，把窗体装入内存，但不 显示它。
Unload语句：Unload 窗体名
触发窗体的Unload事件，把窗体从内存卸载。 如果卸载的对象是程序唯一的窗体，则将终止 程序的运行。
2.1面向对象程序设计方法简介
6．事件(event) 事件就是发生在对象上的事情，通常是由用户在对象上激发的一种动作。 一个事件的发生，可以引起某个对象上某个方法(事件处理过程)的执行，即由某 个事件驱动了相应的事件处理过程的执行。这就是面向对象程序设计中的事件驱 动概念。 事件处理过程一般格式如下：
Private Sub 对象名称_事件名称()
的信息：
其中的“Caption”是“Label1”的 )
(A
A．属性名
B．方法
C．属性值
D．事件名
9．在VB中，以下关于命令按钮的属性和事件说法错误的是
A．如果把一个命令按钮的Name属性设置为“True”，则( 程B序)
运 行过程中会发生不可预知的错误
B．命令按钮只能识别Click事件 C．通过设置命令按钮的Visible属性，可以使该按钮可视或不
③图中的对象Timer1，在程序运行 过程中会不会显示_____不__会_____。
12．数制转换程序运行界面如下图所示：
①窗体中共有______8______个对象，其中文本框有______3______个。 开始不②起“作转用换，”则按应钮将CoCmommamnadn1d的E1的部na_分_b_属l__e性_d_如__下__图_属所性示设，置若为F想a_使_l_此s_e_按__钮__一_。
③按钮Command2不起作用，原因是 _____C_o_m_m_a_n_d_2_的_E_n_a_b_l_e_d_默__认_属__性__值__设__置_成__F_a_l_s_e_____________________________。
第二章 Visual Basic程序设计
2．1 面向对象程序设计方法简介
1．面向对象程序设计 面向对象程序设计(简称OPP)方法，其核心是对象功能的实现 和表达。Visual Basic即是一种面向对象的程序设计语言。 2．Visual Basic Visual Basic简称VB，是一种Windows环境下应用程序开发 的工具。用VB开发的应用程序具有“可视化”和“事件驱动”两 个重要特征。
第02章 VB简单程序设计
2.3.1 标签 2.3.2 文本框 2.3.3 命令按钮
2.3 基本控件
VB6.0控件分为三类： 标准控件(内部控件)：由VB本身提供的控件，如 标签、文本框、图片框等。启动VB后，这些控件 就显示在工具箱中，既不能添加，也不能删除。 ActiveX控件：以前版本中称为OLE控件或定制 控件。这些控件使用前必须添加到工具箱中，否 则不能在窗体中使用。 可插入对象：是由其他应用程序创建的不同格式 的数据，如Microsoft Excel。因为这些对象能添 加到工具箱中，所以可以把它们当作控件使用。
2.2.2 窗体的属性、方法和事件
（3）常用事件 Activate、Deactivate事件：当窗体变为活动窗 口时触发Activate事件，而在另一个窗体变为活 动窗口前触发Deactivate事件。 UnLoad事件：当从内存中清除一个窗体时触发该 事件。如果重新装入该窗体，则窗体中所有的控 件都要重新初始化。 Click事件：单击鼠标左键时发生的事件。程序 运行时，单击窗口内的空白处将调用窗体的 Form_Click事件过程，否则调用控件的Click事件 过程。
2.1.2 对象的三要素
（3）事件(Event) 所谓事件，是由VB预先设置好的、能够被对象 识别的动作。例如：Click(单击)、DblClick(双击)、 Load(装入)、Gotfocus(获得焦点)、Activate(被激 活)、Change(改变)等。 不同的对象能够识别的事件也不一样。例如， 窗体能识别单击和双击事件，而命令按钮只能识别 单击事件。 当事件由用户触发(如Click)或由系统触发(如 Load)时，对象就会对该事件做出响应；响应某个事 件后所执行的操作是通过一段代码来实现的，这段 代码就叫做事件过程。
第一讲 vb面向对象程序设计
教学目标： 1、 理解算法的含义。 2、 理解对象的三要素以及什么是面向对象的程序设计。 3、 了解 vb 中常用的控件的属性事件和方法。 4、 用学到的简单语句和常用的控件去编写简单的实用程序。
本课程主要以讲座和上机实践的形式为主。因为编制的是比较小的程序，所以没有必要 分工合作。但是调试个人的程序时常常出错，由于思维惯性很难查出错误所在，所以互相帮 助，互相检查程序、排错就显得很必要。因此要把相邻的同学分组。
如窗体的caption属性决定窗体标题栏中显示的内容name属性设置窗体的名称height和width属性决定窗体的初始大小top和left属性决定窗体的位置maxbutton和minbutton属性决定窗体能否最大化或最小化等
第一讲 面向对象的编程思想介绍
知识点关键字：算法、对象、属性、事件、方法、控件 技能操作：VB 的基本操作 用 VB 编制简单程序
VB中的对象具有自己的属性、方法和事件。如窗体的Caption属性决定窗体标题栏中显 示的内容，Name属性设置窗体的名称，Height和Width属性决定窗体的初始大小，Top和left 属性决定窗体的位置，MaxButton和MinButton属性决定窗体能否最大化或最小化等。不同 的对象有许多相同的属性，也有许多不同的属性。对象的属性可以在设计程序界面时通过 属性窗口设置，也可以在运行时通过程序代码设置。（两种改变属性的方法） 例一：
《VB面向对象的程序设计》校本课程设计
《VB面向对象的程序设计》校本课程设计一、校本课程：VB面向对象的程序设计教学材料：创编课程类型：讲授型、实验探究型、活动交流型。
授课时间：一学年。
授课对象：高一年级中程序设计的爱好者。
二、校本课程的具体内容：知识与技能：认识VB对象的属性与方法，理解事件、事件过程和事件驱动的概念，了解VB的可视化编程。
过程与方法：熟悉VB界面，制作简单的程序界面，能够通过属性窗口更改对象属性，认识事件和事件过程的概念并制作出一个小程序。
情感态度与价值观：通过实践演示并由学生自己动手操作编辑简单实用小程序，引发学生学习计算机程序的兴趣，从而形成积极主动学习使用计算机解决问题的习惯。
校本课程目录：第一课：我的第一个VB程序第二课编写程序代码第三课：认识各国国旗第四课：做个简单的文本编辑器第五课：“你猜对了吗？”----分支结构的程序设计第六课：让飞机飞起来----循环结构的程序设计第七课：编译软件三、校本课程实施方法和形式：实施方法：教案讲授，学生讨论分析综合实践。
实施形式：教师设计、组织主持，学生设计、集体实践四、校本课程教学评价：部分学生评价：VB程序设计是一个比较抽象的概念，不易理解，但在老师的举一反三的例证和深入浅出的讲解之下，能最大层度的激发我们的兴趣，调动我们学习参与的积极性。
在整个课程中，我们不但能了解了VB的一些最基本的功能，也能简单的编辑一些实用的小程序。
我想，这也为我们以后进一步的学习打下良好的基础。
教师教学自我评价：本校本课程是VB面向对象的程序部分，根据我校学生的自身特点，在教材自身的知识基础上加入了一些常规对话框的制作，如自然数相加自然数的制作，文本框的设计等等，充实了教材的内容，满足了学生的求知欲和好奇心，学生基本能全程参与，积极动手。
经过一学年的学习，学生基本能了解的程序设计的对象的概念，设计并制作一些简单的实用的对象，如仿制操作系统中的文本框，制作文件的保存对话框等等，基本达到了开设这门课的目的。
面向对象程序设计第三章 VB语言基础
系统提供的常量：vbNewLine、vbLeftButton等
3.3.3 变量和常量的命名
❖ 字母、汉字、数字和下划线组成，以字母、汉 字开头，长度小于255个字符
❖不使用VB关键字，如Dim Integer As Integer错
❖ 不区分大小写
3.4 运算符与表达式
❖3.4.1 运算符 ❖3.4.2 表达式 ❖3.4.3 常用数学函数
面向对象程序设计
第三章 VB语言基础
➢3.1 编码规则 ➢3.2 数据类型 ➢3.3 变量与常量 ➢3.4 运算符与表达式
3.1 编码规则
❖ 语句不区分大小写，VB具有自动转换功能
按Enter
❖ 语句书写自由：一行可写多条语句，用“:” 隔开；一行写不下，本行以空格加上“_”结
❖束 支持语句注释，使用“ ‘ ”，表明其后为注 释
叫你去操场找一个叫张山的人，如果只告诉你他 是一个人好找吗？如果告诉你他有180cm高，留有 辫子，这好找吗？
我们在设置对象变量时也一样，为了确保对象引 用的安全性和高效率，我们往往以对象的类型名称来 取代Object，如Dim ft As Form。换句话说，Dim 变 量 As Object常用于事先不知道所引用的对象是何种 类型对象的时候。
3、Exp(Number)、Log(Number)
4、Sqr(Number)
示例：Sqr(4)值为2
3.4.3 常用内部函数
❖ 转换函数
1、CInt(Expression) CLng(Expression) CSng(Expression) CDbl(Expression)
示例：CInt(“14” + “3”)值为143 示例：CLng(“14” + “3”)值为143
342VB程序设计语言基础
(2)窗体
应用程序最终面向用户的窗口。窗体文件名的后缀是.frm 。该
文件存储窗体上使用的所有控件对象、对象的属性、对象的事件过程 及程序代码。
(3)对象 ①什么是对象 VB是一种面向对象的开发工具，到底什么是对象呢？简单地 说，对象就是事物。 我们在现实生活中见到的各种事物，比如一个人是一个对象， 一台计算机是一个对象，一辆汽车也是一个对象。 ②什么是类 类可以说是建立一个对象的模型，以同一个模型便能建立相同
钮的单击事件，并自动调用该命令按钮的单击事件过程，以此来完成 相应的动作。事件过程的一般格式如下：
Private Sub 对象名称_事件名称( )
…… 事件响应程序代码，我们写的
……
End sub 5．VB的赋值语句 计算机程序中的语句一般是一种用来描述或规定计算机应该完成 的一串操作命令。VB程序中可以在一行上写一个语句，也可以在一行 上写多个语句，一行上相邻两个语句之间用冒号(：)分隔。 赋值语句的作用是把赋值号(等号)右边表达式的计算结果存储到赋 值号左边的变量或某个特定的对象属性中，其格式如下： 变量名＝表达式 对象名．属性名＝表达式 例如有语句： A＝1＋2*3，执行完该语句就将等号右边表达式结 果（7）赋值给变量A。
④图中“计算”是对象的名称
A．①④
B．①②
C．②③
D．③④
【答案】 C
【解析】4错，“计算”是对象的属性值。
9．如右图在输入″Command1.″后出现了一个下拉菜单，菜
单中的″Move″是Command1的
A．属性
B．事件
C．名称
D．方法
【答 案】 D
面向对象程序设计(VB)
江西财经大学考试试卷试卷代码： 03694A卷授课课时：80课程名称：面向对象程序设计（VB）适用对象：选课班一、填空题（每空1分，共16分）1.构造函数和析构函数的意义分别是和。
2.命令窗口用于在集成开发环境中发出命令或调试和计算表达式，它有和两种模式。
3.ReDim语句重定义数组大小时，缺省情况下原数组中的存储的数据会丢失，但可以使用关键字来保证原数组中的数据能保留下来。
4.CLR的中文含义是。
5.为了方便用户操作，系统在FileDialog的基础上，系统已派生了和文件对话框类。
6.过程为应用程序的启动点，也就是运行代码时最优先访问的函数。
7.语句允许用户直接使用在其他命名空间中定义的类及类型，而无需使用限定引用。
8.窗体是继承.NET类库中的类。
9.类提供访问文件的方法，包括标准输入、输出和错误设备。
10. 要进行二进制文件存取，必须创建与对象。
11. 在任何图形绘制之前，一定要先用类创建一个对象。
12.对象是DataSet对象和数据源之间的桥梁。
二、单项选择题（从下列各题四个备选答案中选出一个正确答案，并将其代号写在答题纸相应位置处。
答案错选或未选者，该题不得分。
每小题2分，共16分。
）1.以下关于静态成员正确的说法是A．静态成员可以不用Static修饰符修饰B．静态成员只能用类名访问C．静态成员和非静态成员不能同时在类中定义D．静态成员可以被类的实例调用的工程文件是以扩展名来保存。
A．.slnB．.vbC. .vbprojD．.sou3.在类视图窗口以结构显示当前工程中的所有类。
A．树状结构B．下拉列表C．菜单D．表4.以下不是数据提供程序所提供的四个核心对象。
A．ConnectionB．DataReaderC．ParserD．DataAdapter5.有关继承下列说法不正确的是A．所有类缺省都是可继承的，除非在类定义时使用NotInheritable关键字修饰。
B．在中，一个类的基类可能有多个。
面向对象程序设计(VB编程)
实现程序功能的最小单位——方法（过程 、函数）
方法（过程）的定义
◦ Sub 方法名(参数)
……
◦ End Sub
方法（函数）的定义
◦ Function 方法名(参数)
…… Return 返回值
◦ End Function
传统的VB的程序构成
源文件（.vb)
模块1 （Module）
清华大学出版社
学习方法
如何能较快地掌握系统开发技能？
专一地、深入地学精一种程序语言 每天花一点时间在计算机上实践操作 多练习——试着自己编程 不要仅仅依靠教材，要多看技术文档 多交流 亲自编写一个完整的小系统
ቤተ መጻሕፍቲ ባይዱ
一些有用的Web资源
Microsoft VB开发人员中心网站
/*设计者：于宝君 时间：2010-3-15 Ver:1.0 功能：判断给定年份是否为闰年 */ int IsLeapYear(int year) { if((year % 4==0 && year % 100 != 0) || (year%400==0)) //这里是判断是否是闰年的
else
}
return 1; return 0;
支持自反赋值运算符
◦ a+=b 等价于 a=a+b
声明一个变量，相当 于在计算机内存中分 配了一个用于存储指 aNumber 42 43 定类型数据的“房间” 变量的名称相当于 “房间号”，程序通 过“房间号”来寻找 数据
aNumber = 43 aNumber 42 +1 +1
变量的基本类型
VB类型 公共语言 运行库类 型结构 Int32 占用 空间 取值范围 数值型 Integer
VB第6章 面向对象程序设计基础
6.2
类和对象的定义
从形式上看，类是从结构演变而来的。但结构 中只能包含数据成员，不能包含属性、事件和方法， 而类中既可以包含数据成员，也可以包含属性、事 件和方法。 也就是说，类将数据与属性、事件和方法封装在 一起，组成一个不可分割的整体。 这就是面向对象程序设计封装性的基本技术。 类的成员包括数据成员、属性、事件和方法。
把D类定义在窗体类中。 又如，程序段：
Class D … End Class Public Class Form1 … End Sub
把D类和窗体类并列定义。
与变量定义一样，不论类定义在什么位 置，都要遵从先定义后使用的原则。如果违 背这个原则就会出现语法错误。
6.2.2
对象的定义与访问
类是抽象的，对象是具体的。在程序中，类 定义之后，就可以定义对象。 类与数据类型的性质相似，它可以看作是一 种数据类型。 用类定义一个对象，实际上就是定义该类的 一个变量。 所以，有时把对象称为对象变量，或称为类 的实例。
1．对象定义语句
在定义类对象之后，才能建立数据的存储空间，调用类 的方法。 定义对象语句的一般格式： [ Dim|Private|Public ] <对象名> As [New] <类名> 其中，关键字Dim、Private和Public的含义与普通变量的 含义相同。 关键字New用来创建类的实例（即分配存储空间）。类 名所指的类可以为预定义类，也可以为用户自己定义的类。 功能：定义对象，并创建类的实例。 例如： Dim D1 As New D 定义对象D1，并创建类的实例，即给D1分配存储空间。 该语句实际上等价如下两条语句： Dim D1 As D D1=New D
只有Public成员才能在类外被访问，而 对象Date1的成员year、month和day访问特性都是 Private的，在类外不能被访问。 即在类外若有以下访问形式将导致编译错误： Date1. Month Date1. day Date1. Year
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
江西财经大学考试试卷试卷代码：03694A 卷授课课时：80课程名称：面向对象程序设计（VB）适用对象：选课班一、填空题（每空1分，共16分）1. 构造函数和析构函数的意义分别是_________ 和 ______ 。
2. 命令窗口用于在集成开发环境中发出命令或调试和计算表示式，它有和______ 两种模式。
3. ReDim语句重定义数组大小时，缺省情况下原数组中的存储的数据会丢失，但能够使用关键字 _______ 来保证原数组中的数据能保留下来。
4. CLR的中文含义是 _______ 。
5. 为了方便用户操作，系统在FileDialog 的基础上，系统已派生了和_____ 文件对话框类。
6. ______ 过程为应用程序的启动点，也就是运行代码时最优先访问的函数。
7. ______ 语句允许用户直接使用在其它命名空间中定义的类及类型，而无需使用限定引用。
8. 窗体是继承.NET类库中的_______ 类。
9. ______ 类提供访问文件的方法，包括标准输入、输出和错误设备。
10. 要进行二进制文件存取，必须创立_________ 与 _______ 对象。
11. 在任何图形绘制之前，一定要先用_________ 类创立一个对象。
12. ______ 对象是DataSet对象和数据源之间的桥梁。
二、单项选择题（从下列各题四个备选答案中选出一个正确答案，并将其代号写在答题纸相应位置处。
答案错选或未选者，该题不得分。
每小题2分,共16分。
）1. 以下关于静态成员正确的说法是________A. 静态成员能够不用Static修饰符修饰B. 静态成员只能用类名访问C. 静态成员和非静态成员不能同时在类中定义D. 静态成员能够被类的实例调用2. 的项目文件是以 ______ 扩展名来保存。
A. .sinB. .vbC. .vbprojD. .sou3. 在类视图窗口以_______ 结构显示当前项目中的所有类。
A. 树状结构B. 下拉列表C. 菜单D. 表4. 以下_______ 不是数据提供程序所提供的四个核心对象。
A. Conn ecti onB. DataReaderC. ParserD. DataAdapter5. 有关继承下列说法不正确的是________A. 所有类缺省都是可继承的，除非在类定义时使用Notlnheritable 关键字修饰。
B. 在中，一个类的基类可能有多个。
C. 为了防止基类中需要封装保密的成员在派生类中被泄露出来，派生类定义的访问权限必须比其基类更为严格或者至少与之相同。
D. 在Visaul Basic .NET 中，一个类的基类只能有一个。
6. 在中，关于构造函数的说法，下列说法不正确的是___________A. 能够指定构造函数的返回值B. 构造函数能够重载C. 构造函数的过程能够带有参数D. 构造函数的过程名一定是New7.菜单控件支持事件。
A. ClickB. MouseDow nC. KeyPressD. Leave8.Err 对象的属性返回了错误号A. NumberB. SourceC. Description资料内容仅供您学习参考，如有不当或者侵权，请联系改正或者删除。
D．HlepContext三、阅读程序, 根据要求回答问题。
( 每小题每5分, 共20分)1. 指出以下文件操作程序代码的功能, 并画出Windows 窗体的界面图。
Pri vate Sub Butt on1_Cl i ck(ByVal sender As Syst em. Obj ect , ByVal e As Syst em. Event Args) Handl es But ton1.Cl i ckOpenFileDialog1.Filter = " 文本文件(*.txt)|*.txt|RTF 格式文件(*RTF)|*RTF"OpenFileDialog1.FilterIndex = 1OpenFileDialog1.Title = " 打开文件"OpenFileDialog1.InitialDirectory = Application.StartupPathOpenFileDialog1.RestoreDirectory = TrueOpenFileDialog1.ShowDialog()Fname = OpenFileDialog1.FileNameIf (Fname <> "") ThenIf (OpenFileDialog1.FilterIndex = 1) ThenRichTextBox1.LoadFile(Fname,RichTextBoxStreamType.PlainText)ElseRichTextBox1.LoadFile(Fname,End IfRichTextBoxStreamType.RichText)资料内容仅供您学习参考，如有不当或者侵权，请联系改正或者删除。
StatusBar1.Panels(0).Text = ”读状态”StatusBar1.Panels(1).Text = ”未保存”End IfEnd SubPrivate Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.ClickSaveFileDialog1.Filter = " 文本文件(*.txt)|*.txt|RTF 件(*RTF)|*RTF"格式文SaveFileDialog1.FilterIndex = 1SaveFileDialog1.Title = " 保存文件"SaveFileDialog1.InitialDirectory = Application.StartupPathSaveFileDialog1.RestoreDirectory = TrueSaveFileDialog1.ShowDialog()Fname = SaveFileDialog1.FileNameIf (Fname <> "") ThenIf (OpenFileDialog1.FilterIndex = 1) ThenRichTextBox1.SaveFile(Fname,RichTextBoxStreamType.PlainText)ElseRichTextBox1.SaveFile(Fname,RichTextBoxStreamType.RichText)End If资料内容仅供您学习参考，如有不当或者侵权，请联系改正或者删除。
StatusBar1.Panels(0).Text = " 写状态"StatusBar1.Panels(1).Text = " 已保存"End IfEnd SubPrivate Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.TickStatusBar1.Panels(2).Text = DateTime.Now.ToString("T")End SubPrivate Sub RichTextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RichTextBox1.TextChanged RichTextBox1.Modified=falseIf RichTextBox1.Modified ThenStatusBar1.Panels(1).Text = " 未保存"ElseStatusB ar1.Panels(1).Text = ”已保存”RichTextBox1.Modified=falseEnd IfEnd Sub2. 指出下列程序的运行结果, 并说明该程序的功能。
Module Module1WithEvents frm1 As New Form()Dim label1 As New Label()资料内容仅供您学习参考，如有不当或者侵权，请联系改正或者删除。
Sub Main()label1.Size = New Size(80, 20)label1.BackColor = Color.Yellowlabel1.TextAlign = ContentAlignment.MiddleCenterlabel1.BorderStyle = BorderStyle.Fixed3D frm1.Controls.AddRange(NewSystem.Windows.Forms.Control(){label1})Application.Run(frm1)End SubPublic Sub frm1_MouseMove(ByVal sender As Object, ByVal e AsSystem.Windows.Forms.MouseEventArgs) Handles frm1.MouseMovelabel1.Location = New Point(e.X, e.Y - 15) label1.Text = "X=" & e.X & ",Y=" & e.Y End SubEnd Module3. 分析下列程序的运行结果, 说明该程序的功能。
Public Class loginInherits System.Windows.Forms.Form #Region " Windows 窗体设计器生成的Code "‘系统自动创立的程序, 为了节省篇幅, 在此处省略。
#End RegionDim mymdimain As MainMDI资料内容仅供您学习参考，如有不当或者侵权，请联系改正或者删除。
Private Sub btnOk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOk.ClickIf txtUserName.Text.Trim = "" ThenshowMsg(" 用户名不许为空! ")txtUserName.Focus()Exit SubEnd IfIf txtPassWord.Text.Trim = "" ThenshowMsg(" 密码不许为空! ")txtPassWord.Focus()Exit SubEnd IfDim i As IntegerDim strsql As StringDim mydataset As New DataSetDim myTable As DataTableDim uname As StringDim psw As Stringuname = Trim(txtUserName.Text)psw = Trim(txtPassWord.Text)Trystrsql = "SELECT * FROM Operator WHERE Name= '" + uname资料内容仅供您学习参考，如有不当或者侵权，请联系改正或者删除。