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

1、精品Visual Basic程序设计基础知识要点（概念分析篇）知识点 1：（ 1 ） 在工程资源管理器窗口中可以包含：工程文件、窗体模块文件、标准模块文件和类模块文件（其中可以包含许多各种文件类型）。（ 2 ） Visual Basic 应用程序可以以解释方式执行和编译方式执行。例题：（1 ）以下叙述中错误的是AA 在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件。B以 .bas 为扩展名的文件是标准模块文件。C窗体文件包含该窗体及其控件的属性。D 一个工程中可以有多个标准模块文件。（2 ）以下叙述中错误的是CA 打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文

2、件。B保存 Visual Basic程序时，应分别保存窗体文件及工程文件。CVisual Basic应用程序只能以解释方式执行。D 事件可以由用户引发，也可以由系统引发。知识点 2：（ 1 ） 窗体和各种控件的名称（ Name ）是唯一的，用来标识一个窗体或控件的。而窗体和控件的标题是用来说明的，是可有可无的。（ 2 ） 各种控件之间有部分相同的属性，并不是拥有所有属性。控件有些属性只能在属性窗口中设置，但也有少数属性只能在代码状态设置。（3 ）Form1.Hide方法和 Unload Form1方法的区别：第一个方法窗体消失并不存在于感谢下载载精品内存中；第二个方法窗体消失但仍存在于内存中。

3、例题：（1 ）以下叙述中正确的是AA 窗体的Name属性指定窗体的名称，用来标识一个窗体。B窗体的Name属性的值是显示在窗体标题栏中的文本。C可以在运行期间改变对象的Name属性的值。D 对象的Name属性值可以为空。（2 ）以下叙述中错误的是CA Visual Basic是事件驱动型可视化编辑工具。B Visual Basic应用程序不具有明显的开始和结束语句。CVisual Basic工具箱中的所有控件都具有Width和 Height属性。D Visual Basic中控件的某些属性只能在运行时设置。知识点 3：（1 ）标签 (Label1) ：Autosize的 True 属性可以自动

4、调整标签的大小，而 False 属性不能。（ 2 ） 文本框 (Text1) ：1 、 Maxlength属性表示文本框所能容纳的字符数。2 、 Password属性表示口令输入，可以是“*”或“？”等。设置文本框输入字符为“ *”： Text1.Password=”*”,还原文本框字符：Text1.Password=”,3 、 ScrollBars属性是表示文本框有垂直或水平滚动条，但是需要和多行属性Multiline结合一起使用。4 、 SelLength属性是表示选中文本框中字符的个数：Text1.SelLength。 SelStart属性是表示选中文本框中字符或光标之前的字符数：Tex

5、t1.SelStrart。 SelText属性是表示感谢下载载精品选中文本框中的字符：Text1. SelText 。5 、文本的主要事件是Change事件： (标签内容随文本框内容变化而变化)Private sub Command_Change（）Label1.caption=Text1.textEnd sub6 、文本框的方法只有一个：Text1.SetFocus例题：（1 ） 能够获得一个文本框中被选取文本的内容的属性是CA TextB. SelLengthC. SelTextD. SelStrart（ 2 ） 在窗体上画一个文本框 (其名称为 Text1) 和标签 (其名称为 Labe

6、l1) 。要求程序运行后，如果在文本框中输入字符， 则立即在标签中显示相同的内容。 以下可以实现上述操作的事件过程是AA Private Sub Text1_Change（）B. Private Sub Text1_Click（）Label1.caption=Text1.TextLabel1.caption=Text1.TextEnd SubEnd SubC Private Sub Label1_Change（）D. Private Sub Label1_Click（）Label1.caption=Text1.TextLabel1.caption=Text1.TextEnd Sub（ 3 ）命

7、令按钮 (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( 表示暂

8、时不可用) 。Check1.Value=False可以用，但 Check1.Value=True不可用 (因为 True只能转化数值 1而不是 1) 。（5 ）列表框 (List1):1 、 List属 性 是 一 个 数 组 型 属 性 ： List1.List( 索 引 ) ， 索 引 可 以 是 数 字0 、1 ,List1.listindex,变量 i （ List1.T ext 等同于 List1.list(List1.listindex)）。2 、 MultSelect属性：用来设置一次可以多选表项数。MultSelect属性值为0 时，每次只能选择一项； MultSelect属性

9、值为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 ）图片框和图像框

10、(Picture1和 Image1):1 、图片框 (Picture1)：Autosize属性值为True 时，表示图片框大小随图片大小改变而改变； Autosize属性值为False 时，表示图片框只能部分显示大图片。感谢下载载精品2 、图像框 (Image1) ： Stretch属性为 True 时，图片大小随图像框的大小改变而改变； Stretch属性为 True 时，图像框的大小随图片大小的改变而改变。3 、两种图形类型都可以按照下面这个方法加载图片：Picture1.picture=LoadPicture(App.Path &“ 图片名称 .扩展名 ” )Image1.pic

11、ture=LoadPicture(App.Path &“ 图片名称 .扩展名 ” )如果要清楚图片：Picture1.picture=LoadPicture(“” )Image1.picture=LoadPicture(“” )注意 :如果使用App.Path方法需要先保存好窗体文件和工程文件到考生文件夹中。（ 8 ）滚动条 (HScroll1) ：1 、Max 和 Min 属性是分别表示滚动条的最大和最小刻度，刻度值用 Value 属性值来表示： HScroll1.value。2 、 LargeChange和 SmallChange属性是分别表示移动滚动条上的左右箭头按钮的移动量和移

12、动滚动条上滚动框的移动量。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、数

13、学函数： 求平方根： Sqr(n) 求自然对数Log(n)ln nlog 78=loge8/loge 7( 注意非e 为底的对数需要如此转换 ) 求以 e 为底的幂值， e xexExp(x)1n>0 Sqn(n)=0n=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 要一定是数字字

14、符才行， 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”)-4857Asc( “A ”)Asc( “Z ”)-6590Asc( “a”)Asc( “z”)-97122特殊情况： Asc( “ABC ”)=65只求第一个字符“A ”的 Ascii 代码值 Fix(x)将数值型数据x 的小数部分舍去Fix(12.8)=12

15、Fix(-12.5)=-12;Int(x)取小于等于x 的最大整数当 x>0时，用法和 Fix 一样；当 x<0 时，Int(-12.3)= -13;Cint(x)将数值型数据x 的小数部分四舍五入Cint(12.7)=13Cint(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)=&qu

16、ot;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"

17、)=3知识点 5：1 、运算符： 算术运算符感谢下载载精品运算符的优先级：> - > (* /) > > Mod > (+ -)关系运算符<<=>>=<>LikeIs 运算符优先级相同逻辑运算符运算符的优先级：Not > And > Or > Xor > Eqv例题：（1 ） 表达式 4 + 5 6 * 7 / 8 Mod 9的值是BA4B.5C.6D.7（2 ） a=3b=2c=1求 Print a>b>c的结果？首先 a>b的结果是true, 然后再 Print True>c此

18、时 True 需要转换成-1 再比较， Print -1>1结果是 False ，所以整个输出结果是False 。知识点 6：1 、交互函数的使用： InputBox 函数：A=InputBox("提示信息 "," 标题信息 "," 默认值或输入框的值")例题：(1) 执行下列语句后， 将显示输入对话框， 此时如果单击 “确定” 按钮，则变量 strInput的内容是CstrInput=InputBox("请输入字符串 "," 字符串对话框"," 字符串 ")A &qu

19、ot; 请输入字符串"B. " 字符串对话框"C. " 字符串 "D. 空字符串感谢下载载精品 MsgBox 函数：MsgBox“ 提示信息 ”, 按钮类型值 + 图标类型值 + 默认焦点值 , “ 标题信息 ”A= MsgBox“ 提示信息 ” , 按钮类型值 + 图标类型值 + 默认焦点值 , “ 标题信息 ” ；A 的值根据单击什么按钮有关，A 的值在 1,7 之间取值。比如：单击“确定”按钮， A=1 。例题：（ 1）以上图形所表示的函数表达式为：MsgBox "请输入查询的学生学号：", 3 + 32 + 256,

20、 "学生基本信息查询"知识点 7：1 、选择结构语句（If 条件语句）：单分支条件语句：格式：If条件Then语句块End If（称 If 块语句）If条件Then只有一条语句（称 If 条语句）感谢下载载精品双分支条件语句：格式： If条件Then语句块 1Else语句块 2End If多分支条件语句If条件 1Then语句块 1Elseif条件 2Then语句块 2。Else语句块 nEnd If其中，条件可以是：关系表达式(a>5) 、逻辑表达式 (a>5 And c>4)、变量(i) 或常数 (0) 。例题：（ 1 ） 下列程序段的执行结果为AX=

21、5Y=-20If Not x>0 Then感谢下载载精品x=y-3ElseY=x+3End IfPrint x-y;y-xA.-33B.5-8C.3-3D. 25-25以上题中的“条件”主要是逻辑表达式。（ 2） 下列程序段的执行结果为BX=2Y=1If x*y<1 Then y=y-1 Else y=-1Print y-x>0A. TrueB. FalseC. -1D.1以上题中的“条件”主要是关系表达式。（ 3） 下列程序段的执行结果为CDim x As IntegerIf x ThenPrint x Else Print x-1A. 1B. 0C. -1D.不确定以上题

22、中的“条件”主要是变量。2 、选择结构语句（Select Case语句）：Select Case测试表达式Case表达式列表1感谢下载载精品语句块 1Case表达式列表2语句块 2。CaseElse语句块 nEnd Select注意：测试表达式的类型只能是数值数据或字符型，表达式列表的值只要第一个符合测试表达式值的要求，就结束SelectCase 语句；表达式列表可以是三种结构或三种混合结构：、1 To 10、 1,3,5,6,7,8、 Is>10、 1,2,5,7,Is>10例题：（ 1）在窗体上画一个名称为 Command1 的命令按钮和两个名称分别为Text1和 Text2

23、的文本框，然后编写如下事件过程：Private Sub Command1_Click()n=Text1.textSelect Case nCase 1 T 10X=10Case 2,4,6X=20Case Is<10X=30感谢下载载精品Case 10X=10End SelectText2.text=xEnd Sub程序运行后，如果在文本框Text1中输入10 ，然后单击命令按钮，则在Text2 中显示的内容是AA. 10B. 20C. 30D.403 、选择结构语句（IIF 函数）：变量 =IIF( 条件，参数1 ，参数 2)其中，条件可以是：关系表达式(a>5) 、逻辑表达式(

24、a>5 And c>4)、变量 (i) 或常数 (0) 。执行过程：条件成立，变量的值就是“参数1 ”，否则变量的值就是“参数 2”。例题：（ 1） 设 a=6, 则执行语句：x=IIF(a>5,-1,0)后， x 的值为DA.5B.6C.0D.-1知识点 8：1 、循环结构 For循环变量 = 初值To终值Step步长循环体If 条件Then语句感谢下载载精品Exit ForEnd IfNext 循环变量注意：循环如果正常退出时(没有执行 Exit For语句 )，那么循环变量必须要大于终值或等于终值 + 步长。Do循环体 Do While 条件Loop While条件循环

25、体LoopDoDo Until 条件循环体Loop Until条件循环体Loop注意：左边上下两种循环是先判断条件后执行循环体，右边上下两种循环是不管条件成立与否都至少执行一次；While循环是条件成立执行循环体，Until循环是条件不成立执行循环体。例题：（1 ） 下列程序段的执行结果为Bs=0:t=0:u=0For x=1 To 3For y=1 To xFor z=y To 3s=s+1感谢下载载精品Next zt=t+1Next yu=u+1Next xPrint s;t;uA.3614B.1463C.1436D.1643分析：A 组语句和B 语句都在 X 循环内， 并且是并列的， 所

26、以可以先计算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=

27、60。 数组的下标下界是根据语句Option Base n来决定：当n=0时，数组下标下界是从0 开始；当n=1时，数组下标下界是从1 开始。 数组分为：固定大小数组: Dim a(10) As Integer感谢下载载精品动态大小数组: Dim a() As IntegerRedima(10) Array 函数用法：为一个 变体型变量 创建一个数组。Dim a as Varianta=Array(1,2,3,4,5)因此： a(0)=1a(1)=2a(2)=3a(3)=4a(4)=5 注意：如果数组被定义为一下三种类型，(1)数值型(2)字符型(3) 逻辑型，则它们初始化的数组元素数值分别为

28、：0、空字符串和False 。例题：（ 1 ）在窗体上画一个命令按钮（其Name属性为 Command1） ,然后编写如下代码：Private Sub Command1_Click()Dim a(4,4) As IntegerFor i=1 To 4For j=1 To 4a(i,j)=(i-1)*3+jNext jNext iFor i=3 To 4For j=3 To 4Print a(j,i)Next jPrint感谢下载载精品Next iEnd Sub程序运行后，单击命令按钮，其输出结果为D。A. 69B.7 10C.8 11D.9127108119121013分析：对循环和数组结合的

29、问题，往往要先看B 组语句输出结果是什么，然后根据 B 组语句输出结果代入到A 组语句中求结果。B 组语句输出结果：a(3,3)a(4,3)a(3,4)a(4,4)代入 A 组语句的结果：9121013知识点 10 ：1 、过程与函数： 过程与函数的参数类型有：实参和形参；传递方式有：值传递和地址传递。 以下程序中， x,y 为实参； a,b 为形参注意：实参要与形参的类型、个数要相同。 在形参 a,b 之前如果加上关键字 ByVal ，那么就是值传递；如果加上关键字 ByRef 或不加关键字，那么就是地址传递。感谢下载载精品 过程调用方式有两种：Call Swap(x,y)或 Swap x,

30、y(Swap是过程名 )注意：只有地址传递方式才能实现交换功能，值传递方式x,y 的值不变。当有事件过程和通用过程一起运行时，先执行事件过程(Command_Click)。例题 ：（ 1） 假定有如下的Sub 过程：Sub S(x As Single,ByVal y as Single)t=xx=t/yy=t Mod yEnd Sub在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()Dim a As Single, b As Singlea=5:b=4S a,b Print a,b感谢下载载精品End Sub程序运行

31、后，单击命令按钮，输出结果为_C_。A.54B.11C.1.254D.1.251程序分析：首先形参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 、菜单和鼠标事件 菜单编辑器的使用：感

32、谢下载载精品注意：菜单中的标题可以为空，但不论是第几级菜单名称必须唯一，且不能为空。 鼠标事件（按下鼠标键事件过程）主 要 事件 有 ：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_M

33、ouseDown)等。以上鼠标事件过程的参数，含义如下：（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按下鼠标左键PopUpmenuFile通过 PopUpmenu方

34、法弹出菜单End If File 是一级菜单的名称End Sub运行效果 ：2 、公共对话框 (又称通用对话框) 通用对话框是我们考试中唯一一个控件箱中没有的控件，需要我们自己添加的，添加的方法是在“工程”菜单的“部件”项中选择“MicrosoftCommonDialogControl 6.0”后，才会在控件箱中出现通用对话框图标。 通用对话框图形感谢下载载精品根据以上图形，相应的程序代码如下：注意： CommonDialog.FilterIndex =索引（索引是从1 开始）知识点 12 ：1 、文件文件包括三种：顺序文件、随机文件和二进制文件 顺序访问：文件中数据是以ASCII 码存储的。

35、随机访问：文件长度记录是固定不变 的，数据类型可以不同，数据以二进制方式存储在文件中，可以任意时候，任意地方访问。二进制访问：必须知道数据是如何写入文件的。感谢下载载精品 如果源文件是字符类型，那么读写文件如下所示：读文件的格式：文件名 (In.txt)" For Input As #文件号 (#1)Do while Not Eof(文件号 )Input #文件号 ,变量LoopClose # 文件号写文件格式：文件名 (Out.txt)" For Output(Append) As #文件号(#1)Print # 文件号 ,变量Close # 文件号注意：当写文件以Out

36、put方式时，原来的文件内容将被覆盖；当写文件以 Append方式时，新的文件内容将被添加到文件尾部； 如果源文件是数值类型，那么读写文件如下所示：Dim a(10) As Integer文件名 (In.txt)" For Input As #文件号 (#1)For i=1 To 10Input #文件号 ,a(i)Next iClose # 文件号感谢下载载精品写文件格式：文件名 (Out.txt)" For Output(Append) As #文件号(#1)For i=1 To 10Print # 文件号 ,a(i)Next iClose # 文件号例题：（ 1 ）

37、在 考 生 文 件 夹 下 有 文 件 in5.txt ， 文 件 中 有 字 符 串“0&1%$s#2&3!45u6ydf7ff8|9er”。请在 Forml 的窗体上画一个文本框， 名称为 Text1 ，能显示多行；在画一个命令按钮，名称为 Cl ，标题为“存盘” 。编写适当的事件过程，使得在加载窗体时，把 in5.txt 文件的内容中 数字字符 显示在文本框里。然后单击“存盘”按钮，把文本框中的内容存到文件 out5.txt 中。如图所示：根据题目要求，所编写程序如下：感谢下载载精品（ 2） 在考生文件下有文件 in.txt ，文件有 10 个数据：123 521 362

38、 821 400 300710 990 120 500.请在 Forml的窗体上画一个文本框，名称为Text1 ，能显示多行；在画一个命令按钮，名称为Cl，标题为“存盘” 。编写适当的事件过程，使得在加载窗体时，把in5.txt文件的内容显示在文本框里，然后统计10个数的最大数、最小数和它们的和，并把最大数、最小数和它们的和写到“out.txt ”文件中。如图所示：根据题目要求，所编写程序如下：感谢下载载精品感谢下载载精品Visual Basic程序设计基础知识要点（程序设计篇）全国计算机等级考试中常用的程序编程部分：一、 求最大数、最小数、求和以及求平均数二、 求阶层三、 求最大公约数四、

39、求素数五、 求水仙花数（拆数法）六、 排序（选择排序、直接插入排序和冒泡排序）七、 字符操作1、字符串取反（反向输出字符串）2、判断字符串中的某个字符是否为字母感谢下载载精品3、统计每类字符的个数八、 矩阵求法（二维数组）九、 文件读写操作1、字符型读写操作2、数值型读写操作九大问题具体例子分析：一、求最大数、最小数、求和以及求平均数例题：随机产生10 个两位整数 ，并存入数据a 中，然后分别求10 个元素中的 最大数、最小数 、求 10 个元素之和 以及它们的 平均数 。Private Sub Command1_Click()感谢下载载精品Dim a(10) As Integer, i As Integer, Max As Integer, Min As IntegerDim Sum as Integer, Avg As SingleSum=0For i= 1 To 10a(i)=Int(Rnd*90)+10 产生 10 99 之间的随机整数Next iMax=a(1):Min=a(1) 假设最大数和最小数For i= 1 To 10If Max<