全国计算机等级考试复习资料.doc

Visual Basic程序设计基础知识要点（概念分析篇）
知识点1：
（1） 在工程资源管理器窗口中能够包括：工程文献、窗体模块文献、标准模块文献和类模块文献（其中能够包括许多各种文献类型）。
（2） Visual Basic应用程序能够以解释方式执行和编译方式执行。
例题：
（1）如下论述中错误的是 A
A．在工程资源管理器窗口中只能包括一个工程文献及属于该工程的其他文献。
B．以.bas为扩展名的文献是标准模块文献。
C．窗体文献包括该窗体及其控件的属性。
D．一个工程中能够有多个标准模块文献。
（2）如下论述中错误的是 C
A．打开一个工程文献时，系统自动装入与该工程有关的窗体、标准模块等文献。
B．保存Visual Basic程序时，应分别保存窗体文献及工程文献。
C．Visual Basic应用程序只能以解释方式执行。
D．事件能够由用户引起，也能够由系统引起。
知识点2：
（1） 窗体和各种控件的名称（Name）是唯一的，用来标识一个窗体或控件的。而窗体和控件的标题是用来阐明的，是可有可无的。
（2） 各种控件之间有部分相同的属性，并不是拥有所有属性。控件有些属性只能在属性窗口中设置，但也有少数属性只能在代码状态设置。
（3） Form1.Hide措施和Unload Form1措施的区分：第一个措施窗体消失并不存在于内存中；第二个措施窗体消失但仍存在于内存中。
例题：
（1）如下论述中正确的是 A
A．窗体的Name属性指定窗体的名称，用来标识一个窗体。
B．窗体的Name属性的值是显示在窗体标题栏中的文本。
C．能够在运行期间变化对象的Name属性的值。
D．对象的Name属性值能够为空。
（2）如下论述中错误的是 C
A．Visual Basic是事件驱动型可视化编辑工具。
B．Visual Basic应用程序不具备明显的开始和结束语句。
C．Visual Basic工具箱中的所有控件都具备Width和Height属性。
D．Visual Basic中控件的某些属性只能在运行时设置。
知识点3：
（1） 标签(Label1)：Autosize的True属性能够自动调整标签的大小，而False属性不能。
（2） 文本框(Text1)：
1、Maxlength属性表示文本框所能容纳的字符数。
2、Password属性表示口令输入，能够是“*”或“？”等。设置文本框输入字符为“*”：Text1.Password=”*”,还原文本框字符：Text1.Password=””,
3、ScrollBars属性是表示文本框有垂直或水平滚动条，不过需要和多行属性Multiline结合一起使用。
4、SelLength属性是表示选中文本框中字符的个数：Text1.SelLength。SelStart属性是表示选中文本框中字符或光标之前的字符数：Text1.SelStrart。SelText属性是表示选中文本框中的字符：Text1. SelText。
5、文本的重要事件是Change事件：(标签内容随文本框内容变化而变化)
Private sub Command_Change（）
Label1.caption=Text1.text
End sub
6、文本框的措施只有一个：Text1.SetFocus
例题：
（1） 能够取得一个文本框中被选用文本的内容的属性是 C
A．Text B. SelLength C. SelText D. SelStrart
（2） 在窗体上画一个文本框(其名称为Text1)和标签(其名称为Label1)。要求程序运行后，假如在文本框中输入字符，则立即在标签中显示相同的内容。如下能够实现上述操作的事件过程是 A
A．Private Sub Text1_Change（） B. Private Sub Text1_Click（）
Label1.caption=Text1.Text Label1.caption=Text1.Text
End Sub End Sub
C．Private Sub Label1_Change（） D. Private Sub Label1_Click（）
Label1.caption=Text1.Text Label1.caption=Text1.Text
End Sub
（3）命令按钮(Command1):
1、Default属性：当一个命令按钮的Default属性为True时，按回车键和单击该命令按钮的效果相同。
2、Cancel属性：当一个命令按钮的Cancel属性为True时，按ESC键和单击该命令按钮的效果相同。
（4）单项选择按钮和复选框(Option1和Check1)：
1、单项选择按钮：Value属性的值是True(选中)和False(未选中)，Option1.Value=True等同于Option1.Value使用方法。
2、复选框：Value属性的值是0(未选中)、1(选中)和2(表示暂时不可用)。Check1.Value=False能够用，但Check1.Value=True不可用(因为True只能转化数值－1而不是1)。
（5）列表框(List1):
1、List属性是一个数组型属性：List1.List(索引)，索引能够是数字0、1…,List1.listindex,变量i（List1.Text等同于List1.list(List1.listindex)）。
2、MultSelect属性：用来设置一次能够多项选择表项数。MultSelect属性值为0时，每次只能选择一项；MultSelect属性值为1时，能够同时选择多个项目；MultSelect属性值为2时，能够用辅助键Shift或Ctrl选择多个项目。
3、常用措施：AddItem措施表示添加的是一个项目，而Removeitem措施表示通过删除索引的方式删除项目。RemoveItem 索引 索引能够是数字0、1…,List1.listindex,变量i。
（6）组合框（Combo1）：
1、Style属性：Style属性值为0时，表示下拉式组合框；Style属性值为1时，表示下简单组合框；Style属性值为2时，表示下拉式列表框。其他功效类似列表框(List1)。
（7）图片框和图像框(Picture1和Image1):
1、图片框(Picture1)：Autosize属性值为True时，表示图片框大小随图片大小变化而变化；Autosize属性值为False时，表示图片框只能部分显示大图片。
2、图像框(Image1)：Stretch属性为True时，图片大小随图像框的大小变化而变化；Stretch属性为True时，图像框的大小随图片大小的变化而变化。
3、两种图形类型都能够按照下面这个措施加载图片：
Picture1.picture=LoadPicture(App.Path & “\图片名称.扩展名”)
Image1.picture=LoadPicture(App.Path & “\图片名称.扩展名”)
假如要清楚图片：
Picture1.picture=LoadPicture(“”)
Image1.picture=LoadPicture(“”)
注意:假如使用App.Path措施需要先保存好窗体文献和工程文献到考生文献夹中。
（8）滚动条(HScroll1)：
1、Max和Min属性是分别表示滚动条的最大和最小刻度，刻度值用Value属性值来表示：HScroll1.value。
2、LargeChange和SmallChange属性是分别表示移动滚动条上的左右箭头按钮的移动量和移动滚动条上滚动框的移动量。
3、Scroll和Change事件分别表示拖动滚动条上滚动框的操作和单击滚动条上箭头按钮的操作。

（9）计时器(Timer1)：
1、Enabled属性：Enabled属性值为True时，表示计时器能够走动；Enabled属性值为False时，表示计时器停止走动；
2、Interval属性：是表示计时器运动的时间间隔，单位为毫秒。1秒时间：Timer1.Interval=1000。
3、Enabled和Interval这两个属性一般情况下需要一起使用。
知识点4：
（1）Visual Basic常用函数的使用措施：
1、数学函数：
★ 求平方根：Sqr(n)
★ 求自然对数Log(n)àlnn log78=loge8/loge7(注意非e为底的对数需要如此转换)
★ 求以e为底的幂值，ex exàExp(x)
1 n>0
★ Sqn(n)= 0 n=0
★ Rad()-->X=Int(Rnd*(上界—下界+1))+下界（产生随机整数）
2、转换函数：
★ Str(x) 数值x转换成字符串 str(12.75)=” 12.75” 这么转换12.75之前会多出一位。假如使用Cstr(12.75)=”12.75” 这么转换12.75之前不会多出一位。
★ Val(x) 字符x转换成数值，但x要一定是数字字符才行，Val(“12.75”)=12.75,假如是含有其他字符Val(“12.7ab”)将无法转换。
★ chr(x) 返回以x为Asccii代码值的字符 chr(97)= ”a”;Asc(x) 给出字符x的Asccii代码值 Asc(“A”)=65
三种类型ASCII代码值转换：
Asc(“0”)~Asc(“9”)-à48~57
Asc(“A”)~Asc(“Z”)-à65~90
Asc(“a”)~Asc(“z”)-à97~122
特殊情况：Asc(“ABC”)=65 只求第一个字符“A”的Ascii代码值
★ Fix(x) 将数值型数据x的小数部分舍去 Fix(12.8)=12 Fix(-12.5)=-12;
Int(x) 取小于等于x的最大整数 当x>0时，使用方法和Fix同样；当x<0时，Int(-12.3)= -13;
Cint(x) 将数值型数据x的小数部分四舍五入 Cint(12.7)=13 Cint(12.3)=12
不过有特殊情况： x 当x是偶数
Cint(x.5)=
x+1 当x是奇数
3、字符函数
★ Left(x,n) 从x字符串左边起取n个字符 Left("ABCDEFG",3)="ABC";
Right(x,n) 从x字符串右边起取n个字符 Right("ABCDEFG",3)="EFG"。
★ Mid(x,n1,n2) 从字符串x左边第n1个位置开始向右起取n2个字符
Mid(x,n) 从字符串x左边第n个位置开始向右所有取
Mid("ABCDEFG",3,2)= "CD" Mid("ABCDEFG",3)= "CDEFG"
★ Instr(n,s1,s2) 从字符串s1的第n个位置起查找s2在s1中位置，假如n省略，则默认从字符串s1的第1个位置起查找s2在s1中位置
Instr(2,"ABCDEFG","CD")=3
知识点5：
1、运算符：
★ 算术运算符
运算符的优先级： ^ > -- > (* /) > \ > Mod > (+ --)
★ 关系运算符
< <= > >= = <> Like Is 运算符优先级相同
★ 逻辑运算符
运算符的优先级：Not > And > Or > Xor > Eqv
例题：
（1） 体现式4 + 5 \ 6 * 7 / 8 Mod 9 的值是 B
A．4 B. 5 C. 6 D. 7
（2） a=3 b=2 c=1 求 Print a>b>c 的成果？
首先a>b的成果是true,然后再Print True>c 此时True需要转换成-1再比较，Print -1>1 成果是False，因此整个输出成果是False。

知识点6：
1、交互函数的使用：
★ InputBox函数：
A=InputBox("提示信息","标题信息","默认值或输入框的值")
例题：
(1) 执行下列语句后，将显示输入对话框，此时假如单击“确定”按钮，则变量strInput的内容是 C
strInput=InputBox("请输入字符串","字符串对话框","字符串")
A．"请输入字符串" B. "字符串对话框"
C. "字符串" D. 空字符串

★ MsgBox函数：
MsgBox “提示信息”, 按钮类型值+图标类型值+默认焦点值, “标题信息”
A= MsgBox “提示信息”, 按钮类型值+图标类型值+默认焦点值, “标题信息”；A的值依照单击什么按钮有关，A的值在[1,7]之间取值。例如：单击“确定”按钮，A=1。
例题：

（1）以上图形所示的函数体现式为：
MsgBox "请输入查询的学生学号：", 3 + 32 + 256, "学生基本信息查询"
知识点7：
1、选择结构语句（If条件语句）：
★ 单分支条件语句：
格式：① If 条件 Then
语句块
End If （称If块语句）
② If 条件 Then 只有一条语句 （称If条语句）
★ 双分支条件语句：
格式：If 条件 Then
语句块1
Else
语句块2
End If
★ 多分支条件语句
If 条件1 Then
语句块1
Elseif 条件2 Then
语句块2
。。。。。。
Else
语句块n
End If
其中，条件能够是：关系体现式(a>5)、逻辑体现式(a>5 And c>4)、变量(i)或常数(0)。
例题：
（1） 下列程序段的执行成果为 A
X=5
Y=-20
If Not x>0 Then
x=y-3
Else
Y=x+3
End If
Print x-y;y-x
A. -3 3 B. 5 -8 C. 3 -3 D. 25 -25
以上题中的“条件”重要是逻辑体现式。
（2） 下列程序段的执行成果为 B
X=2
Y=1
If x*y<1 Then y=y-1 Else y=-1
Print y-x>0
A. True B. False C. -1 D.1
以上题中的“条件”重要是关系体现式。
（3） 下列程序段的执行成果为 C
Dim x As Integer
If x Then Print x Else Print x-1
A. 1 B. 0 C. -1 D.不确定
以上题中的“条件”重要是变量。
2、选择结构语句（Select Case语句）：
Select Case 测试体现式
Case 体现式列表1
语句块1
Case 体现式列表2
语句块2
。。。。。。
Case Else
语句块n
End Select
注意：测试体现式的类型只能是数值数据或字符型，体现式列表的值只要第一个符合测试体现式值的要求，就结束Select Case语句；体现式列表能够是三种结构或三种混合结构：①、1 To 10 ②、1,3,5,6,7,8 ③、Is>10 ④、1,2,,5,7,Is>10
例题：
（1） 在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1和Text2的文本框，然后编写如下事件过程：
Private Sub Command1_Click()
n=Text1.text
Select Case n
Case 1 T 10
X=10
Case 2,4,6
X=20
Case Is<10
X=30
Case 10
X=10
End Select
Text2.text=x
End Sub
程序运行后，假如在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是 A
A. 10 B. 20 C. 30 D.40
3、选择结构语句（IIF函数）：
变量=IIF(条件，参数1，参数2)
其中，条件能够是：关系体现式(a>5)、逻辑体现式(a>5 And c>4)、变量(i)或常数(0)。执行过程：条件成立，变量的值就是“参数1”，否则变量的值就是“参数2”。
例题：
（1） 设a=6,则执行语句：x=IIF(a>5,-1,0)后，x的值为 D
A. 5 B. 6 C. 0 D. -1
知识点8：
1、循环结构
① For 循环变量=初值 To 终值 Step 步长
循环体
If 条件 Then
语句
Exit For
End If
Next 循环变量
Do
循环体
Loop While 条件
注意：循环假如正常退出时(没有执行Exit For语句)，那么循环变量必须要不小于终值或等于终值+步长。
② Do While 条件
循环体
Loop
Do
循环体
Loop Until 条件

Do Until 条件
循环体
Loop
注意：左边上下两种循环是先判断条件后执行循环体，右边上下两种循环是无论条件成立是否都最少执行一次；While循环是条件成立执行循环体，Until循环是条件不成立执行循环体。
例题：
（1） 下列程序段的执行成果为 B
s=0:t=0:u=0
For x=1 To 3
For y=1 To x
For z=y To 3
s=s+1
Next z
t=t+1
Next y
u=u+1
Next x
Print s;t;u
A. 3 6 14 B. 14 6 3 C. 14 3 6 D. 16 4 3
分析：
A组语句和B语句都在X循环内，并且是并列的，因此能够先计算B组语句，A组语句暂时不算，这么很轻易求出u=u+1语句循环了三次，则u=3；C组语句和D语句都在Y循环内，并且是并列的，因此能够先计算D组语句，C组语句暂时不算，这么也比较轻易求出t=t+1语句循环了六次，则t=6；然后再结合答案很快就能得出答案是选B。
知识点9：
1、数组：
① 数组的概念
★ 等级考试重要考一维数组、二维数组和三维数组(三维的只需懂得数组中能够存储多少数据即可)。数组的格式：a(2,3 To 7,-1 To 2)，那它的存储空间大小计算：每一维用上界-下界+1计算，例如 (2-0+1)*(7-3+1)*(2-(-1)+1)=3*5*4=60。
★ 数组的下标下界是依照语句Option Base n来决定：当n=0时，数组下标下界是从0开始；当n=1时，数组下标下界是从1开始。
★ 数组分为：
固定大小数组: Dim a(10) As Integer
动态大小数组: Dim a() As Integer Redim a(10)
★ Array函数使用方法：为一个变体型变量创建一个数组。
Dim a as Variant
a=Array(1,2,3,4,5)
因此：a(0)=1 a(1)=2 a(2)=3 a(3)=4 a(4)=5
★ 注意：假如数组被定义为一下三种类型，(1) 数值型 (2) 字符型 (3)逻辑型 ，则它们初始化的数组元素数值分别为：0 、空字符串和False 。
例题：
（1） 在窗体上画一个命令按钮（其Name属性为Command1）,然后编写如下代码：
Private Sub Command1_Click()
Dim a(4,4) As Integer
For i=1 To 4
For j=1 To 4
a(i,j)=(i-1)*3+j
Next j
Next i
For i=3 To 4
For j=3 To 4
Print a(j,i)
Next j
Print
Next i
End Sub
程序运行后，单击命令按钮，其输出成果为 D 。
A. 6 9 B. 7 10 C. 8 11 D. 9 12
7 10 8 11 9 12 10 13
分析：
对循环和数组结合的问题，往往要先看B组语句输出成果是什么，然后依照B组语句输出成果代入到A组语句中求成果。
a(3,3) a(4,3)
a(3,4) a(4,4)
B组语句输出成果：

9 12
10 13
代入A组语句的成果：

知识点10：
1、过程与函数：
★ 过程与函数的参数类型有：实参和形参；传递方式有：值传递和地址传递。
★ 如下程序中，x,y为实参；a,b为形参
注意：实参要与形参的类型、个数要相同。
★ 在形参a,b之前假如加上核心字ByVal，那么就是值传递；假如加上核心字ByRef或不加核心字，那么就是地址传递。
★ 过程调用方式有两种：Call Swap(x,y)或Swap x,y (Swap是过程名)

注意：只有地址传递方式才能实现互换功效，值传递方式x,y的值不变。当有事件过程和通用过程一起运行时，先执行事件过程(Command_Click)。
例题：
（1） 假定有如下的Sub过程：
Sub S(x As Single, ByVal y as Single)
t=x
x=t/y
y=t Mod y
End Sub
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click()
Dim a As Single, b As Single
a=5:b=4
S a,b
Print a,b
End Sub
程序运行后，单击命令按钮，输出成果为_____C_____。
A. 5 4 B. 1 1 C. 1.25 4 D. 1.25 1
程序分析：
首先形参x是地址传递方式，当a传递给x时，因此a与x拥有一个共同存储空间，图形表示：；形参y是值传递方式，当b传递给y时，因此b与y是两个不一样存储空间，图形表示：；那么在过程S中：运算x=t/y后，x=1.25，图形表示；因此a的值就是1.25；运算y=t Mod y后，y=1，图形表示:，因为此时b和y存储空间不一样，则不影响b的值，则还是4,因此Print a,b的成果就是选择C答案。
知识点11：
1、菜单和鼠标事件
★ 菜单编辑器的使用：

注意：菜单中的标题能够为空，但无论是第几级菜单名称必须唯一，且不能为空。
★ 鼠标事件（按下鼠标键事件过程）
重要事件有：Form_MouseDown 、 Form_MouseUp 和 Form_MouseMove。目前以某个为例阐明：
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
…
End Sub
上述事件过程不但使用在窗体上(Form_MouseDown),还能够使用于大多数控件上，包括命令按钮(Command1_MouseDown)或文本框(Text1_MouseDown)等。
以上鼠标事件过程的参数，含义如下：
（1）Button 有值1、2和4，分别表示按下左键、右键和中建；
（2）Shift 表示Shift、Ctrl和Alt键的状态，其值分别是1、2和4；
（3）X，Y 表示鼠标光标的坐标位置
★ 弹出式菜单（菜单和鼠标事件的结合使用）
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button=1 Then ‘按下鼠标左键
PopUpmenu File ‘通过PopUpmenu措施弹出菜单
End If ‘File是一级菜单的名称
End Sub
运行效果：

2、公共对话框(又称通用对话框)
★ 通用对话框是我们考试中唯一一个控件箱中没有的控件，需要我们自己添加的，添加的措施是在“工程”菜单的“部件”项中选择“Microsoft Common Dialog Control 6.0”后，才会在控件箱中出现通用对话框图标。
★ 通用对话框图形

依照以上图形，对应的程序代码如下：

注意：CommonDialog.FilterIndex = 索引 （索引是从1开始）
知识点12：
1、文献
文献包括三种：次序文献、随机文献和二进制文献
① 次序访问：文献中数据是以ASCII码存储的。
② 随机访问：文献长度统计是固定不变的，数据类型能够不一样，数据以二进制方式存储在文献中，能够任意时候，任意地方访问。
③ 二进制访问：必须懂得数据是怎样写入文献的。
★ 假如源文献是字符类型，那么读写文献如下所示：
读文献的格式：
Open App.Path & "\文献名(In.txt)" For Input As #文献号(#1)
Do while Not Eof(文献号)
Input #文献号,变量
…
Loop
Close #文献号
写文献格式：
Open App.Path & "\文献名(Out.txt)" For Output(Append) As #文献号(#1