计算机等级考试培训(考点)课件.ppt

1、计算机等级考试培训（二级VB）人文信息管理学院人文信息管理学院 何文何文一、教学计划n1.理论理论20学时，学时，4次课次课第第1次次1.VB各章节的考点（第各章节的考点（第1章章 VB概述、第概述、第2章章 VB语言基础：语言基础：1学时，第学时，第3章章 顺序程序设计、第顺序程序设计、第4章章 选择结构程序设计：选择结构程序设计：1学时，第学时，第5章章 循环、第循环、第6章章 数组：数组：1学时，第学时，第7章过程：章过程：1学时，第学时，第8章章 文件：文件：1学时）学时）第第2次次1.阅读题解题方法（阅读题解题方法（0.5学时）学时）2.程序阅读题讲程序阅读题讲解（选择解（选择4-6

2、套等级考试阅读题讲解套等级考试阅读题讲解3.5学时）学时）3.选择选择1-2套程序阅读题进行课堂练习（套程序阅读题进行课堂练习（1学时）学时）一、教学计划第第3次次1.程序填空题解题方法（程序填空题解题方法（0.5学时）学时）2.程序填空题程序填空题讲解（选择讲解（选择3-5套程序填空题进行讲解套程序填空题进行讲解3.5学时）学时）3.选择选择1套程序填空题进行课堂练习（套程序填空题进行课堂练习（1学时）学时）第第4次次1.软件技术基础重要知识讲解（线性存储结构、操软件技术基础重要知识讲解（线性存储结构、操作系统、软件设计测试的方法等作系统、软件设计测试的方法等2学时）学时）2.软件技软件技术

3、基础是非判断题和单项选择题讲解（术基础是非判断题和单项选择题讲解（2学时）学时）3.课堂练习（课堂练习（1学时）学时）一、教学计划n2.实验实验15学时，学时，3次课次课第第1次次1.程序改错题解题方法（程序改错题解题方法（0.5学时）学时）2.程序改错题讲程序改错题讲解（选择解（选择3-5道程序改错题进行讲解道程序改错题进行讲解1学时）学时）3.上机上机练习练习第第2次次1.编程题解题方法（编程题解题方法（0.5学时）学时）2.编程题讲解（编程题讲解（1学学时）时）3.编程题上机练习（编程题上机练习（3.5学时）学时）第第3次次1.等级考试机试流程练习（等级考试机试流程练习（1学时）学时）2

4、.等级考试模拟等级考试模拟（选择（选择3-4套机试题进行练习套机试题进行练习4学时）学时）二、第一章考点n1、Visual Basic的主要特点的主要特点n2、VB文件系统的扩展名文件系统的扩展名考题考题1.在在Visual Basic中，窗体文件的扩展名是（）中，窗体文件的扩展名是（）（A）.exe（B）.bas （C）.frm （D）.vbp2.以下文件类型中，不属于以下文件类型中，不属于VB文件系统的是（）文件系统的是（）（A）.ras（B）.cls （C）.frm （D）.bas3. VB应用程序保存在磁盘上应用程序保存在磁盘上,至少会有以（）为扩展名至少会有以（）为扩展名两个文件两个

5、文件.（A）.DOC和和.TXT （B）.COM和和.EXE （C）.VBW和和.BAS （D）.VBP和和.FRM二、第二章考点n1、基本数据类型、基本数据类型n2、常量与变量、常量与变量n3、运算符与表达式、运算符与表达式n4、常用内部函数、常用内部函数考题考题1.语句语句”Dim a as Integer,b,c as double”定义变量定义变量b并并指定其类型为（）指定其类型为（）（A）整型）整型 （B）双精度型）双精度型 （C）变体型）变体型 （D）语法错误语法错误2.在下列字符串中，不能用作在下列字符串中，不能用作VB变量名的是（）变量名的是（）（A）8_num （B）inst

6、r6 C）xy_int （D）f8二、第二章考点3.用于声明全局变量的关键字是（）用于声明全局变量的关键字是（）（A）Dim （B）Private （C）Public （D）Static4.以下数据中合法的以下数据中合法的Visual Basic常量是（常量是（ ）（A）2.86D-3.2 （B）126# （C）12,654,102.23 （D）12.34D5.在在VB中，一个未经定义而直接使用的变量是（）类型中，一个未经定义而直接使用的变量是（）类型（A）Integer （B）Byte （C）Variant （D）Boolean 6.要强制对变量进行显式声明时，应使用说明语句（）要强制对变量

7、进行显式声明时，应使用说明语句（）（A）Public Const （B）Option Explicit（C）Option Base l （D）Option Compare二、第二章考点7.假设变量假设变量BOOLVAR是一个布尔型变量是一个布尔型变量,则下面正确的则下面正确的赋值语句是（）赋值语句是（）（A）BOOLVAR=TRUE （B）BOOLVAR=.TRUE.（C）BOOLVAR=#TRUE# （D）BOOLVAR=31 not (or b3) then x=4（C）x=4a （D）if ab-2*3 then y=a+b12.表达式表达式4 + 5 * 7 / 8 Mod 9的值是（

8、）的值是（）（A）4 （B）5 （C）6 （D）8二、第二章考点13.与数学表达式与数学表达式 相对应的相对应的VB表达式是（表达式是（ ）（A）sqr(7*sin(3+2*x)+exp(2)*log(3)（B）sqr(7sin(3+2x)+exp(2)*log(3)（C）sqr(7*sin(3+2*x)+e2*log(3)（D）sqr(7sin(3+2x)+e2*log(3)14. Int(198.555*100+0.5)/100的值（）的值（）（A）198 （B）199.6 （C）198.56 （D）20015.若若x是一个正实数，能对是一个正实数，能对x的第的第3位小数进行四舍五人的位小

9、数进行四舍五人的表达式是（）表达式是（）（A）0.01*Int(100*(x+0.05) （B）0.01*Int(100*(x+0.005)（C）0.01*Int(x+0.05) （D）0.01*lnt(x+0.005)3ln)23sin(72ex 二、第二章考点16.从键盘上输入两个字符串，分别保存在变量从键盘上输入两个字符串，分别保存在变量str1，str2中。确定第二各字符串在第一个字符串中起始位置的中。确定第二各字符串在第一个字符串中起始位置的函数是（函数是（ ） （A）Left （B）Mid （C）String （D）Instr17.使使X赋值为赋值为 1,100的一个随机整数，正确

10、的语句是（）的一个随机整数，正确的语句是（） （A）x= Int(100*Rnd) （B）x= 101*Rnd （C）x= Int (99*Rnd) （D）x= Int(100*Rnd + 1)18.表达式表达式Int(3*Rnd+2)*Int(5*Rnd-1)的取值范围是（）的取值范围是（） （A）1，7 （B）-2，12 （C）-4，1 （D）-4，6二、第二章考点19.函数函数String（3，“Str”）的返回值是（）的返回值是（） （A）“StrStrStr” （B） “sss” （C） “SSS” （D） “StStSt”20.在以下表达式中结果始终为在以下表达式中结果始终为“真真

11、”的是（）的是（） （A）Int(Rnd)=Fix(Rnd) （B）Int(Rnd*20)Fix(Rnd*3+5) （C）Int(-Rnd)=Fix(-Rnd) （D）-Int(Rnd*20)bc后，窗后，窗体上显示的是（）体上显示的是（）（A）True （B）False （C）20 （D）出错信息）出错信息2.下列程序段运行后的输出结果是（）下列程序段运行后的输出结果是（） Dim a%, b%, c% a = 8 b = 9 Print c = a + b（A） 17 （B）出错信息）出错信息（C）False （D）True三、第三章考点3.下面四个语句中下面四个语句中,能打印显示能打印显

12、示20*30字样的是（）字样的是（）（A）Print 20*30 （B）Print 20*30 （C）Print Chr（20）+*+Chr（30）（D）Print Val（20）*Val（20）4.对一个窗体对象，其最先发生的事件是（）事件。对一个窗体对象，其最先发生的事件是（）事件。（A）Click （B）DblClick （C）Load （D）UnLoad5.在加载窗体时，下列事件会被激发的事件是（）在加载窗体时，下列事件会被激发的事件是（）（A）Click （B）DblClick （C）Load （D）KeyPress三、第三章考点6.若要使窗体启动时处于最大化状态，可设置（）属性。若

13、要使窗体启动时处于最大化状态，可设置（）属性。 （A）StartUpPosition （B）WindowState （C）Caption （D）AutoRedraw7.命令按钮标题热字的下划线，可通过（）符号来设置。命令按钮标题热字的下划线，可通过（）符号来设置。 （A） （C）_ （D）&8.下面关于窗体事件叙述不正确的是（）下面关于窗体事件叙述不正确的是（） （A）通过代码调整窗体的大小，会触发一个）通过代码调整窗体的大小，会触发一个Resize事件事件 （B）用鼠标单击窗体会产生一个）用鼠标单击窗体会产生一个Click事件事件 （C）每当一个窗体变成活动窗体时，就会产生一个）每当一个窗体

14、变成活动窗体时，就会产生一个LOAD事件事件 （D）调用）调用Show方法与设置窗体方法与设置窗体Visible属性为属性为True具有具有相同的效果相同的效果三、第三章考点9.若想清除文本框若想清除文本框Text中的文本内容，其正确方法是（）中的文本内容，其正确方法是（） （A）Text1.Text= “ ” （B）Text1.cls （C）Text1.Text= Null （D）Text1.clear 10.如果要暂时关闭某个定时器，则必须通过设置其（）如果要暂时关闭某个定时器，则必须通过设置其（）属性为属性为False来实现。来实现。 （A）Timer （B）InterVal （C）En

15、abled （D）Visible11.在下列控件中，不接受焦点的是（）在下列控件中，不接受焦点的是（） （A）Label （B）Command （C）Text （D）Listbox。12在在VB中，要将一个窗体从内存中释放，应使用的语中，要将一个窗体从内存中释放，应使用的语句是（）句是（） （A）Show （B）Hide （C）Load （D）Unload三、第三章考点13. 如果在窗体上已有一个文本框如果在窗体上已有一个文本框Text1和一个命令按钮和一个命令按钮Command1，再编写如下事件：，再编写如下事件： Private Sub Command1_Click() x = Input

16、Box(请输入请输入x) y = inpubox(请输入请输入y) Text1.Text = x + y End Sub 在运行程序时输入在运行程序时输入20和和6，则在文本框，则在文本框Text1中显示的中显示的内容是（）。内容是（）。（A）26 （B）206 （C）620 （D）出错）出错三、第三章考点14.确定一个窗体大小的属性是（）确定一个窗体大小的属性是（）（A）Width和和Height （B）Width和和Top（C）Top和和Left （D）Top和和Height15.在程序运行时不能改变属性的是（）在程序运行时不能改变属性的是（）（A）Name （B）Caption （C）V

17、isible （D）Enabled16.下列哪个方法能将项目添加到下列哪个方法能将项目添加到ComboBox控件中（）控件中（）（A）AddItem （B）List （C）AddNew （D）Move17.将组合框设置为简单组合框（将组合框设置为简单组合框（Simple Combo ） 应将应将其其Style属性设置为（）属性设置为（）（A）0 （B）1 （C）2 （D）3三、第三章考点18.在在VB中，要禁止命令按钮对事件作出反映并使按钮变中，要禁止命令按钮对事件作出反映并使按钮变灰，应设置（）属性灰，应设置（）属性 （A）Caption （B）Enabled （C）Visible （D）N

18、ame19.VB应用程序窗体的应用程序窗体的Name属性，只能在（）窗口设置。属性，只能在（）窗口设置。 （A）工具箱）工具箱 （B）属性）属性 （C）工程资源管理器）工程资源管理器 （D）代码）代码20.可以实现文本框可以实现文本框TxtInput同时向左移动同时向左移动150和向下移动和向下移动260的语句为（）的语句为（）（A）TxtInput.Move TxtInput.Left - 150, TxtInput.Top + 260（B）TxtInput.Move - 150, + 260（C）TxtInput.Left = TxtInput.Left 150（D）TxtInput.To

19、p = TxtInput.Top + 260三、第三章考点21. 组合框组合框Combo1中有中有8个项目，则能删除最后一项的个项目，则能删除最后一项的语句为（）语句为（）（A）Combo1.RemoveItem Combo1.Text（B）Combo1.RemoveItem 7 （C）Combo1.RemoveItem 8 （D）Combo1.RemoveItem Combo1.ListCount22.在默认情况下，在默认情况下，InputBox函数返回值的类型是（）函数返回值的类型是（）（A）字符串）字符串 （B）变体）变体（C）数值）数值 （D）数值或字符串）数值或字符串三、第三章考点2

20、3.如果在如果在MsgBox消息框中只显示消息框中只显示“确定确定”按钮，则应按钮，则应将其第二个参数设置为（）将其第二个参数设置为（）（A）0（B）1（C）3（D）524.以下对象中不是容器控件的是（）以下对象中不是容器控件的是（）（A）Form（B）PictureBox（C）Shape（D）Frame25.以下关于时钟控件的描述中，错误的是（）以下关于时钟控件的描述中，错误的是（）（A）Timer控件在程序运行时是不可见的控件在程序运行时是不可见的（B）Timer控件的控件的Enabled属性决定该控件是否对时间属性决定该控件是否对时间的推移做响应的推移做响应（C）只能在设计时设置）只能在

21、设计时设置Timer控件的控件的Interval属性属性（D）若想）若想Timer控件每隔控件每隔1秒发生一次秒发生一次Timer时间，应时间，应设置其设置其Interval属性为属性为1000三、第三章考点26.设计时用设计时用Picture属性装入属性装入PictureBox控件中的图形，控件中的图形，在程序运行时若欲清除，应用（）命令在程序运行时若欲清除，应用（）命令（A）Picture1.Cls（B）Picture1.Picture=loadPicture（）（C）Picture1.Picture= （D）Kill Picture1.Picture27.若要访问组合框若要访问组合框Co

22、mb1中被用户选中的表项，应使中被用户选中的表项，应使用（）用（）（A）Comb1.Text （B）Comb1.List （C）Comb1.ListIndex （D）Comb1.ListCount 28.清除列表框的所有选项应选择下列哪种方法清除列表框的所有选项应选择下列哪种方法(22).（A）Clear （B）Cls （C）ClearItem （D）RemoveItem三、第三章考点29.标签的（）属性设置为标签的（）属性设置为True时时,标签控件的大小随标标签控件的大小随标题文字自动调整题文字自动调整.（A）AutoSize（B）Caption（C）Alignment（D）BackSty

23、le30.CLS可清除窗体或图形框中的内容是（）可清除窗体或图形框中的内容是（）（A）Picture属性设置的背景图案属性设置的背景图案 （B）在设计时放置的控件）在设计时放置的控件（C）程序运行时产生的图形和文字）程序运行时产生的图形和文字 （D）以上）以上AC全部全部31.要定义一个变量为全局变量要定义一个变量为全局变量,应使用（）关键字应使用（）关键字.（A）Static（B）Public（C）Private（D）Sub三、第三章考点32.下列程序段的运行结果（）下列程序段的运行结果（） Private Sub Form_Click() Dim Msg Hide Msg=选择选择确定确定

24、按钮按钮 MsgBox Msg Show End Sub（A）隐藏窗体）隐藏窗体,按按确定确定按钮使窗体重现按钮使窗体重现（B）隐藏窗体）隐藏窗体（C）显示窗体）显示窗体,按按确定确定按钮使窗体隐藏按钮使窗体隐藏（D）显示窗体）显示窗体四、第四章考点n1、关系运算符与逻辑运算符、关系运算符与逻辑运算符n2、选择结构语句的使用、选择结构语句的使用n3、循环结构语句的使用、循环结构语句的使用四、第四章考点一、一、ForNext循环语句循环语句For 循环变量循环变量=初值初值 To 终值终值 Step 步长步长 循环体循环体Next 循环变量循环变量循环变量赋初值循环变量赋初值循环条件循环条件循环

25、体循环体循环变量增值循环变量增值真真假假ForNext循循环执行步骤环执行步骤*四、第四章考点Private Sub Command1_Click() s = 0 For i = 10 To 1 s = s + 1 Next i Print s; iEnd Sub四、第四章考点Private Sub Command1_Click() s = 0 For i = 1 To 10 s = s + 1 Next i Print s; iEnd Sub四、第四章考点1.在窗体上画一个名称为在窗体上画一个名称为Text1的文本框和一个名称为的文本框和一个名称为Command1的的命令按钮，然后编写如下事

26、件过程：命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim i as Integer,n as Integer For i=0 To 50 i=i+3 n=n+1 If i10 then Exit For Next i Text1.Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是（）程序运行后，单击命令按钮，在文本框中显示的值是（）(A)2 (B)3 (C)4 (D)5四、第四章考点2程序如下程序如下 Private Sub Form_Click() L1: Dim i As Integer Dim isum

27、 As Integer For i=1 T0 5 isum=sum(i)Next i Print “isum=”; isum End Sub Private Function sum(n As Integer) L2: Dim j As Integerj =j+nn =n+2sum =j End Function (1) 该程序运行时第一次单击窗体产生的结果是该程序运行时第一次单击窗体产生的结果是( ) (A)isum3 (B)isum4 (C)isum5 (D)isum15 四、第四章考点 (2)如果将如果将L2语句改为：语句改为：Static j As Integer，则程序运行时第一次，

28、则程序运行时第一次单击窗体产生的结果为单击窗体产生的结果为( ) (A)isum3 (B)isum4 (C)isum5 (D)isum15 (3)如果在原程序基础上只将如果在原程序基础上只将L1语句改为：语句改为：Public i As Integer，则程序运行时第一次单击窗体产生的结果为则程序运行时第一次单击窗体产生的结果为( ) (A)结果同（结果同（1） (B)结果同（结果同（2） (C)结果与（结果与（1）（）（2）都不相同）都不相同 (D)程序有错，不能运行程序有错，不能运行 四、第四章考点3. 阅读下面程序阅读下面程序 Option Explicit Private Sub Co

29、mmand1_Click() Dim strPassword As String Dim i As Integer For i=1 To 3 StrPassword=InputBox(“Password:”) If strPassword=“123”Then LLL： Exit For Endlf Next i If i = 4 Then MsgBox “你不是合法用户你不是合法用户” Else MsgBox “欢迎你欢迎你” End IfEnd Sub四、第四章考点（1）该程序的作用是（）该程序的作用是（ ）（A）用户输入三次正确口令）用户输入三次正确口令“123”，才显示，才显示“欢迎你欢

30、迎你”，输入三，输入三次错误口令才显示次错误口令才显示“你不是合法用户你不是合法用户”（B）用户只输入一次正确口令）用户只输入一次正确口令“123”，就显示，就显示“欢迎你欢迎你”，输入，输入一次错误口令就显示一次错误口令就显示“你不是合法用户你不是合法用户”（C）用户只输入一次正确口令）用户只输入一次正确口令“123”，会显示，会显示“欢迎你欢迎你”，输入，输入三次错误口令才显示三次错误口令才显示“你不是合法用户你不是合法用户”（D）用户只要输入一次错误口令就会显示）用户只要输入一次错误口令就会显示“欢迎你欢迎你”，输入三次，输入三次正确口令才显示正确口令才显示“你不是合法用户你不是合法用户

31、”（2）如果将）如果将LLL出的语句去掉，则（出的语句去掉，则（ ）（A）和原来的程序效果一样）和原来的程序效果一样（B）用户必须输入三次正确口令后，才会显示）用户必须输入三次正确口令后，才会显示“欢迎你欢迎你”（C）用户必须输入三次口令，且输入任何口令都显示）用户必须输入三次口令，且输入任何口令都显示“欢迎你欢迎你”（D）用户必须输入三次口令，且输入任何口令都显示）用户必须输入三次口令，且输入任何口令都显示“你不是合你不是合法用户法用户”四、第四章考点二、二、DoLoop循环语句循环语句WhileWhile条件条件循环体语句循环体语句FalseTrueDo While-Loop语句语句Unt

32、ilUntil条件条件循环体语句循环体语句TrueFalseDo Until-Loop语句语句循环执行条件和循环执行条件和循环结束条件循环结束条件*四、第四章考点1. 假定有以下循环结构假定有以下循环结构Do Until条件条件 循环体循环体Loop则正确的描述是（）则正确的描述是（） A.如果如果条件条件是一个为是一个为0的常数，则一次循环体也不执行的常数，则一次循环体也不执行B.如果如果条件条件是一个为是一个为0的常数，则无限次执行循环体的常数，则无限次执行循环体C.如果如果条件条件是一个不为是一个不为0的常数，则至少执行一次循环体的常数，则至少执行一次循环体D.不论不论条件条件是否为是否

33、为真真，至少要执行一次循环体，至少要执行一次循环体 四、第四章考点2、程序如下：、程序如下：Option ExplicitPrivate Sub Command1_Click()Dim n As Integer，s as integern = 1s = 1 Do While n6 s = s + n If n=2 then n=n*2 If n=4 Then n=n*2LoopPrint sEnd Sub (1)程序运行中，语句程序运行中，语句“s=s+n”的执行次数是的执行次数是( ) (A)1 (B)2 (C)4 (D)6 (2)程序运行后输出的数据结果是程序运行后输出的数据结果是( )

34、(A)1 (B)2 (C)4 (D)6(3)如果将语句如果将语句Do While n6 改为改为 Do While n10，由程序运行后输，由程序运行后输出的结果是出的结果是( ) (A)2 (B)4 (c)6 (D)以上都不对以上都不对 四、第四章考点3、程序如下：、程序如下：Option ExplicitPrivate Sub Form_Click() Dim x As Integer, y As Integer,s As Integer, t As Integer x = InputBox(请输入一个整数：请输入一个整数：) s = 0 y = 0 Do While x 0 t = x

35、Mod 10 s = s + t y = y * 10 + t x = x / 10 Loop Print s, yEnd Sub（1）程序运行时，如果输入）程序运行时，如果输入5331，则变量，则变量s的结果为（的结果为（ ）（A）4 （B）6（C）8（D）12（2）程序运行时，如果输入）程序运行时，如果输入5331，则变量，则变量y的结果为（的结果为（ ）（A）1335 （B）3135（C）3315（D）5331（3）程序运行时，如果输入）程序运行时，如果输入12597，则（，则（ ）（A）程序正常运行）程序正常运行 （B）出现变量）出现变量x溢出错误溢出错误（C）出现变量）出现变量y溢出

36、错误溢出错误 （D）出现变量）出现变量s溢出错误溢出错误四、第四章考点4. 程序代码如下：程序代码如下：Option ExplicitPrivate Sub Command1_Click() Dim i As Integer, n As Integer, s As Integer n = 0 i = 0 Do n = n + 2 n = n * s + n s = s + n Loop While n 100 Print n, sEnd Sub（1）程序运行时，）程序运行时，Do-Loop循环被执行的次数为（循环被执行的次数为（ ）（A）1 （B）2（C）3（D）以上结果都不对）以上结果都不对

37、（2）单击命令按钮后，程序运行的输出结果为（）单击命令按钮后，程序运行的输出结果为（ ）（A）12 24 （B）100 102 （C）210 224（D）以上结果都不对以上结果都不对（3）语句）语句“Option Explicit”的功能是（的功能是（ ）（A）定义数组下标的起点）定义数组下标的起点（B）强制对变量进行显式声明）强制对变量进行显式声明（C）强制对变量进行隐式声明）强制对变量进行隐式声明（D）要求程序使用缩进格式）要求程序使用缩进格式四、第四章考点三、多重循环及常用算法三、多重循环及常用算法1.多重循环语句的执行步骤多重循环语句的执行步骤*Private Sub Command1

38、_Click()For i = 1 To 4x = 4For j = 1 To 3x = 3For k = 1 To 2x = x + 6Next kNext jNext iPrint xEnd Sub程序运行后，输出结果是（）程序运行后，输出结果是（）A）7B）15C）157D）538四、第四章考点输出字符三角形输出字符三角形Private Sub Form_Click()n = Val(InputBox(请输入三角形行数请输入三角形行数)x = InputBox(请输入组成三角形的字符请输入组成三角形的字符)For i = 1 To nPrint Tab(15 - i);For j = 1

39、 To 2 * i - 1Print x;Next jPrintNext iEnd Sub2.常用算法常用算法（1）求最大公约数与最小公倍数）求最大公约数与最小公倍数（2）判断素数（质数）判断素数（质数）（3）同构数、完备数等）同构数、完备数等四、第四章考点1. 阅读下列程序阅读下列程序 Private Sub Commandl_C1ick() m=Val(Textl.Text) n=Val(Text2.Text) mn=m*n lf mn=0 Then MsgBox”两数都不能为两数都不能为0!” Exit Sub End If If mn Then t=m：m=n：n=t End lf D

40、O r=m Mod n m=n n=r Loop While r0 Text3 .Text=m Text4.Text=mnm End Sub四、第四章考点 (1)在文本框在文本框Textl中输入中输入28，文本框，文本框Text2中输入中输入21，单击命令按，单击命令按钮钮CommandI 后，文本框后，文本框Text3与与Text4中分别显示的是中分别显示的是( ) (A)28 2l (B)7 48 (C)7 84 (D)84 7 (2)在文本框在文本框Text3中显示的是两个非零正整数中显示的是两个非零正整数m和和n的的( ) (A)最大值最大值 (B)最小值最小值 (C)最小公倍数最小公

41、倍数 (D)最大公约数最大公约数 (3)在文本框在文本框Text4中显示的是两个非零正整数中显示的是两个非零正整数m和和n的的( ) (A)最大值最大值 (B)最小值最小值 (C)最小公倍数最小公倍数 (D)最大公约数最大公约数四、第四章考点2.程序如下程序如下Private Sub Form_Click()Dim x As Integer, sx As Integer, n As IntegerRandomizex = Int (Rnd * 5 ) + 11For i = 2 To x n = Int(Sqr(i) For j =2 To n If i Mod j = 0 Then Exit

42、 For Next jIf j n Then sx = sx + i Next i Print sxEnd Sub 四、第四章考点(1)程序运行时，该程序中整数程序运行时，该程序中整数x的值的范围是的值的范围是 ( ) (A)1116之间之间 (B)1115之间之间 (C)516之间之间 (D)515之间之间(2)变量变量sx中存放的数是中存放的数是( ) (A) 2x之间的所有素数之和之间的所有素数之和 (B) 2x之间的所有奇数之和之间的所有奇数之和 (C) 2x之间的所有偶数之和之间的所有偶数之和 (D) 2x之间的所有数值之和之间的所有数值之和(3)假设假设x的值为的值为14，则程序的

43、运行结果是，则程序的运行结果是( ) (A)41 (B)48 (C)56 (D)104五、第五章考点1.数组的概念（什么情况下需用到数组）数组的概念（什么情况下需用到数组）2.静态数组与动态数组的定义静态数组与动态数组的定义3.数组的基本操作（数组元素赋值，数组的输入与输出）数组的基本操作（数组元素赋值，数组的输入与输出）4.自定义数据类型的使用自定义数据类型的使用5.常用算法常用算法（1）求最大值与最小值）求最大值与最小值（2）排序（比较法、冒泡法、选择法）排序（比较法、冒泡法、选择法）*（3）查询）查询（4）数组与矩阵运算）数组与矩阵运算五、第五章考点1.在窗体上设计有文本框在窗体上设计有

44、文本框TxtInput,按钮按钮cmdTest,且且TxtInput.Text=”Visual basic is easy”,并有如下程序代码：（第并有如下程序代码：（第19次考试程序阅读）次考试程序阅读）Option ExplicitOption Base 1Private Sub CmdTest_Click()Dim strS$, i%, j%, n%, stra$, strb$, count$, t$, strt$()strS = TxtInputn = Len(strS)ReDim strt(n)For i = 1 To nstra = Mid(strS, i, 1)strb = Mi

45、d(strS, i + 1, 1)If strb = s ThenIf stra = a And stra = z Then count = count + 1 strt(count) = stra + strb五、第五章考点End IfEnd IfNext iFor i = 1 To countFor j = i To count - iIf strt(j) strt(j + 1) Thent = strt(j): strt(j) = strt(j + 1): strt(j + 1) = tEnd IfNext jNext iFor i = 1 To countPrint strt(i);N

46、ext iEnd Sub五、第五章考点(1)程序运行后程序运行后count的值应为的值应为( )(A)0 (B)2 (C)4 (D)6(2)程序运行后，窗体上显示的结果为程序运行后，窗体上显示的结果为( )(A)basic Visual easy is (B) is is as as(C)is as is as (D) as as is is(3)option explicit的作用为的作用为( )(A)表明此模块内变量必须先声明后使用表明此模块内变量必须先声明后使用(B)表明此模块没有通用过程表明此模块没有通用过程(C)表明此模块的通用过程不能被其他模块调用表明此模块的通用过程不能被其他模块

47、调用(D)表明此模块变量不声明可以直接使用表明此模块变量不声明可以直接使用(4)以下关于语句以下关于语句“Option Base 1”的说法中正确的是的说法中正确的是( )(A)其功能是指定数组的默认上界其功能是指定数组的默认上界(B)其功能是指定数组的默认下界其功能是指定数组的默认下界(C)其功能是定义动态数组其功能是定义动态数组(D)其功能是定义静态数组其功能是定义静态数组五、第五章考点2. 阅读下面程序阅读下面程序(第第19次考试程序阅读次考试程序阅读5)Option ExplicitOption Base 1Private Type Abc A As IntegerEnd TypePr

48、ivate Sub Form_Click() Dim recAbc As Abc Dim arrA(4, 4) As Integer Dim intI As Integer, intJ As Integer, intN As Integer Open abc.txt For Random As #1 For intI = 1 To 4 For intJ = 1 To 4 intN = intN + 1 recAbc.A = intN Put #1, , recAbc Next intJ Next intI Close五、第五章考点 Open abc.txt For Random As #1 F

49、or intJ = 1 To 4 For intI = 1 To 4 Get #1, intI * intJ, recAbc arrA(intI, intJ) = recAbc.A Next intI Next intJ Close For intI = 1 To 4 For intJ = 1 To 4 Print Tab(intJ * 3); Format(arrA(intI, intJ), #) Next intJ Print Next intIEnd Sub五、第五章考点（1）程序中的）程序中的“abc.txt”文件在第一次打开时是按（文件在第一次打开时是按（ ）方式打开）方式打开的的

50、(A)顺序文件读顺序文件读 (B)顺序文件写顺序文件写 (C)随机文件随机文件 (D)二进制文件二进制文件（2）数组）数组arrA完成赋值以后，数组元素完成赋值以后，数组元素arrA(3,2)的值为（的值为（ ） (A)1 (B)7 (C)6 (D)4（3）程序运行后在窗体上输出的结果是（）程序运行后在窗体上输出的结果是（ ）（A）1 2 3 4 （B）1 2 3 4 5 6 7 8 2 4 6 8 9 10 11 12 3 6 9 12 13 14 15 16 4 8 12 16（C）1 5 9 13 （D）1 2 3 4 2 6 10 14 2 3 4 5 3 7 11 15 3 4 5