1、二级 VISUAL+BASIC 笔试-181 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.下列块结构条件语句，正确的是( )。（分数：2.00）A.If x10 Thenprint“a“Else if x5 Thenprint“b“Else if x5 Thenprint“c“End ifB.if x10 Thenprint“a“Else if x5Print“b“ElsePrint“c“End ifC.If x10 Thenprint“a“Else if x5 Thenprint“b“Else x5 ThenPrint“c“End i
2、fD.If x10 ThenPrint“a“Else if x5 Then print“b:ElsePrint“c“End if2.在用菜单编辑器设计菜单时，必须输入的项是( )。（分数：2.00）A.快捷键B.标题C.索引D.名称3.Function 过程有别于 Sub 过程的最主要的特点是( )。（分数：2.00）A.Function 过程一定要有虚参，而 Sub 过程可以没有虚参B.Function 过程的终端语句是 End Function，而 Sub 过程的终端语句是 End SubC.Function 过程是用于计算函数值的，而 Sub 过程是用于改变属性值的D.Function
3、过程要返回函数值，而 Sub 过程没有值返回4.下列叙述中正确的是( )。（分数：2.00）A.程序设计就是编制程序B.程序的测试必须由程序员自己去完成C.程序经调试改错后还应进行再测试D.程序经调试改错后不必进行再测试5.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Text1.Text=“Visual“Me.Text1=“Basic“Text1=“Program“End Sub程序运行后，如果单击命令按钮，则在文本框中显示的是( )。（分数：2.00）A.VisualB.B
4、asicC.ProgramD.出错6.假定编写如下事件过程：Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single，Y As Single)If(Button and 3)=3 thenPrint“Hello“End ifEnd Sub程序运行后，为了在窗体上输出“Hello”，应该窗体上执行以下( )操作。（分数：2.00）A.只能按下左键并拖动B.只能按下右键并拖动C.必须同时按下左、右键并拖动D.按下左键拖动或按下右键拖动7.关于语句 If x=1 Then y=1，下列说法正确的是( )。（分数
5、：2.00）A.x=1 和 y=1 均为赋值语句B.x=1 和 y=1 均为关系表达式C.x=1 为关系表达式，y=1 为赋值语句D.x=1 为赋值语句，y=1 为关系表达式8.要显示当前过程中的所有变量及对象的取值，可以利用( )窗口。（分数：2.00）A.数据B.调用堆栈C.立即D.本地9.为了描述 xy 和 yz 同时成立，下述选项中正确的是( )。（分数：2.00）A.xy.AnD.yzB.xyzC.xy And zD.xy And yz10.在窗体上画一个名称为 Command1 的命令按钮和三个名称分别为 Label1、Label2、Label3 的标签，然后编写如下代码：Priv
6、ate x As IntegerPrivate Sub Command1_Click()Static y As IntegerDim z As Integern=10z=n+zy=y+zx=x+zLabel1.Caption=xLabel2.Caption=yLabel3.Caption=zEnd Sub运行程序，连续三次单击命令按钮后，则三个标签中显示的内容分别是( )。（分数：2.00）A.10 10 10B.30 30 30C.30 30 10D.10 30 3011.以下命令中能够正确地画出矩形的是( )。（分数：2.00）A.line-(2500,2500)B.line-(500,5
7、00)C.line-(500,500)-(2500,2500)D.line(500,500)-(2500,2500)12.双击窗体中的对象后，Visual Basic 将显示的窗口是( )。（分数：2.00）A.项目(工程)窗口B.工具箱C.代码窗口D.属性窗口13.以下关于选项按钮的说法，正确的是( )。（分数：2.00）A.一个窗体上(包括其他容器中)的所有选项按钮一次只能有一个被选中B.一个窗体上(不包括其他容器中)的所有选项按钮一次只能有一个被选中C.在一个容器中的选项按钮可以同时有多个被选中D.所有容器(多于一个)中选项按钮一次只能有一个被选中14.下列事件过程运行后输出结果是( )
8、。Private Sub Command1_Clcik()Print 25 Mod(1-23)End Sub（分数：2.00）A.4B.-4C.0D.-015.在 VB 集成开发环境中，以下最不可以缺少的窗口是( )。（分数：2.00）A.立即窗口B.代码窗口C.窗口布局窗口D.监视窗口16.如下程序段定义了学生成绩的记录类型，由学号、姓名、三门课程成绩(百分制)组成。Type Studno As Integername As String*10score(1 To 3) As SingleEnd Type若对某个学生的各数据项进行赋值，下列程序段正确的是( )。（分数：2.00）A.Dim
9、S As StudStud.no=0201Stud.name=“李平“Stud.score=78,88,96B.Dim S As StudS.no=0201S.name=“李平“S.score=78,88,96C.Dim S As StudS.no=0201S.name=“李平“S.score(1)=78S.score(2)=88S.score(3)=96D.Dim S As StudStud.no=0201Stud.name=“李平“Stud.score(1)=78Stud.score(2)=88Stud.score(3)=9617.在窗体上画一个名称为 Command1 的命令按钮，然后编
10、写如下程序：Option Base 1Private Sub Command1_Ctick()Dim a As Varianta=Array(1,2,3,4,5)Sum=0For i=1 To 5Sum=Sum+a(i)Next ix=Sum /5For i=1 To 5If a(i)x Then Print a(i)；Next iEnd Sub程序运行后，单击命令按钮，在窗体上显示的内容是( )。（分数：2.00）A.1 2B.1 2 3C.3 4 5D.4 518.下面程序执行的结果是( )。Private Sub Form_Click()AS=“123“：B$=“456“C=Val(A$
11、)+Val(B$)Print C/100End Sub（分数：2.00）A.123B.3C.5D.57919.设 x=4，y=6，则以下不能在窗体上显示出“A=10”的语句是( )。（分数：2.00）A.Print A=x+yB.Print “A=“;x+yC.Print “A=“+Str(x+y)D.Print “A=“x+yC.Print “A=“+Str(x+y)D.Print “A=“&x+y解析：20.以下能从字符串“VisualBasic“中直接取出子字符串“Basic“的函数是( )。（分数：2.00）A.LeftB.Mid C.StringD.Instr解析：21.代数式 x1
12、-lal+ln10+sin(x2+2)/cos(57)对应的 Visual Basic 表达式是( )。（分数：2.00）A.1-Abs(A)+Log(10)+Sin(X2+2*3.14)/Cos(57*3 B.1-Abs(A)+Log(10)+Sin(X2+2*)/Cos(57*3C.1-Abs(A)+Log(10)+Sin(X2+2*3.14)D.1-Abs(A)+Log(10)+Sin(X2+2*)解析：22.用于获得字符串 S 最左边 4 个字符的函数是( )。（分数：2.00）A.Left(S，4) B.Left(1，4)C.Leftstr(S)D.Leftstr(3，4)解析：23
13、.下列程序段的执行结果为( )。Dim A(3,3)For M=1 To 3For N=1 To 3If N=M Or N=3-M+1 ThenA(M,N)=1ElseA(M,N)=0End IfNext NNext MFor M=1 To 3For N=1 To 3Print A(M,N)Next NPrintNext M（分数：2.00）A.1 0 00 1 00 0 1B.1 1 11 1 11 1 1C.0 0 00 0 00 0 0D.1 0 10 1 01 0 1 解析：24.下列选项中，合法的变量名是( )。（分数：2.00）A.c%aaaB.sun_3 C.ElseD.5per
14、sons解析：25.当用户( )时，会引发焦点所在控件的 KeyPress 事件。（分数：2.00）A.按下键盘上的一个 ANSI 键B.释放键盘上的一个 ANSI 键 C.单击鼠标左键D.单击鼠标右键解析：26.假定建立了一个名为 Command1 的命令按钮数组，则以下说法中错误的是( )。（分数：2.00）A.数组中每个命令按钮的名称(Name 属性)均为 Command1B.数组中每个命令按钮的标题(Caption 属性)都一样 C.数组中所有命令按钮可以使用同一个事件过程D.用名称 Command1(下标)可以访问数组中的每个命令按钮解析：27.在窗体上画一个名称为 Text1 的文
15、本框，然后画一个名称为 HScroll1 的滚动条，其 Min 和 Max 属性分别为 0 和 100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如下图所示。（分数：2.00）A. B.C.D.解析：28.语句 X=X+1 的正确含义是( )。（分数：2.00）A.变量 X 的值与 X+1 的值相等B.将变量 X 的值存到 X+1 中去C.将变量 C 的值加 1 后赋值给变量 X D.变量 X 的值为 1解析：29.我们可以在设计时(属性窗口中)和运行时(程序代码中)设置属性的值，以下关于属性设置的说法正确的是( )。（分数：2.00）A.在属性窗口中可以设置所有属性的值B.
16、在程序代码中可以设置所有属性的值C.属性的名称由 VB 事先定义，用户不能改变 D.所有对象的属性都是可见的解析：30.设有如下通用过程：Public Function f(x As Integer)Dim y As Integerx=20y=2f=x*yEnd Function在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Static x As Integerx=10y=5y=f(x)Print x；yEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。（分数：2.00）A.10 5B.
17、20 5C.20 40 D.10 40解析：31.定时器的 Interval 属性以( )为单位指定 Timer 事件之间的时间间隔。（分数：2.00）A.分B.秒C.毫秒 D.微秒解析：32.在 VB 中设计程序时，能自动被检查出来的错误是( )。（分数：2.00）A.语法错误 B.语法错误和逻辑错误C.运行错误D.逻辑错误解析：33.下面程序段中正确的是( )。（分数：2.00）A.If x0 Then y=0If x1 Then y=1If x2 Then y=2If x=2 Then y=3B.If x=2 Then y=3If x1 Then y=2If x=0Then y=1If
18、x0 Then y=0C.If x0 Theny=0Else If=0Theny=1Elsey=3End IfD.If x=2 Theny=3Else If=1 Theny=2Elsey=0End If 解析：34.以下叙述中错误的是( )。（分数：2.00）A.用 Shell 函数可以调用能够在 Windows 下运行的应用程序B.用 Shell 函数可以调用可执行文件，也可以调用 Visual Basic 的内部函数 C.调用 Shell 函数的格式应为：变量名=Shell()D.用 Shell 函数不能执行 DOS 命令解析：35.下面叙述正确的是( )。（分数：2.00）A.Spc 函
19、数既能用于 Print 方法中，也能用于表达式B.Space 函数既能用于 Print 方法中，也能用于表达式 C.Spc 函数与 Space 函数均生成空格，没有区别D.以上说法均不对解析：二、填空题(总题数：12，分数：30.00)36.启动 Visual Basic，选择标准 EXE 进入集成环境后，系统为用户启动建立一个窗体，并为该窗体起的临时名称是 1。（分数：2.00）填空项 1:_ （正确答案：Form1）解析：37.算法复杂度主要包括时间复杂度和 1 复杂度。（分数：2.00）填空项 1:_ （正确答案：空间）解析：38.一棵二叉树第六层(根结点为第一层)的结点数最多为 1 个
20、。（分数：2.00）填空项 1:_ （正确答案：32）解析：39.窗体是一种对象，由属性定义其外观，由 1 定义其行为，由事件定义其与用户的交互。（分数：2.00）填空项 1:_ （正确答案：方法）解析：40.逻辑常量值为 True 或 1。（分数：2.00）填空项 1:_ （正确答案：False）解析：41.要使命令按钮控件不可用，应设置的属性是 1。（分数：2.00）填空项 1:_ （正确答案：Enabled 属性）解析：42.Defsng a 定义的变量 a 是 1 类型的变量。（分数：2.00）填空项 1:_ （正确答案：单精度）解析：43.为了防止用户随意将光标置于控件上，应将控件的
21、 1 属性设置为 False。（分数：2.00）填空项 1:_ （正确答案：Enabled）解析：44.运行时，要使工具栏控件 Toolbarl 中的第二个按钮的按钮菜单中的第三项无效(变成灰色)，应使用语句 1。（分数：2.00）填空项 1:_ （正确答案：Toolbar1.Buttons(2).ButtonMenus(3).Enabled=False）解析：在窗体上画 1 个文本框，名称为 Text1，然后编写如下程序：Private Sub Form_Load()Open“d:/temp/dat.txt“For Output As #1Text1.Text=“End SubPrivate
22、 Sub Text1_KeyPress(Key Ascii As Integer)If (10) =13 ThenIf U Case(Text1.Text)= (11) ThenClose 1EndElseWrite #1, (12) Text1.Text=“End IfEnd IfEnd Sub以上程序的功能是，在 D 盘 temp 目录下建立 1 个名为 dat.txt 的文件，在文本框中输入字符，每次按回车键(回车符的 ASCII 码是 13)都把当前文本框中的内容写入文件 dat.txt，并清除文本框中的内容；如果输入“END”，则结束程序。请填空。（分数：6.00）填空项 1:_ （
23、正确答案：KeyAscii）解析：填空项 1:_ （正确答案：“END/）解析：填空项 1:_ （正确答案：Text1.Text 或 Text1）解析：45.要使一个命令按钮成为图形命令按钮，则应设置 1 属性值。（分数：2.00）填空项 1:_ （正确答案：Style）解析：下列程序功能是，产生 10 个 0100 的随机数，输出其中的最大值。请将程序补充完整。Private Sub Form_Click()Dim an (10) As IntegerDim max As IntegerRandomizeFor i%=1 To 10an(i%)= (14) Next i%max=an(1)For i%=2 To 10if (15) thenmax=an(i%)End IfNext i%print maxEnd SubEnd Sub（分数：4.00）填空项 1:_ （正确答案：Int(Rnd*100)）解析：填空项 1:_ （正确答案：an(i%)max）解析：
