1、二级 VISUAL+BASIC 笔试 376 及答案解析(总分：92.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.对长度为 n 的线性表进行顺序查找，在最坏情况下需要比较的次数为( )。（分数：2.00）A.125B.n/2C.nD.n+12.窗体上添加一个文本框 Text1，编写如下代码： Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) Print Chr(KeyCode+5)i（分数：2.00）A.i=1B.i=2C.i=3D.i=416.设有变量声明为“Dim aDate
2、As Date”，则为变量 aDate 正确赋值的表达方式是( )。（分数：2.00）A.aDate=#8/2008#B.aDate=#“8/8/2008”#C.aDate=Date(“8/8/2008”)D.aDate=Format(“m/d/yy”，”8/8/2008”)17.窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。Private Sub Command1_Click() Dim a a=Array(1，2，3，4，5) For k=1 To 4 S=S+a(k) Next k Print S End Sub（分数：2.00）A.10B
3、.14C.15D.12018.已知代数式 eXSin(30)2x/(x+y)Lnx，则正确的 Visual Basic 表达式为( )。（分数：2.00）A.E*Sin(30*3.14/180)*2*X/X+Y*Log(B.Exp(*Sin(30)*2*X/(X+*Ln(C.Exp(*Sin(30*3.14/180)*2*x/(x+*Log(D.Exp(*Sin(30*3.14/180)*2*X/(X+*Ln(19.数据的存储结构是指( )。（分数：2.00）A.数据所占的存储空间B.数据的逻辑结构在计算机中的存放形式C.数据在计算机中的顺序存储方式D.存储在计算机外存中的数据20.窗体上有一
4、个图片控件和一个按钮控件，下列程序执行的结果是( )。 Private Sub Command1_Click() Picture1.Picture=LoadPicture(“C:/picture.jpg“) Picture1.Cls Picture1.Print“picture“ End Sub（分数：2.00）A.窗体无显示，图片框显示图片和文字 pictureB.窗体上出现 picture 文本，图片框无显示C.窗体上出现 picture 文本，图片框显示图片 picturjpgD.窗体无显示，图片框只显示 picture 文字21.下列描述中正确的是( )。（分数：2.00）A.软件工程
5、只是解决软件项目的管理问题B.软件工程主要解决软件产品的生产率问题C.软件工程的主要思想是强调在软件开发过程中需要应用工程化原则D.软件工程只是解决软件开发过程中的技术问题22.表达式 Str(Len(“123”)+Str(77.7)的值是( )。（分数：2.00）A.377.7B.377.7C.80.7D.12377.723.下列程序的运行结果是( )。 Private Sub Command1_Click() a=1.5 b=1.5 Call fun(a，b) Print a，b End Sub Private Sub fun(x，y) x=y*y y=y+x End Sub（分数：2.0
6、0）A.2.25 3.75B.1.5 2.25C.1.5 0.75D.0.75 1.524.有如下函数过程： Function fun1(By Val x As Integer,By Val y As Integer)As Integer Do While y0 reminder=x Mod y x=y y=reminder Loop fun1=x End Function 在下列按钮单击事件中调用该函数，则该程序的运行结果是( )。 Private Sub Command1_CliCk() Dim a As Integer Dim b As Integer a=100 b=25 x=fun1
7、(a，b) Print x End Sub（分数：2.00）A.0B.25C.50D.10025.在窗体上有一个文本框控件，名称为 TextTime，一个计时器控件，名称为 Timer1。要求每一秒在文本框中显示一次当前的时间。 Private Sub Timer1_ TextTime.Text=Time End Sub （分数：2.00）A.EnabledB.VisibleC.Timer()D.Interval26.下列程序代码实现生成 20 个 0100 之间的随机整数，存于数组中，打印数组中大于 50 的数，并求这些数的和。请选择正确的程序段是( )，完成程序。 Private Sub
8、Command1_Clickn Dim arr(1 To 20) For i=1 To 20 arr(i)=_ Text1.Text=Text1.TextX Sum=Sum+X End If Next X Print Tab(20);“Sum“;Sum End Sub（分数：2.00）A.Int(Rnd*99+1) In arrB.Int (Rn In arrC.Int(Rnd*99+1) In arr()D.Int(Rn In arr()27.有下列程序段，其输出结果为( )。 a=0:b=0 For i=-1 To-2 Step-1 For j=1 To 2 b=b+1 Next j a=
9、a+1 Next i Print a；b（分数：2.00）A.23B.-22C.42D.2428.下列叙述正确的是( )。（分数：2.00）A.算法的执行效率与数据的存储结构无关B.算法的空间复杂度是指算法程序中指令(或语句)的条数C.算法的有穷性是指算法必须能在执行有限个步骤之后终止D.以上 3 种描述都不对29.按文件的访问方式不同，可以将文件分为( )。（分数：2.00）A.顺序文件、随机文件B.文本文件和数据文件C.数据文件和可执行文件D.ASCII 文件和二进制文件30.数据库系统的核心是( )。（分数：2.00）A.数据模型B.数据库管理系统C.数据库D.数据库管理员31.待排序的
10、关键码序列为(33，18，9，25，67，82，53，95，12，70)，要按关键码值递增的顺序排序，采取以第一个关键码为基准元素的快速排序法，第一趟排序后关键码 33 被放到第 ( )个位置。（分数：2.00）A.3B.5C.7D.932.下列程序段错误的是( )。（分数：2.00）A.Dim a As Integer a=array(1,2,3,4)B.Dim a(),b() a=array(1,2,3,4)：b=aC.Dim a As Variant a=array(1,“asd“,truD.Dim a()As Variant a=array(1，2,3,4)33.下列事件过程的功能是：
11、建立一个名为 Datal 的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为 1，2，3，90。请选择正确的程序段是( )，将程序补充完整。 Private Type Ang K As Integer Sinx As Single Cosx As Single End Type Dim Ksc As Ang Private Sub Form_CliCk() Dim Y As Single Dim i As Integer Dim Ksc As Ang Open_ Y=3.14159/180 For i=1 To 90 Ksc.K=i Ksc.Sinx=Sin(i*Y) Ksc C
12、osx=Cos(i*Y) _ Next i Close#2 EndSub（分数：2.00）A.“/Data1.txt“For Random As#1 Len=10 Put#1,i,KscB.“/Data1.txt“For Random As#1 Len=10 Put#1,Y,KscC.“/Data1.txt“For Random As#1 Put#1,i,KscD.“/Data1.txt“For Random As#1 Put#1,Y,Ksc34.要建立一个随机文件记录学生的信息，如下定义了学生的记录类型，由学号、姓名、5 门课程成绩(百分制)组成，下列的定义正确的是( )。（分数：2.00）
13、A.Type stu no As Integer name As String score(1 To 5)AS Single End TypeB.Type stu no As Integer name As String*10 score()As Single End TypeC.Type stu no As Integer name As String*10 score(1 To 5)As single End TypeD.Type stu no As Integer name As String score()As Single End Type35.栈和队列的共同点是( )。（分数：2.
14、00）A.都是先进先出B.都是先进后出C.只允许在端点处插入和删除元素D.没有共同特点二、B填空题/B(总题数：11，分数：22.00)36.在数据的存储结构中，不仅需要存储各数据元素的信息，还要存放各元素之间 1 的信息。（分数：2.00）填空项 1:_37.按照“先进先出”的原则组织数据的结构的是 1。（分数：2.00）填空项 1:_38.深度为 5 的满二叉树中，叶子结点的个数为 1。（分数：2.00）填空项 1:_39.在面向对象方法中，_描述的是具有相似属性与操作的一组对象。（分数：2.00）填空项 1:_40.Jackson 方法是一种面向_的结构化方法。（分数：2.00）填空项
15、1:_41.在鼠标事件过程 MouseDown 和 MouseUp 中，参数 Button 的值为 1、2、4 时，分别代表按下鼠标的_、_和_按钮。（分数：2.00）填空项 1:_42.已知变量 boo1Var 是一个布尔型的变量，如果要给其赋值为 True，则正确的赋值语句是 1。（分数：2.00）填空项 1:_43.执行以下语句后，输出结果为_。 s$=“ABCDEFG“ Print InStr(s$，“efg“) Print LCase$(s$)（分数：2.00）填空项 1:_44.表达式“12345“12345“i（分数：2.00）A.i=1B.i=2C.i=3D.i=4 解析：解析
16、 程序执行过程为：程序首先给变量 a 赋初值 75，然后执行第 2 行 if 语句，条件成立，因此执行 i=l 赋值语句；接着执行第 3 行 if 语句，条件成立，因此执行 i=2 赋值语句；接着执行第 4 行 if语句，条件不能成立，因此不执行 i=2 赋值语句；接着执行第 5 行 if 语句，条件成立，因此执行 i=4 赋值语句，此时 i=4；最后执行 Print 输出语句，输出 i。16.设有变量声明为“Dim aDate As Date”，则为变量 aDate 正确赋值的表达方式是( )。（分数：2.00）A.aDate=#8/2008# B.aDate=#“8/8/2008”#C.a
17、Date=Date(“8/8/2008”)D.aDate=Format(“m/d/yy”，”8/8/2008”)解析：解析 任何可辨认的文本日期都可以赋值给 Date 变量。日期文字必须以数字符号“#”扩起来，例如，#January1、1993#或#1 Jan 93#。对于选项 D)是按照格式字符串的要求显示数值表达式，Format函数的正确格式为：Format(数值表达式，格式字符串)，所以选项 D)应该改为：aDate=Format(“8/8/2008”,“m/d/yy”)；选项 C)中 Date 函数使用错误，应为：aDate=Date。17.窗体上有一个命令按钮，命令按钮的单击事件过程
18、如下。运行程序后，单击命令按钮，输出结果是( )。Private Sub Command1_Click() Dim a a=Array(1，2，3，4，5) For k=1 To 4 S=S+a(k) Next k Print S End Sub（分数：2.00）A.10B.14 C.15D.120解析：解析 解答本题的关键是读懂程序。我们来看程序，程序中首先通过赋值语句定义一个有 5 个元素的数组(数组的下标从零开始)；接下来是通过 For 循环来循环给变量 S 赋值(即对数组元素求和)，这里循环中 k 从 1 开始，因此 a(k)从 2 开始取值，到 a(4)也就是 5 结束，计算结果为
19、14。18.已知代数式 eXSin(30)2x/(x+y)Lnx，则正确的 Visual Basic 表达式为( )。（分数：2.00）A.E*Sin(30*3.14/180)*2*X/X+Y*Log(B.Exp(*Sin(30)*2*X/(X+*Ln(C.Exp(*Sin(30*3.14/180)*2*x/(x+*Log( D.Exp(*Sin(30*3.14/180)*2*X/(X+*Ln(解析：解析 “Exp”函数功能是计算 e 的某次方，其格式为是 Exp(number)；“Sin”函数指定参数的正弦值，它的参数是表示以弧度为单位的角的 Double 型数据；“Log”函数得到某数的自
20、然对数值，正确的表达方式是 Log(number)；“30”在计算机中应该写成 30*3.14/180；并且各个表达式之间的乘号不能省略。19.数据的存储结构是指( )。（分数：2.00）A.数据所占的存储空间B.数据的逻辑结构在计算机中的存放形式 C.数据在计算机中的顺序存储方式D.存储在计算机外存中的数据解析：解析 数据的存储结构，又称为数据的物理结构，是数据的逻辑结构在计算机中的存放形式，数据的存储结构有顺序结构、链式结构、散列结构和索引结构等。20.窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是( )。 Private Sub Command1_Click() Picture
21、1.Picture=LoadPicture(“C:/picture.jpg“) Picture1.Cls Picture1.Print“picture“ End Sub（分数：2.00）A.窗体无显示，图片框显示图片和文字 picture B.窗体上出现 picture 文本，图片框无显示C.窗体上出现 picture 文本，图片框显示图片 picturjpgD.窗体无显示，图片框只显示 picture 文字解析：解析 图片框的装载语句为：Picture1.Picture=LoadPicture(图片完整路进)。Print 输出方法的功能是在指定的对象上输出文本信息，它的基本格式为：对象名.P
22、rint。21.下列描述中正确的是( )。（分数：2.00）A.软件工程只是解决软件项目的管理问题B.软件工程主要解决软件产品的生产率问题C.软件工程的主要思想是强调在软件开发过程中需要应用工程化原则 D.软件工程只是解决软件开发过程中的技术问题解析：解析 软件工程是指将工程化的思想应用于软件的开发、应用和维护的过程，包括软件开发技术和软件工程管理。22.表达式 Str(Len(“123”)+Str(77.7)的值是( )。（分数：2.00）A.377.7B.377.7 C.80.7D.12377.7解析：解析 解本题有两个关键点：一是运算的先后顺序，这里应该是 Len 函数Str 函数计算(
23、连接)；二是 Len 函数和 Sb 函数的功能，Len 函数用来计算字符串的长度，“123”长度为 3(空格、小数点各算一个长度)。Str 函数是将数字转为字符串，注意转换后数字前会保留一空位表示正负。这里“3”转换后为“_3”(“_”表示空格)。 “+”运算符时有可能是做加法，也有可能是做字符串连接，其结果根据两个参与运算的表达式决定。如果两个表达式都是数值数据类型，进行相加运算：如果两个表达式都是字符，进行相连接运算。23.下列程序的运行结果是( )。 Private Sub Command1_Click() a=1.5 b=1.5 Call fun(a，b) Print a，b End
24、Sub Private Sub fun(x，y) x=y*y y=y+x End Sub（分数：2.00）A.2.25 3.75 B.1.5 2.25C.1.5 0.75D.0.75 1.5解析：解析 分析程序，命令按钮中的调用函数语句执行过程为：Call fun(a，b)x=y*y=1.5*1.5=2.25，y=y+x=1.5+2.25=3.75。因为这里的参数是默认类型，即传地址形式传递参数，所以 a、b 的值也改变为 2.25、3.75。24.有如下函数过程： Function fun1(By Val x As Integer,By Val y As Integer)As Integer
25、 Do While y0 reminder=x Mod y x=y y=reminder Loop fun1=x End Function 在下列按钮单击事件中调用该函数，则该程序的运行结果是( )。 Private Sub Command1_CliCk() Dim a As Integer Dim b As Integer a=100 b=25 x=fun1(a，b) Print x End Sub（分数：2.00）A.0B.25 C.50D.100解析：解析 可以通过两种方式来传递参数，即按值传递参数和按地址传递参数。按值传递参数时，传递的只是变量的副本。如果过程改变了这个值，则所作变动只
26、影响副本而不会影响变量本身。用 ByVal 关键字指出参数是按值来传递的。按地址传递参数使过程用变量的内存地址去访问实际变量的内容，在将变量传递给过程时，通过过程可永远改变变量值。默认时是按地址传递参数。 题中 fun1 函数的参数都是按值传送的，函数使用“过程名二表达式”的形式获得函数的返回值，如题中“fun1=x”语句。调用函数“x=fun1(a，b)”后，x=25。25.在窗体上有一个文本框控件，名称为 TextTime，一个计时器控件，名称为 Timer1。要求每一秒在文本框中显示一次当前的时间。 Private Sub Timer1_ TextTime.Text=Time End S
27、ub （分数：2.00）A.EnabledB.VisibleC.Timer() D.Interval解析：解析 计时器控件又称为时钟控件，通过引发 Timer 事件，可以有规律地隔一段时间执行一次代码。控件用于背景进程中，是不可见的。Timer 时间也是计时器控件的惟一事件。26.下列程序代码实现生成 20 个 0100 之间的随机整数，存于数组中，打印数组中大于 50 的数，并求这些数的和。请选择正确的程序段是( )，完成程序。 Private Sub Command1_Clickn Dim arr(1 To 20) For i=1 To 20 arr(i)=_ Text1.Text=Tex
28、t1.TextX Sum=Sum+X End If Next X Print Tab(20);“Sum“;Sum End Sub（分数：2.00）A.Int(Rnd*99+1) In arr B.Int (Rn In arrC.Int(Rnd*99+1) In arr()D.Int(Rn In arr()解析：解析 Pad 函数用于产生一个小于 1 但大于或等于 0 的实数，题中要求 0100 之间的随机整数，所以需要对 Pad 产生的实数进行计算处理 Int(Pad*99+1)。要处理数组中的元素，使用 For EachNext语句处理数组元素时，Each 后只需写出数组名，不能使用小括号。
29、27.有下列程序段，其输出结果为( )。 a=0:b=0 For i=-1 To-2 Step-1 For j=1 To 2 b=b+1 Next j a=a+1 Next i Print a；b（分数：2.00）A.23B.-22C.42D.24 解析：解析 这个双重 For 循环中，外层的 For 循环次数是两次，计算变量 a 的值；内层 For 循环每次执行循环次数也是 2 次，计算变量 b 的值。执行过程为：当 a=0；b=0 时，语句 b=b+1 执行两次，结果为 2，a=a+1=1。当 a=1；b=2 时，语句 b=b+1 执行两次，结果为 4，a=a+1=2。因此最后计算结果为a
30、=2，b=4。28.下列叙述正确的是( )。（分数：2.00）A.算法的执行效率与数据的存储结构无关B.算法的空间复杂度是指算法程序中指令(或语句)的条数C.算法的有穷性是指算法必须能在执行有限个步骤之后终止 D.以上 3 种描述都不对解析：解析 算法的执行效率与数据的存储结构密切相关。算法的空间复杂度是指算法执行过程中所需的存储空间。29.按文件的访问方式不同，可以将文件分为( )。（分数：2.00）A.顺序文件、随机文件 B.文本文件和数据文件C.数据文件和可执行文件D.ASCII 文件和二进制文件解析：解析 根据不同的分类标准，文件可分为不同的类型。根据数据性质，文件可分为程序文件和数据
31、文件：根据数据的存取方式和结构，文件可分为顺序文件和随机文件；根据数据的编码方式，文件可分为 ASCII 文件和二进制文件。30.数据库系统的核心是( )。（分数：2.00）A.数据模型B.数据库管理系统 C.数据库D.数据库管理员解析：解析 数据库系统由数据库(数据)、数据库管理系统(软件)、数据库管理员(人员)、硬件平台(硬件)、软件平台 5 个部分构成。其中数据库管理系统是数据库系统的核心，它负责数据库中的数据组织、数据操纵、数据维护、控制及保护和数据服务等工作。31.待排序的关键码序列为(33，18，9，25，67，82，53，95，12，70)，要按关键码值递增的顺序排序，采取以第一
32、个关键码为基准元素的快速排序法，第一趟排序后关键码 33 被放到第 ( )个位置。（分数：2.00）A.3B.5 C.7D.9解析：解析 快速排序的基本思想是：从表中选取一个元素(如本题中的 33)，将表中小于此元素的移到前面，大于此元素的移到后面，结果把线性表分割成两部分(两个子表)，此元素插入到其分界线的位置处。然后分别对两个子表再次分割本题中 33 作为分割的中界线，第一趟排序后排在比它小的18、9、25、12 后面。32.下列程序段错误的是( )。（分数：2.00）A.Dim a As Integer a=array(1,2,3,4) B.Dim a(),b() a=array(1,2
33、,3,4)：b=aC.Dim a As Variant a=array(1,“asd“,truD.Dim a()As Variant a=array(1，2,3,4)解析：解析 本题是考查使用 Array 函数为数组变量赋值。使用 Array 函数给数组赋值时需要先定义数组变量，然后再使用 Array 函数赋值。 注意：在定义数组变量的时候，数组变量不能是具体的数据类型，只能是变体(Variant)类型。33.下列事件过程的功能是：建立一个名为 Datal 的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为 1，2，3，90。请选择正确的程序段是( )，将程序补充完整。 Priv
34、ate Type Ang K As Integer Sinx As Single Cosx As Single End Type Dim Ksc As Ang Private Sub Form_CliCk() Dim Y As Single Dim i As Integer Dim Ksc As Ang Open_ Y=3.14159/180 For i=1 To 90 Ksc.K=i Ksc.Sinx=Sin(i*Y) Ksc Cosx=Cos(i*Y) _ Next i Close#2 EndSub（分数：2.00）A.“/Data1.txt“For Random As#1 Len=10
35、Put#1,i,Ksc B.“/Data1.txt“For Random As#1 Len=10 Put#1,Y,KscC.“/Data1.txt“For Random As#1 Put#1,i,KscD.“/Data1.txt“For Random As#1 Put#1,Y,Ksc解析：解析 分析程序，程序要将角度值及这些角度的正弦函数值和余弦函数值存入 Datal 文件中。因此，应先打开 Daml 文件，应为 Daml 文件是随机文件，要新建并写入信息，所以应用 Random 方式打开文件。这里我们给随机文件指定长度为 10，所以第 1 个空白处应填： “/Datal.txt“For Ra
36、ndom As#1 Len=10。要向随机文件中写入信息，应用 Put 语句，因此第 2 空应填：Put#1，i，Ksc。34.要建立一个随机文件记录学生的信息，如下定义了学生的记录类型，由学号、姓名、5 门课程成绩(百分制)组成，下列的定义正确的是( )。（分数：2.00）A.Type stu no As Integer name As String score(1 To 5)AS Single End TypeB.Type stu no As Integer name As String*10 score()As Single End TypeC.Type stu no As Intege
37、r name As String*10 score(1 To 5)As single End Type D.Type stu no As Integer name As String score()As Single End Type解析：解析 可以用 Type 语句创建用户定义的类型，注意该语句必须置于模块的声明部分。其格式如下：Type 数据类型名 数据类型元素名 As 类型名 数据类型元素名 As 类型名 End Type 在记录数据类型中的元素可以是变长字符串，也可以是定长字符串。当在随机文件中使用时，必须使用定长字符串，一般格式是：String *常量。另外，在记录类型中不能使用动态
38、数组。35.栈和队列的共同点是( )。（分数：2.00）A.都是先进先出B.都是先进后出C.只允许在端点处插入和删除元素 D.没有共同特点解析：解析 栈和队列都是操作受限制的线性表，只允许在端点插入和删除。不同点是：栈只允许在表的一端进行插入和删除操作，而队列允许在表的一端进行插入操作，而在另一端进行删除操作。二、B填空题/B(总题数：11，分数：22.00)36.在数据的存储结构中，不仅需要存储各数据元素的信息，还要存放各元素之间 1 的信息。（分数：2.00）填空项 1:_ （正确答案：前后件关系）解析：解析 在数据存储结构中，除了要存储数据，还要存储数据的前后件关系，对于顺序存储的数据结
39、构，前后件之间的关系，是通过存储空间的位置来实现的，而对于链式存储来说，数据元素之间的前后件关系是通过指针来实现的。37.按照“先进先出”的原则组织数据的结构的是 1。（分数：2.00）填空项 1:_ （正确答案：队列）解析：解析 队列是一种特殊的线性表，只允许在表的一端插入元素，在表的另一端删除元素，插入元素的一端叫做“队尾”，删除元素的一端叫做“队头”，先插入的元素先被删除，足按先进先出的原则组织数据的。38.深度为 5 的满二叉树中，叶子结点的个数为 1。（分数：2.00）填空项 1:_ （正确答案：16）解析：解析 满二叉树的叶子结点都在最后一层，即第 4 层，且第 4 层的结点达到最
40、大数，即 25-1=16。39.在面向对象方法中，_描述的是具有相似属性与操作的一组对象。（分数：2.00）填空项 1:_ （正确答案：类）解析：解析 在面向对象方法中，把具有相同属性和方法的对象称为类，类是对象的抽象，对象是类的实例。40.Jackson 方法是一种面向_的结构化方法。（分数：2.00）填空项 1:_ （正确答案：数据结构）解析：解析 Jackson 方法是一种结构化分析方法，它是一种面向数据结构的方法。41.在鼠标事件过程 MouseDown 和 MouseUp 中，参数 Button 的值为 1、2、4 时，分别代表按下鼠标的_、_和_按钮。（分数：2.00）填空项 1:
41、_ （正确答案：左 右 中间）解析：解析 MouseDown、MouseUp 和 MouseMove 事件均能区分出鼠标的左、右和中间按钮。Button 参数与按钮的对应关系是：当 Button=1 时，对应于左按钮(位 0)；当 Button=2 时，对应于右按钮(位 1)；当Button=4 时，对应于中间按钮(位 2)。42.已知变量 boo1Var 是一个布尔型的变量，如果要给其赋值为 True，则正确的赋值语句是 1。（分数：2.00）填空项 1:_ （正确答案：boo1Var=Ture）解析：解析 赋值运算符号为“=”，功能是将右侧的值赋值给左侧的变量，并要求两侧的数据类型匹配，布
42、尔类型的值有两个 True 或 False，所以正确的赋值形式为：布尔型变量名=True(或 False)。43.执行以下语句后，输出结果为_。 s$=“ABCDEFG“ Print InStr(s$，“efg“) Print LCase$(s$)（分数：2.00）填空项 1:_ （正确答案：0CRabcdefg）解析：解析 本题考查了字符串函数的应用。InStr 函数是字符串匹配函数，它的格式为：InStr(首字符位置，字符串 1，字符串 2，n)。它的功能是在字符串 1 中查找字符串 2，如果找到了，则返回字符串 2 的第一个字符在字符串 1 中的位置。注意：字符串的第一个字符的位置为 1
43、。44.表达式“12345“12345“&“ABC“的值是_。（分数：2.00）填空项 1:_ （正确答案：True）解析：解析 运算的顺序为先进行算术运算“&”，然后是关系运算“”。 表达式“12345“12345“&“ABC“的运算过程如下：先进行算术运算，“12345“12345“&“ABC“=“12345“12345ABC“：再进行关系运算，“12345“12345“&“ABC“=“12345“ “12345ABC“=True。45.在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Click() Text1.Text=“VB Progra
44、mming“ End Sub Private Sub Text1_Change() Picture1.Print“VB 程序设计“ End Sub 程序运行后，单击窗体，则在文本框中显示的内容是_，而在图片框中显示的内容是_。（分数：2.00）填空项 1:_ （正确答案：VB Programming VB 程序设计）解析：解析 单击窗体触发 Form 的 Click 事件，执行“Text1.Text=“VB Programming“”语句，在文本框 Text1 中显示“VB Programming”；此时文本框 Text1 的 Text 属性发生了变化，因此触发 Text1 的Change 事
45、件，执行“Picture1.Print“VB 程序设计“”语句，在图片框中显示“VB 程序设计”。46.下列程序用于在带垂直滚动条的文本框 Text1 中输出 3 到 100 之间的全部素数。请填空。 Private Sub Command1_click() Text1.Text=“ For n=3 to 100 k=Int(Sqr(n) i=2 Flag=0 Do While i=_And Flag=0 If n Mod i=0 Then Flag=1 Else i=i+1 End If Loop If_Then Text1.Text=Text1.Text&Str(n)&Chr(13)&Chr(10) End If Next n End Sub（分数：2.00）填空项 1:_ （正确答案：k Flag=O）解析：解析 判断一个数是不是素数，其算法是：从 2 开始到该数的平方根的下限(即为题中 k 的值)去除这个数，如果没有可以整除的数则说明该数是个素数。本题中设置了一个标志变量 Flag，默认值为 0，如果在整除的循环中，检查出该数不是素数，则设置 Flag 为 1，也就是循环后 Flag 为 0 的数表示该数是素数，并把它显示在 Text1 文本框。
