1、二级公共基础知识-70 及答案解析(总分：100.00，做题时间：90 分钟)一、B单项选择题/B(总题数：58，分数：100.00)1.设 a=5，b=6，c=7，d=8，执行语句 x=IIf(ab)And(cd),10,20)后，x 的值是_。 A.10 B.20 C.30 D.200（分数：1.50）A.B.C.D.2.语句 Print Sgn(-62)+Abs(-62)+Int(-62)的输出结果是_。 A.-36 B.1 C.-1 D.-72（分数：1.50）A.B.C.D.3.下面程序运行时，若输入 395，则输出结果是_。Private Sub Command1_Click()D
2、im x%x=InputBox(“请输入一个 3位整数“)Print x Mod 10, x/100, (x Mod 100)/10End Sub A.3 9 5 B.5 3 9 C.5 9 3 D.3 5 9（分数：1.50）A.B.C.D.4.以下关于局部变量的叙述中错误的是_。 A.在过程中用 Dim语句或 Static语句声明的变量是局部变量 B.局部变量的作用域是它所在的过程 C.在过程中用 Static语句声明的变量是静态局部变量 D.过程执行完毕，该过程中用 Dim或 Static语句声明的变量即被释放（分数：1.50）A.B.C.D.5.窗体上有一个 Text1文本框，一个 C
3、ommand1命令按钮，并有以下程序：Private Sub Command1_click()Dim nIf Text1.Text“123456“Thenn=n+1Print“口令输入错误“ & n & “次“End IfEnd Sub希望程序运行时得到上图所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是下图所示的效果，程序需要修改。下面修改方案中正确的是_。（分数：1.50）A.B.C.D.6.设窗体文件中有下面的事件过程：Private Sub Command1_Click()Dim sa%=1
4、00Print aEnd Sub其中变量 a和 s的数据类型分别是_。 A.整型，整型 B.变体型，变体型 C.整型，变体型 D.变体型，整型（分数：1.50）A.B.C.D.7.可以产生 3050(含 30和 50)之间的随机整数的表达式是_。 A.Int(Rnd*21+30) B.Int(Rnd*20+30) C.Int(Rnd*50-Rnd*30) D.Int(Rnd*30+50)（分数：1.50）A.B.C.D.8.把数学表达式 （分数：1.50）A.B.C.D.9.以下变量名中合法的是_。 A.x2-1 B.print C.str_n D.2x（分数：1.50）A.B.C.D.10.
5、执行语句 Dim X, Y As Integer后，_。 A.X和 Y均被定义为整型变量 B.X和 Y均被定义为变体类型变量 C.X被定义为整型变量，Y 被定义为变体类型变量 D.X被定义为变体类型变量，Y 被定义为整型变量（分数：1.50）A.B.C.D.11.以下关系表达式中，其值为 True的是_。 A.“XYZ“XYz“ B.“VisualBasic“visualbasic“ C.“the“=“there“ D.“Integer“Int“（分数：1.50）A.B.C.D.12.执行以下程序段a$=“Visual Basic Programming“b$=“C+“c$=UCase(Lef
6、t$(a$,7) & b$ & Right$(a$,12)后，变量 c$的值为_。 A.Visual BASIC Programming B.VISUAL C+Programming C.Visual C+Programming D.VISUAL BASIC Programming（分数：1.50）A.B.C.D.13.阅读程序：Private Sub Form_Click()a=0For j=1 To 15a=a+j Mod 3Next jPrint aEnd Sub程序运行后，单击窗体，输出结果是_。 A.105 B.1 C.120 D.15（分数：1.50）A.B.C.D.14.设有如下
7、通用过程：Public Function Fun(xStr As String)As StringDim tStr As String, strL As IntegertStr=“strL=Len(xStr)i=strL/2Do While i=StrLtStr=tStr & Mid(xStr,i+1,1)i=i+1LoopFun=tStr & tStrEnd Function在窗体上画一个名称为 Text1的文本框和一个名为 Command1的命令按钮。然后编写如下的事件过程：Private Sub Command1_Click()Dim S1 As StringS1=“ABCDEF“Tex
8、t1.Text=LCase(Fun(S1)End Sub程序运行后，单击命令按钮，文本框中显示的是_。 A.ABCDEF B.abcdef C.defdef D.defabc（分数：1.50）A.B.C.D.15.为把圆周率的近似值 3.14159存放在变量 pi中，应该把变量 pi定义为_。 A.Dim pi As Integer B.Dim pi(7) As Integer C.Dim pi As Single D.Dim pi As Long（分数：1.50）A.B.C.D.16.表达式 2*32+4*2/2+32的值是_。 A.30 B.31 C.49 D.48（分数：1.50）A.B
9、.C.D.17.设 a=4，b=5，c=6，执行语句 Print ab And bc 后，窗体上显示的是_。 A.True B.False C.出错信息 D.0（分数：1.50）A.B.C.D.18.以下不能输出“Program”的语句是_。 A.Print Mid(“VBProgram“, 3, 7) B.Print Right(“VBProgram“, 7) C.Print Mid(“VBProgram“, 3) D.Print Left(“VBProgram“, 7)（分数：1.50）A.B.C.D.19.若变量 a未事先定义而直接使用(例如：a=0)，则变量 a的类型是_。 A.Int
10、eger B.String C.Boolean D.Variant（分数：1.50）A.B.C.D.20.以下选项中，不合法的 Visual Basic的变量名是_。 A.a5b B._xyz C.a-b D.andif（分数：1.50）A.B.C.D.21.在 Visual Basic中，表达式 3*2/5 Mod 3的值是_。 A.1 B.0 C.3 D.出现错误提示（分数：1.50）A.B.C.D.22.窗体上有一个名称为 Text1的文本框，一个名称为 Command1的命令按钮。窗体文件的程序如下：Private Type xa As Integerb As IntegerEnd T
11、ypePrivate Sub Command1_Click()Dim y As xy.a=InputBox(“)If y.a/2=y.a/2Theny.b=y.a*y.aElsey.b=Fix(y.a/2)End IfText1.Text=y.bEnd Sub对以上程序，下列叙述中错误的是_。 A.x是用户定义的类型 B.InputBox函数弹出的对话框中没有提示信息 C.若输入的是偶数，y.b 的值为该偶数的平方 D.Fix(y.a/2)把 y.a/2的小数部分四舍五入，转换为整数返回（分数：1.50）A.B.C.D.23.关于下面用户自定义类型 Employee的定义，说法正确的是_。Ty
12、pe EmployeeGiverName As String: FamilyName As String*10Extension As Variant: Salary As LongEnd Type A.Employee的定义有错误，成员 Salary的定义有误 B.Employee的定义有错误，Extension 不能定义为变体 Variant类型 C.Employee的定义有错误，GiverName 应该为定长的字符串 D.Employee的定义是正确的，GiverName 可以为变长的字符串（分数：1.50）A.B.C.D.24.以下能正确定义数据类型 SystemInfo的代码是_。
13、A.Type SystemInfo DiskDrives As String*10 Memory As Long End Type B.Type Systeminfo DiskDrives As String*10 Memory As Long End Systemlnfo C.Type SystemInfo DiskDrives String*10 Memory Long End Type SystemInfo D.DefType Systemlnfo DiskDrives String*10 Memory Long End Type（分数：1.50）A.B.C.D.25.设有如下的记录类型
14、：Type StudentNumber As String: Name As StringAge As IntegerEnd Type则能正确引用该记录类型变量的代码是_。 A.Student.name=“ “ B.Dim s As Student: s.age=17 C.Dim s As Type Student: s.name=“小明“ D.Dim s As Type: s.Number=“1001“（分数：1.50）A.B.C.D.26.关于用户自定义数据类型的说法错误的是_。 A.可以用 Type语句创建用户定义的类型，该语句必须置于模块的声明部分 B.用户定义类型可以用适当的关键字声
15、明为 Private或 Public C.对于两个属于同一个用户定义类型的变量，不能将其中一个变量赋给另一个变量 D.对同一种用户定义类型，可以声明为局部的、私有的或公用的模块级变量（分数：1.50）A.B.C.D.27.关于变量作用域，下列叙述中正确的是_。 A.局部变量的作用域可以超出所定义的过程 B.在窗体的 Form Load事件过程中定义的变量是全局变量 C.在调用过程时，所有局部变量被系统初始化为 0或空字符串 D.在某个 Sub过程中定义的局部变量可以与其他事件过程中定义的局部变量同名，但其作用域只限于该过程（分数：1.50）A.B.C.D.28.下列叙述中有错误的是_。 A.变
16、量名的第一个字符必须是字母 B.变量名的长度不超过 255个字符 C.变量名可以包含小数点或者内嵌的类型声明字符 D.变量名不能使用关键字（分数：1.50）A.B.C.D.29.下列_标识符不能作为 VB的变量名。 A.ABCabe B.b1234 C.28wed D.crud（分数：1.50）A.B.C.D.30.声明一个变量为局部变量应该用_。 A.Global B.Private C.Static D.Public（分数：1.50）A.B.C.D.31.设有变量声明语句：Dim DateA As Date，为变量 DateA正确赋值的表达方式是_。 A.DateA=#1/1/2009#
17、B.DateA=#“1/1/2009“# C.DateA=date(“1/1/2009“) D.DateA=Format(“m/d/yy“,“1/1/2009“)（分数：1.50）A.B.C.D.32.以下声明语句中错误的是_。 A.Constx=“ABC“ B.Dim x=123 C.DefInt a-z D.Static x As Integer（分数：1.50）A.B.C.D.33.下列语句运行时系统会给出错误提示的是_。 A.Print -32000-799 B.Print “12“+10 C.Print “AB“ & 888 D.Print 3=6=8（分数：1.50）A.B.C.D
18、.34.已知变量 x、y 为整数型，且 x=4，y=12，s 为字符串型，且 s=“a“，LblOk 为标签控件，下列赋值语句合法的是_。 A.x=LblOk.Caption B.LblOk.caption=Str(x) C.x*3=y D.y=x*s（分数：1.50）A.B.C.D.35.以下选项中，正确地描述了 xy 和 yz 同时成立的表达式是_。 A.xy.And.yz B.xyz C.xy And xz D.xy And yz（分数：1.50）A.B.C.D.36.以下 4个语句中，输出逻辑值为“True“的是_。 A.Print Not(3+54+6) B.Print 21 And
19、 32 C.Print 12 Or 23 D.Print Not(12)（分数：1.50）A.B.C.D.37.不能正确表示条件“两个整型变量 A和 B之一为 0，但不能同时为 0”的布尔表达式是_。 A.A*B=0 And A+B0 B.(A=0 or B=0)And(A0 Or B0) C.not(A=0 And B=0)And(A=0 or B=0) D.A*B=0 And(A=0 or B=0)（分数：1.50）A.B.C.D.38.表达式 Int(8*Sqr(36)*10(-2)*10+0.5)/10的值是_。 A.0.48 B.0.048 C.0.5 D.0.05（分数：1.50）
20、A.B.C.D.39.设 x=4，y=8，z=7，则表达式“xy And(Not yz)Or zx”的运算结果是_。 A.1 B.-1 C.True D.False（分数：1.50）A.B.C.D.40.表达式 13000+“129“ & 200的值是_。 A.13329 B.“13129200“ C.“13000129200“ D.“13329“（分数：1.50）A.B.C.D.41.若 a=8，b=6，c=1，执行语句：Print abc 后，窗体上显示的是_。 A.False B.True C.1 D.出错信息（分数：1.50）A.B.C.D.42.若 a=3，b=5，则以下表达式值为真
21、的是_。 A.(ab) Or (b0) B.a=b And b10 C.(a0) Eqv (b0) D.(-3+5a) And (b0)（分数：1.50）A.B.C.D.43.设有声明语句：Dim N As Integer。如果 Sgn(N)的值为-1，则 N的值是_。 A.大于 0的整数 B.小于 0的整数 C.小于 0的数 D.等于 0的整数（分数：1.50）A.B.C.D.44.表达式 String(1,“I am lihua“)+Replace(“am hansome“,“nsome“,“PPY“)&“!“的值是_。 A.“I am lihua am happy!“ B.“I am h
22、appy!“ C.“I am lihua am hansome!“ D.“I am lihua I am s am hansome lihua am happy!“（分数：1.50）A.B.C.D.45.在窗体上画一个名称为 Command1的命令按钮。单击命令按钮时执行如下事件过程：Private Sub Command1_Click()a$=“software and hardware“:b$=Right(a$,8)c$=Mid(a$,1,8):MsgBox a$,b$,c$,1End Sub则在弹出的信息框标题栏中显示的标题是_。 A.software and hardware B.ha
23、rdware C.software D.1（分数：2.00）A.B.C.D.46.如果执行一个语句后弹出如图所示的窗口，则这个语句是_。（分数：2.00）A.B.C.D.47.下面不能在信息框中输出“VB”的是_。 A.MsgBox#“VB“ B.x=MsgBox(“VB“) C.MsgBox(“VB“) D.Call MsgBox “VB“（分数：2.00）A.B.C.D.48.用来设置文字字体是否斜体的属性是_。 A.FontUnderline B.FontBold C.FontSlope D.Fontltalic（分数：2.00）A.B.C.D.49.下列叙述中正确的是_。 A.MsgB
24、ox语句的返回值是一个整数 B.执行 MsgBox语句并出现信息框后，不用关闭信息框即可执行其他操作 C.MsgBox语句的第一个参数不能省略 D.如果省略 MsgBox语句的第 3个参数(Title)，则信息框的标题为空（分数：2.00）A.B.C.D.50.在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()c=1234:c1=Trim(Str(c)For i=1 To 4Print_NextEnd Sub程序运行后，单击命令按钮，要求在窗体上显示如下内容：1121231234则在横线处应填入的内容为_。 A.Ri
25、ght(c1,i) B.Left(c1,i) C.Mid(c1,i,1) D.Mid(c1,i,i)（分数：2.00）A.B.C.D.51.执行语句“a=8.8596:Print Format(a,“$00,00.00“)”后，正确的输出结果是_。 A.0,008.86 B.$8.86 C.8.6 D.$0,008.86（分数：2.00）A.B.C.D.52.有以下程序段，单击 Command1按钮后，打印机上的输出结果是_。Private Sub Command1_Click()For i=6 To 9Printer.Print Tab(i*i),iNext iEnd Sub A.6 7 8
26、 9 B.6 7 8 9 C.6 7 8 9 D.6 7 8 9（分数：2.00）A.B.C.D.53.指令“Circle(1500,1200),1000,0.5”将会绘制出的图形为_。 A.圆 B.正方形 C.椭圆 D.圆弧（分数：2.00）A.B.C.D.54.InputBox函数返回值的类型为_。 A.数值 B.字符串 C.变体 D.数值或字符串（分数：2.00）A.B.C.D.55.设有语句：x=InputBox(“请输入数值“, “1“, “输入“)，程序运行后，如从键盘输入 10并按回车键，则下述正确的是_。 A.变量 x的值是数值 10 B.在 InputBox对话框标题栏中显示
27、的是“输入” C.变量 x的值是字符串“10” D.1是默认值（分数：2.00）A.B.C.D.56.执行语句：a=InputBox(“Today“,“Tomorrow“,“Yesterday“,“Day before yesterday“,5)，将显示一个对话框，在该对话框的输入区中显示的信息是_。 A.Today B.Tomorrow C.Yesterday D.Day before yesterday（分数：2.00）A.B.C.D.57.关于函数返回值，下列叙述不正确的是_。 A.MsgBox函数返回值为所单击按钮的键值 B.InputBox函数返回值为字符型 C.Shell函数返回值
28、为所执行文件的工作代码 D.MsgBox语句返回值为所单击按钮的键值（分数：2.00）A.B.C.D.58.在窗体上有一个名为 Command1的命令按钮，并有如下事件过程：Private Sub Command1_Click()a$=“Swallows Mod Genulled“:b$=Right(a$,8)c$=Mid(a$,1,8):MsgBox a$,b$,c$,1End Sub程序执行时，单击命令按钮，则在弹出的消息框的标题栏中显示的是_。 A.Swallows Mod Genulled B.Genulled C.Swallows D.1（分数：8.00）A.B.C.D.二级公共基础
29、知识-70 答案解析(总分：100.00，做题时间：90 分钟)一、B单项选择题/B(总题数：58，分数：100.00)1.设 a=5，b=6，c=7，d=8，执行语句 x=IIf(ab)And(cd),10,20)后，x 的值是_。 A.10 B.20 C.30 D.200（分数：1.50）A.B. C.D.解析：考点 IIf 函数 解析 IIf 函数可用于执行简单的条件判断操作，它是“If.Then.Else”结构的简写版本。 result=IIf(条件,True 部分,False 部分) “result”是函数的返回值，“条件”是一个逻辑表达式。当“条件”为真时，返回“True 部分”的
30、值；当“条件”为假时，返回“False部分”的值。 本题中由于条件的判断值为 False，故此函数返回值为 20。2.语句 Print Sgn(-62)+Abs(-62)+Int(-62)的输出结果是_。 A.-36 B.1 C.-1 D.-72（分数：1.50）A.B.C. D.解析：考点 算术表达式 解析 算术表达式的运算次序为：幂()取负(-)乘、浮点除(*、/)整除(/)取模(Mod)加、减(+、-)连接(&)，Sgn 函数会返回参数的符号。所以在本题中表达式等于(-1)+(36)+(-36)，最后结果为-1。3.下面程序运行时，若输入 395，则输出结果是_。Private Sub
31、Command1_Click()Dim x%x=InputBox(“请输入一个 3位整数“)Print x Mod 10, x/100, (x Mod 100)/10End Sub A.3 9 5 B.5 3 9 C.5 9 3 D.3 5 9（分数：1.50）A.B. C.D.解析：考点 运算符及表达式 解析 VB 中常用算术运算符有 8个，其中幂运算符()优先级最高；其次是取负(-)、乘(*)、浮点除(/)、整除(/)、取模(Mod)、加(+)、减(-)。4.以下关于局部变量的叙述中错误的是_。 A.在过程中用 Dim语句或 Static语句声明的变量是局部变量 B.局部变量的作用域是它所
32、在的过程 C.在过程中用 Static语句声明的变量是静态局部变量 D.过程执行完毕，该过程中用 Dim或 Static语句声明的变量即被释放（分数：1.50）A.B.C.D. 解析：考点 局部变量 解析 局部变量是在过程(事件过程或通用过程)内定义的变量，作用域为该变量所在的过程，定义时使用.Dim、Static 关键字。使用 Dim关键字定义的是动态局部变量，过程执行结束后即被释放；使用 Static关键字定义的是静态局部变量，过程执行结束后仍然保留。5.窗体上有一个 Text1文本框，一个 Command1命令按钮，并有以下程序：Private Sub Command1_click()D
33、im nIf Text1.Text“123456“Thenn=n+1Print“口令输入错误“ & n & “次“End IfEnd Sub希望程序运行时得到上图所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是下图所示的效果，程序需要修改。下面修改方案中正确的是_。（分数：1.50）A.B.C.D. 解析：考点 常量和变量 解析 本题中题干部分的程序之所以会产生不合要求的结果，其原因是在单击事件中的第一条语句为 Dim n，这样的话每次单击按钮时触发此事件，都将会执行这条语句，重新定义一个局部变量
34、n并设其默认初值为 0。Static 语句在过程级别中使用，用于声明变量并分配存储空间，在整个代码运行期间都能保留使用 Static语句声明的变量的值，因此此处应该使用 Static n来声明变量。6.设窗体文件中有下面的事件过程：Private Sub Command1_Click()Dim sa%=100Print aEnd Sub其中变量 a和 s的数据类型分别是_。 A.整型，整型 B.变体型，变体型 C.整型，变体型 D.变体型，整型（分数：1.50）A.B.C. D.解析：考点 常量和变量 解析 在 VB中，可以显式声明变量和隐式声明变量。如果使用Dim、Public、Static
35、 等关键字来声明变量，则为显式声明，此时如果不指定变量的类型，则该变量为变体型变量；如果不使用关键字声明变量而直接使用，视为隐式声明，此时变量的类型可以使用类型符号来规定，也可以默认为变体型。本题中的变量 a就是使用%来隐式声明，其类型为整型。7.可以产生 3050(含 30和 50)之间的随机整数的表达式是_。 A.Int(Rnd*21+30) B.Int(Rnd*20+30) C.Int(Rnd*50-Rnd*30) D.Int(Rnd*30+50)（分数：1.50）A. B.C.D.解析：考点 内部函数 解析 随机数函数 Rnd的功能是用于产生一个小于 1但大于或等于 0的随机数。为了生
36、成某个指定范围内的随机整数，可使用以下公式： Int(upperbound-lowerbound+1)*Rnd+lowerbound)，其中 upperbound是随机整数范围的上限，lowerbound 是随机整数范围的下限。本题中 upperbound为 50，lowerbound 为 30。8.把数学表达式 （分数：1.50）A.B.C.D. 解析：考点 运算符及表达式 解析 VB 中常用算术运算符有 8个，其中幂运算符()优先级最高；其次是取负(-)、乘(+)、浮点除(/)、整除(/)、取模(Mod)、加(+)、减(-)，要改变运算的优先级可使用圆括号。9.以下变量名中合法的是_。 A
37、.x2-1 B.print C.str_n D.2x（分数：1.50）A.B.C. D.解析：考点 常量和变量 解析 变量是一个名字，给变量命名时应遵循以下 4条规则： 名字只能由字母、数字和下划线组成； 名字的第 1个字符必须是英文字母，最后一个字符可以是类型说明符； 名字的有效字符为 255个； 不能用 Visual Basic的保留字做变量名，也不能用末尾带有类型说明符的保留字做变量名，但可以在变量名中嵌入保留字。10.执行语句 Dim X, Y As Integer后，_。 A.X和 Y均被定义为整型变量 B.X和 Y均被定义为变体类型变量 C.X被定义为整型变量，Y 被定义为变体类型
38、变量 D.X被定义为变体类型变量，Y 被定义为整型变量（分数：1.50）A.B.C.D. 解析：考点 常量和变量 解析 本题考查的考点是有关变量定义的。在 VB中有一种特殊的类型：变体类型(Variant)，这种类型可以包含大部分其他类型的数据。在 VB中，如果没有显式声明变量的类型，则该变量默认为变体型(Variant)。如果一条定义语句定义多个变量，每个变量必须单独说明其类型，若不说明则为变体型。11.以下关系表达式中，其值为 True的是_。 A.“XYZ“XYz“ B.“VisualBasic“visualbasic“ C.“the“=“there“ D.“Integer“Int“（分
39、数：1.50）A.B. C.D.解析：考点 运算符及表达式 解析 本题考查的考点是有关字符串比较的。在 VB中可以采用简单的逻辑运算符进行两个字符串的比较，即(小于)、=(小于或等于)、(大于)、=(大于或等于)、=(等于)、(不等于)。在进行比较的时候，将会首先比较字符串第一位的 ASCII码，若相同则比较第二位以此类推。12.执行以下程序段a$=“Visual Basic Programming“b$=“C+“c$=UCase(Left$(a$,7) & b$ & Right$(a$,12)后，变量 c$的值为_。 A.Visual BASIC Programming B.VISUAL C
40、+Programming C.Visual C+Programming D.VISUAL BASIC Programming（分数：1.50）A.B. C.D.解析：考点 内部函数 解析 本题考查的考点是有关取子串函数的。在 VB中有 3种取子串函数：Left函数用于从字符串左端开始取 n个字符；Right 函数用于从字符串右端开始取 n个字符(注意子串中字符的顺序与母串中相同)；Mid 函数可以实现在任何位置取任何长度的子串，其中长度省略的话将会一直取到串尾。UCase 函数用于把字符串转换成大写表示。13.阅读程序：Private Sub Form_Click()a=0For j=1 To
41、 15a=a+j Mod 3Next jPrint aEnd Sub程序运行后，单击窗体，输出结果是_。 A.105 B.1 C.120 D.15（分数：1.50）A.B.C.D. 解析：考点 运算符及表达式和 FOR循环 解析 解析：本题考查的考点是有关循环的。本题中循环的特点是：每执行 3次循环，依次向 a中加上 0+1+2也就是 3；循环共执行了 15次，所以 a中的值应该为15。14.设有如下通用过程：Public Function Fun(xStr As String)As StringDim tStr As String, strL As IntegertStr=“strL=Len
42、(xStr)i=strL/2Do While i=StrLtStr=tStr & Mid(xStr,i+1,1)i=i+1LoopFun=tStr & tStrEnd Function在窗体上画一个名称为 Text1的文本框和一个名为 Command1的命令按钮。然后编写如下的事件过程：Private Sub Command1_Click()Dim S1 As StringS1=“ABCDEF“Text1.Text=LCase(Fun(S1)End Sub程序运行后，单击命令按钮，文本框中显示的是_。 A.ABCDEF B.abcdef C.defdef D.defabc（分数：1.50）A.
43、B.C. D.解析：考点 内部函数和 DO循环 解析 本题考查的考点是有关字符串处理的。本题中过程中的循环变量 i的初值是字符串长度的一半，终值是字符串长度，结合循环中的取子串函数，整个循环的功能是取得字符串的后一半放入 tstr中，然后连接上自身的值返回到调用程序。15.为把圆周率的近似值 3.14159存放在变量 pi中，应该把变量 pi定义为_。 A.Dim pi As Integer B.Dim pi(7) As Integer C.Dim pi As Single D.Dim pi As Long（分数：1.50）A.B.C. D.解析：考点 常量和变量 解析 本题考查的考点是有关
44、VB中的数据类型的。VB 提供了很多种数据类型，其中能接受小数值的有单精度型 Single和双精度型 Double。16.表达式 2*32+4*2/2+32的值是_。 A.30 B.31 C.49 D.48（分数：1.50）A.B. C.D.解析：考点 运算符及表达式 解析 本题考查的考点是有关算术运算的。按照运算符的优先级，首先执行 32得到 9，然后用 2乘以 9得到 18；然后计算 4*2/2=4；最后计算 32得到 9，三者相加得到最后结果 31。17.设 a=4，b=5，c=6，执行语句 Print ab And bc 后，窗体上显示的是_。 A.True B.False C.出错信
45、息 D.0（分数：1.50）A. B.C.D.解析：考点 运算符及表达式 解析 本题考查的考点是有关逻辑运算和关系运算的。逻辑运算就是两个逻辑型的量进行运算，逻辑运算符的优先级低于关系运算符，故本题先计算 And两端的表达式结果，这两个表达式的结果都为 True，所以二者相与的结果也为 True。18.以下不能输出“Program”的语句是_。 A.Print Mid(“VBProgram“, 3, 7) B.Print Right(“VBProgram“, 7) C.Print Mid(“VBProgram“, 3) D.Print Left(“VBProgram“, 7)（分数：1.50）
46、A.B.C.D. 解析：考点 内部函数 解析 本题考查的考点是有关取子串函数的。在 VB中有 3种取子串函数：Left函数用于从字符串左端开始取 n个字符；Right 函数用于从字符串右端开始取 n个字符(注意子串中字符的顺序与母串中相同)；Mid 函数可以实现在任何位置取任何长度的子串，其中长度省略的话将会一直取到串尾。本题中 D选项的结果是 VBprogr，不符合题意。19.若变量 a未事先定义而直接使用(例如：a=0)，则变量 a的类型是_。 A.Integer B.String C.Boolean D.Variant（分数：1.50）A.B.C.D. 解析：考点 常量和变量 解析 本题考查的考
