1、二级 VISUAL+BASIC-5-1 及答案解析(总分：84.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：57.00)1.有以下程序段，单击 Command1 按钮后，屏幕上的输出结果是U /U。Private Sub Command1_Click()For i=6 To 9Print Tab(i*i),iNext iEnd Sub A. 6 7 8 9 B. 6 7 8 9 C. 6 7 8 9 D. 6 7 8 9（分数：2.00）A.B.C.D.2.在窗体上画一个名称为 Text1 的文本框，并编写如下程序：Private Sub Form Load()ShowT
2、ext1.Text=“Text1.SetFocusEnd SubPrivate Sub Form_MouseUp(Button As Integer,Shift As Integer,x As Single,Y As Single)Print“程序设计“End SubPrivate Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)Print“Visual Basic“；End Sub程序运行后，如果按 A 键，然后单击窗体，则在窗体上显示的内容_。 A. Visual Basic B. 程序设计 C. A 程序设计 D. Visual
3、 Basic 程序设计 （分数：1.00）A.B.C.D.3.下列程序Private Sub form_Click()score=Int(Rnd * 10)+80Select Case scoreCase Is60:a$“F“Case 60 To 69:a$“D“Case 70 To 79:a$“C“Case 80 To 89:a$=“B“Case Else:a$“A“End SelectPrint a$End Sub运行时输出的结果是 A. F B. D C. C D. B（分数：1.00）A.B.C.D.4.在窗体上画一个命令按钮，其名称为 Command1，然后编写如下程序：Option
4、 Base 1Private Sub Command1_ClickU /UDim a As Varianta=Array(1，2，3，4)j=1For i=4 To 1 Step-1s=s+a(i)*jj=j*10Next iPrint sEnd Sub运行上面的程序，单击命令按钮，其输出结果是_。 A. 4321 B. 12 C. 34 D. 1234（分数：2.00）A.B.C.D.5.在窗体上画一个名称为 TxtA 的文本框，然后编写如下的事件过程：Private Sub TxtA_KeyPress(Keyascii as integer)End Sub若焦点位于文本框中，则能够触发 K
5、eyPress 事件的操作是 A. 单击鼠标 B. 双击文本框 C. 鼠标滑过文本框 D. 按下键盘上的某个键（分数：2.00）A.B.C.D.6.设有如下关系表_。（分数：2.00）A.B.C.D.7.下列叙述中，不属于测试的特征的是U /U。 A.测试的挑剔性 B.完全测试的不可能性 C.测试的可靠性 D.测试的经济性（分数：2.00）A.B.C.D.8.为了使一个复选框被禁用(灰色显示)，应把它的 Value 属性设置为_。 A.0 B.1 C.2 D.False（分数：1.00）A.B.C.D.9.启动 Visual Basic 中，用鼠标右键单击窗体时所显示的菜单是 U /U A.
6、文件菜单 B. 编辑菜单 C. 弹出式菜单 D. 下拉式菜单（分数：2.00）A.B.C.D.10.用黑盒技术测试用例的方法之一为 A.因果图 B.逻辑覆盖 C.循环覆盖 D.基本路径测试（分数：1.00）A.B.C.D.11.编写如下程序：Private Sub Command1_Click()Dim x As Integer，y As Integerx=InputBox(“输入第一个数“)y=InputBox(“输入第二个数“)Call f(x，y)Print x，yEnd SubSub f(a As Integer，ByVal b As Integer)a=a*2x=a+bb=b+100
7、End Sub程序运行后，单击命令按钮 Command1，并输入数值 10 和 15，则输出结果为_。 A.10 115 B.20 115 C.35 15 D.20 15（分数：1.00）A.B.C.D.12.下列说法中，不属于数据模型所描述的内容是_。 A. 数据结构 B. 数据操作 C. 数据查询 D. 数据约束（分数：2.00）A.B.C.D.13.在窗体(Name 属性为 Forml)上面添加两个文本框(其 Name 属性分别为 Text1 和 Text2)和一个命令按钮(Name 属性为 Commandl)，然后编写如下两个事件过程：Private Sub Commandl_Clic
8、k()a=Text1.Text+Text2.TextPrintaEnd SubPrivate Sub Form_Load()Text1.Text=“Text2.Text=“End Sub程序运行后，在第 1 个文本框(Text1)和第 2 个文本框(Text2)中分别输入 123 和 321，然后单击命令按钮，则输出结果为U /U。 A.444 B.321123 C.123321 D.132231（分数：2.00）A.B.C.D.14.下列是一个循环结构的程序，循环体内的语句将执行的次数是k=0For i=1 to 100For j=1 to 10k=k+1NextNext A. 0 B. 1
9、0 C. 100 D. 1000（分数：1.00）A.B.C.D.15.从键盘上输入一个浮点数 asingle，利用字符串函数对该数进行处理后，如果输出的内容不是“非浮点数”，则对程序输出的内容分析正确的是U /U。asingle=InputBox(“请输入一个浮点数：“)str1$=Str$(asingle):P=InStr(str1$,“.“)If p0 ThenPrint Mid$(str1$,p)ElsePrint “非浮点数“End If A. 输出 asingle 的字符串形式 B. 输出数据 asingle 的整数部分 C. 输出数据 asingle 的小数点及小数点后面的数字
10、D. 只去掉数据中的小数点，保留所有数字输出（分数：2.00）A.B.C.D.16.在顺序表(3，6，8，10，12，15，16，18，21，25，30)中，用二分法查找关键码值 11，所需的关键码比较次数为 _。 A. 2 B. 3 C. 4 D. 5 （分数：1.00）A.B.C.D.17.下列叙述中错误的是U /U。 A.菜单项的快捷键不可以任意设置 B.除了 Click 事件之外，菜单项还能响应其他的事件过程(如 Db1Click 等) C.每个菜单项都是一个控件，与其他控件一样都有自己的属性和事件 D.在程序执行时，如果菜单项的 Enabled 属性为 False，则该菜单项变成灰色
11、，不能被用户选择（分数：2.00）A.B.C.D.18.对于循环队列，下列叙述中正确的是_。 A. 循环队列中元素的个数由队头指针和队尾指针共同决定 B. 在循环队列中，只需要队头指针就能反映队列中元素的动态变化情况 C. 在循环队列中，队头指针一定大于队尾指针 D. 在循环队列中，队头指针一定小于队尾指针（分数：2.00）A.B.C.D.19.下列函数中，能够得到一个字符串的一组函数是 U /U A. Leh 函数、Right 函数、Mid 函数 B. LTrim 函数、RTrim 函数、Trim 函数 C. Len 函数、LCase 函数、UCase 函数 D. Space 函数、Len
12、函数、Trim 函数（分数：2.00）A.B.C.D.20.已知代数式 eXSin(30)2x/(x+y)Lnx，则正确的 Visual Basic 表达式为U /U。 A.E*Sin(30*3.14/180)*2*X/X+Y*Log(X) B.Exp(X)*Sin(30)*2*X/(X+Y)*Ln(X) C.Exp(X)*Sin(30*3.14/180)*2*x/(x+y)*Log(x) D.Exp(X)*Sin(30*3.14/180)*2*X/(X+Y)*Ln(x)（分数：2.00）A.B.C.D.21.程序的基本控制结构是U /U。 A.Do-Loop 结构、Do-Loop While
13、 结构和 For-Next 结构 B.子程序结构，自定义函数结构 C.顺序结构，选择结构和循环结构 D.单行结构，多行结构和多分支结构（分数：2.00）A.B.C.D.22.执行下面的程序段后，变量 c 的值为a=14b=30Slect Case b/10Case 0C=a * 10 + b Case 1 To 9C=a * 100+bCase 10 To 99C=a * 1000 + bEnd Selectprint c A.363 B.2548 C.1430 D.9875（分数：1.00）A.B.C.D.23.组合框控件是将某两个控件组合成一个控件，这两个控件是 A. 列表框控件和文本框控
14、件 B. 标签控件和列表框控件 C. 标签控件和文本框控件 D. 复选框控件和选项按钮控件（分数：2.00）A.B.C.D.24.下列叙述中错误的是 A. 列表框与组合框都有 List 属性 B. 列表框有 Selected 属性，而组合框没有 C. 列表框和组合框都有 Style 属性 D. 组合框有 Text 属性、而列表框没有 （分数：2.00）A.B.C.D.25.要获得文件列表框中当前被选中的文件的文件名，则应使用哪个属性 _。 A. Dir B. Path C. Drive D. Filename（分数：1.00）A.B.C.D.26.为了使模块尽可能独立，要求U /U A.模块的
15、内聚程度要尽量高，且各模块间的耦合程度要尽量强 B.模块的内聚程度要尽量高，且各模块间的耦合程度要尽量弱 C.模块的内聚程度要尽量低，且各模块间的耦合程度要尽量弱 D.模块的内聚程度要尽量低，且各模块间的耦合程度要尽量强（分数：2.00）A.B.C.D.27.只有将组合框的 Style 属性值设置为U /U时，才能触发 Db1Click 事件。 A. 0 B. 1 C. 2 D. 3（分数：2.00）A.B.C.D.28.下列程序段，在运行时最早输出的内容是a=2c=1AAA：c=c + aIf c10 ThenPrint cGoTo AAAElsePrint“10 以内的奇数显示完毕。“En
16、d If A. 3 B. 7 C. 9 D. 6 （分数：1.00）A.B.C.D.29.为了在按下 Ese 键时执行某个命令按钮的 Click 事件过程，需要把该命令按钮的一个属性设置为True，这个属性是 A.Value B.Default C.Cancel D.Enabled（分数：1.00）A.B.C.D.30.设有语句Open “c：/Test. Dat“ For Output As#1则以下错误的叙述是_。 A. 该语句打开 C 盘根目录下一个已经存在的文件 Test.Dat B. 该语句在 C 盘根目录下建立一个名为 Test.Dat 的文件 C. 该语句建立的文件的文件号为 1
17、 D. 执行该语句后，就可以通过 Print#句向文件 Test.Dat 中写入信息（分数：2.00）A.B.C.D.31.函数过程 n 的功能是：如果参数 b 为奇数，则返回值为 1，否则返回值为 0。以下能正确实现上述功能的代码的是_。 A.Function F1(b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function B.Function F1(b As Integer) If b Mod 2=0 Then F1=0 Else F1=1 End If End Function C.Functio
18、n F1(b As Integer) If b Mod 2=0 Then F1=1 Else F1=0 End If End Function D.Functionn(b As Integer) If b Mod 2 0Then Return 0 Else Return 1 End If End Function（分数：2.00）A.B.C.D.32.设窗体上有一个标签 Label1 和一个计时器 Timer1,Timer1 的 Interval 属性被没置为 1000，Enabled属性被设置为 True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是U /
19、U A.Private Sub Timer1_Timer() Label1.Caption=True End Sub B.Private Sub Timer1_Timer() Label1.Caption=Time$ End Sub C.Private Sub Timer1_Timer() Label1.Interval=1 End Sub D.Private Sub Timer1_Timer() For k=1 To Timer1.Interval Label1.Caption=Timer Next k End Sub（分数：2.00）A.B.C.D.33.在窗体上画一个命令按钮，然后编写如
20、下程序：Sub S1(ByVal x As Integer, ByVal y As Integer)Dim t As Integert=xx=yy=tEnd SubPrivate Sub Command1_Click()Dim a As Integer, b As Integera=10b=30S1 a, bPrint “a=“; a; “b=“; bEnd Sub程序运行后，单击命令按钮，输出结果是_。 A. a=30 b=10 B. a=30 b=30 C. a=10 b=30 D. a=10 b=10（分数：2.00）A.B.C.D.34.以下叙述中错误的是 _。 A. 在工程资源管理器
21、窗口中只能包含一个工程文件及属于该工程的其他文件 B. 以且 AS 为扩展名的文件是标准模块文件 C. 窗体文件包含该窗体及其控件的属性 D. 一个工程中可以含有多个标准模块文件（分数：1.00）A.B.C.D.35.在窗体上有若干控件，其中有一个名称为，Text1 的文本框。影响 Text1 的 Tab 顺序的属性是_。 A. TabStop B. Enabled C. Visible D. TabIndex（分数：1.00）A.B.C.D.二、B填空题/B(总题数：15，分数：27.00)36.函数 Str$(256.36)的值是 1。（分数：2.00）填空项 1:_37.软件开发环境是全
22、面支持软件开发全过程的U U /U /U集合。（分数：1.00）填空项 1:_38.下列事件过程的功能是：建立一个名为 Data1 的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为 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 Open U U /U /U Y=3.14159/180 For i=1 To 90 Ks
23、c.K=i Ksc.Sinx=Sin(i*Y) Ksc.Cosx=Cos(i*Y) U U /U /U Next i Close #2 End Sub（分数：4.00）填空项 1:_39.数据结构包括数据的逻辑结构、数据的 1 以及对数据的操作运算。（分数：2.00）填空项 1:_40.在窗体上画两个文本框，然后编写程序。程序运行后，如果在第一个文本框中输入 A、B、 C、D 或a、b、c、d，则在第二个文本框中显示 EFDH。请完善下列程序。 Private Sub Form_Load() Show Text1Text=“ “ Text2Text=“ “ Text1SetFocus End
24、Sub Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) Text2Text=U U /U /U End Sub（分数：1.00）填空项 1:_41.设有下列二叉树： （分数：2.00）填空项 1:_42.在数据库技术中，实体集之间的联系可以是一对一或一对多或多对多的，那么“学生”和“可选课程”的联系为 1。（分数：2.00）填空项 1:_43.下列程序计算 Sn 的值。Sn=a+aa+aaa+aaaa，其中最后一项为 n 个。 例如：a=5，n=4 时，则Sn=5+55+555+5555。请在空白处填入适当的内容，将
25、程序补充完整。 Private Sub Command1_Click() Dim a As Integer，n As Integer，Cout As Integer Dim Sn As Long，Tn As Long Cout=1 Sn=0 Tn=0 a=InputBox(“请输入 a 的值：“) n=InputBox(“请输入 n 的值!“) Do Tn=Tn*10+a Sn=Sn+Tn Cout=Cout+1 _ Debug Print a，n，Sn End Sub（分数：2.00）填空项 1:_44.成本效益分析的目的是从U U /U /U角度评价开发一个项目是否可行。（分数：2.00）
26、填空项 1:_45.数据独立性分为逻辑独立性与物理独立性。当数据的存储结构改变时，其逻辑结构可以不变，因此，基于逻辑结构的应用程序不必修改，称为 1。（分数：2.00）填空项 1:_46.在程序设计阶段应该采取 【2】 和逐步求精的方法，把一个模块的功能逐步分解，细化为一系列具体的步骤，进而用某种程序设计语言写成程序。（分数：1.00）填空项 1:_47.下列这个 Sub 过程的功能是：统计字符串中“a”的个数，请在空白处填上合适的代码，将程序补充完整。 Private Sub numCount() Dim num As Integer s$=“software And hardware“ n
27、um=Len(s$) For i=1 To hum b$=_ If b$ = “a“ Then x=x + 1 Next i Print “x=“; x End Sub（分数：2.00）填空项 1:_48.在长度为 n 的顺序储的线性表中删除一个元素，最坏情况下需要移动表中的元素个数为 1。（分数：2.00）填空项 1:_49.一个控件在窗体上的位置由U U /U /U属性决定，其大小由 Width 和 Height 属性决定。（分数：1.00）填空项 1:_50.在面向对象方法中，信息隐蔽是通过对象的U U /U /U性来实现的。（分数：1.00）填空项 1:_二级 VISUAL+BASIC
28、-5-1 答案解析(总分：84.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：57.00)1.有以下程序段，单击 Command1 按钮后，屏幕上的输出结果是U /U。Private Sub Command1_Click()For i=6 To 9Print Tab(i*i),iNext iEnd Sub A. 6 7 8 9 B. 6 7 8 9 C. 6 7 8 9 D. 6 7 8 9（分数：2.00）A.B.C.D. 解析：解析 本题考查 print 方法。print 方法可以在窗体、图片框、打印机(printer)或立即窗口中输出信息。如果两个输出项之间以逗号分隔
29、，那么下一项的输出光标定位在下一个打印区的开始位置处。而Tab(i*i)函数表示光标从左端)开始右移 i*i 列。2.在窗体上画一个名称为 Text1 的文本框，并编写如下程序：Private Sub Form Load()ShowText1.Text=“Text1.SetFocusEnd SubPrivate Sub Form_MouseUp(Button As Integer,Shift As Integer,x As Single,Y As Single)Print“程序设计“End SubPrivate Sub Text1_KeyDown(KeyCode As Integer,Shif
30、t As Integer)Print“Visual Basic“；End Sub程序运行后，如果按 A 键，然后单击窗体，则在窗体上显示的内容_。 A. Visual Basic B. 程序设计 C. A 程序设计 D. Visual Basic 程序设计 （分数：1.00）A.B.C.D. 解析：解析 因为程序一运行，文本框 Text1 获得焦点，按下 A 键后，执行 Text1_KeyDown 事件，在窗体上显示“Visual Basic”；这时再单击窗体，则触发 Form_MouseUp 事件，在窗体上显示“程序设计”。3.下列程序Private Sub form_Click()scor
31、e=Int(Rnd * 10)+80Select Case scoreCase Is60:a$“F“Case 60 To 69:a$“D“Case 70 To 79:a$“C“Case 80 To 89:a$=“B“Case Else:a$“A“End SelectPrint a$End Sub运行时输出的结果是 A. F B. D C. C D. B（分数：1.00）A.B.C.D. 解析：解析 本题计算 score 用的表达式是 Int(Rnd*10)+80，由于 Rnd 产生 0 到 1 之间的随机数，该随机数含。但不含 1，乘 10 取整后其值是。到 9 之间的整数，加 80 后值是
32、80 到 89 之间的整数，多分支入口 select Case score，测试表达式是 score，从上到下检查 Case 中的表达式列表是否满足条件，本题中Case 80 To 89 表达式满足条件，因此执行 a $“B“，a$的值执行后为字符 B，退出多分支后，输出字符B。4.在窗体上画一个命令按钮，其名称为 Command1，然后编写如下程序：Option Base 1Private Sub Command1_ClickU /UDim a As Varianta=Array(1，2，3，4)j=1For i=4 To 1 Step-1s=s+a(i)*jj=j*10Next iPrin
33、t sEnd Sub运行上面的程序，单击命令按钮，其输出结果是_。 A. 4321 B. 12 C. 34 D. 1234（分数：2.00）A.B.C.D. 解析：解析 四次执行语句 s=s+a(i)j，执行完第一次 s=4，执行完第二次 s=34，执行完第三次s=234，执行完第四次 s=1234，正确答案应为选项 D。5.在窗体上画一个名称为 TxtA 的文本框，然后编写如下的事件过程：Private Sub TxtA_KeyPress(Keyascii as integer)End Sub若焦点位于文本框中，则能够触发 KeyPress 事件的操作是 A. 单击鼠标 B. 双击文本框 C
34、. 鼠标滑过文本框 D. 按下键盘上的某个键（分数：2.00）A.B.C.D. 解析：解析 KeyPress 事件用来识别按键的 ASCII 码，从而识别键盘上某个键的按下与释放。6.设有如下关系表_。（分数：2.00）A.B. C.D.解析：解析 从图中可以看出，关系 T 是关系 R 和关系 s 的简单合并，而合并的符号为 u，所以答案为T=RUS。7.下列叙述中，不属于测试的特征的是U /U。 A.测试的挑剔性 B.完全测试的不可能性 C.测试的可靠性 D.测试的经济性（分数：2.00）A.B.C. D.解析：解析 软件测试的目标是在精心控制的环境下执行程序，以发现程序中的错误，给出程序可
35、靠性的鉴定。软件测试有三个重要特征：测试的挑剔性、完全测试的不可能性及测试的经济性。没有测试的可靠性这一说法。8.为了使一个复选框被禁用(灰色显示)，应把它的 Value 属性设置为_。 A.0 B.1 C.2 D.False（分数：1.00）A.B.C. D.解析：解析 复选框的 Value 属性可以设置为 0、1 或 2。0 表示没有选择该复选框，1 表示选中该复选框，2 表示该复选框被禁用(灰色显示)。9.启动 Visual Basic 中，用鼠标右键单击窗体时所显示的菜单是 U /U A. 文件菜单 B. 编辑菜单 C. 弹出式菜单 D. 下拉式菜单（分数：2.00）A.B.C. D.
36、解析：解析 启动 Visual Basic 中，用鼠标右键单击窗体时所显示的菜单是弹出式菜单。10.用黑盒技术测试用例的方法之一为 A.因果图 B.逻辑覆盖 C.循环覆盖 D.基本路径测试（分数：1.00）A. B.C.D.解析：解析 黑盒测试主要方法有等价值划分法、边界值分析法、错误推测法、因果图法等。白盒测试的主要方法有逻辑覆盖、基本路径测试循环覆盖等。因此只有 A 属于黑盒测试。11.编写如下程序：Private Sub Command1_Click()Dim x As Integer，y As Integerx=InputBox(“输入第一个数“)y=InputBox(“输入第二个数“
37、)Call f(x，y)Print x，yEnd SubSub f(a As Integer，ByVal b As Integer)a=a*2x=a+bb=b+100End Sub程序运行后，单击命令按钮 Command1，并输入数值 10 和 15，则输出结果为_。 A.10 115 B.20 115 C.35 15 D.20 15（分数：1.00）A.B.C.D. 解析：解析 程序中过程 f 的参数 a 默认为按址传递，参数 b 指定按值传递，因此调用 f(x，y)时，x 的值会受到影响，y 的值不会。程序中输入 10 和 15，则 x=10，y=15。调用 f(x，y)，在过程中 a=a
38、*2，即a=10*2=20，变量 x 是过程 f 中的局部变量，没有用处可不用理会，b=b+100，即 b=15+100=115。a 的值即按钮单击事件中变量 x 的值，因此 x=20，而 y 的值仍是原来的值 15。因此 Print x，y 输出 20 15。12.下列说法中，不属于数据模型所描述的内容是_。 A. 数据结构 B. 数据操作 C. 数据查询 D. 数据约束（分数：2.00）A.B.C. D.解析：解析 数据模型所描述的内容有 3 个部分，它们是数据结构、数据操作和数据约束。其中，数据模型中的数据结构主要描述数据的类型、内容、性质，以及数据库的联系等：数据操作主要是描述在相应数
39、据结构上的操作类型与操作方式。13.在窗体(Name 属性为 Forml)上面添加两个文本框(其 Name 属性分别为 Text1 和 Text2)和一个命令按钮(Name 属性为 Commandl)，然后编写如下两个事件过程：Private Sub Commandl_Click()a=Text1.Text+Text2.TextPrintaEnd SubPrivate Sub Form_Load()Text1.Text=“Text2.Text=“End Sub程序运行后，在第 1 个文本框(Text1)和第 2 个文本框(Text2)中分别输入 123 和 321，然后单击命令按钮，则输出结果
40、为U /U。 A.444 B.321123 C.123321 D.132231（分数：2.00）A.B.C. D.解析：14.下列是一个循环结构的程序，循环体内的语句将执行的次数是k=0For i=1 to 100For j=1 to 10k=k+1NextNext A. 0 B. 10 C. 100 D. 1000（分数：1.00）A.B.C.D. 解析：解析 每一个；的值都将有 10 个 j 的值与之对应，也就是每一个 j 的值都会运行 10 次循环语句，则总共运行次数为 10010=1000。15.从键盘上输入一个浮点数 asingle，利用字符串函数对该数进行处理后，如果输出的内容不是
41、“非浮点数”，则对程序输出的内容分析正确的是U /U。asingle=InputBox(“请输入一个浮点数：“)str1$=Str$(asingle):P=InStr(str1$,“.“)If p0 ThenPrint Mid$(str1$,p)ElsePrint “非浮点数“End If A. 输出 asingle 的字符串形式 B. 输出数据 asingle 的整数部分 C. 输出数据 asingle 的小数点及小数点后面的数字 D. 只去掉数据中的小数点，保留所有数字输出（分数：2.00）A.B.C. D.解析：解析 本题考查字符串函数。题目中用到了 Instr()函数，字符串匹配函数
42、Instr 主要用于查找字符串 2 在字符串 1 中第一次出现的位置，若未找到返回 0，因此 Instr(strl,“.“)用于查找字符串应Strl 中为“.”的位置；Str(asingle)函数是把数字转化为字符串；Mid(strl，p)用于从 Strl 中取出从p 开始所有的字符。16.在顺序表(3，6，8，10，12，15，16，18，21，25，30)中，用二分法查找关键码值 11，所需的关键码比较次数为 _。 A. 2 B. 3 C. 4 D. 5 （分数：1.00）A.B.C. D.解析：解析 二分法查找是用查找的关键码与线性表的中间元素比较，然后根据比较结果来判断是结束查找，还是
43、在左边或者右边子表按相同的方法继续查找。本题中，与 11 比较的关键码分别为15，8，10，12，故比较次数为 4。17.下列叙述中错误的是U /U。 A.菜单项的快捷键不可以任意设置 B.除了 Click 事件之外，菜单项还能响应其他的事件过程(如 Db1Click 等) C.每个菜单项都是一个控件，与其他控件一样都有自己的属性和事件 D.在程序执行时，如果菜单项的 Enabled 属性为 False，则该菜单项变成灰色，不能被用户选择（分数：2.00）A.B. C.D.解析：解析 每个菜单项都是一个控件，都有自己的属性和行为的属性；每个菜单项有且仅有一个Click 事件；菜单项，陕捷键的赋
44、值包括功能键与控制键的组合，如Ctrl+F1键或Ctrl+A键，不能随便赋值；Visible 属性用来设置窗体或控件是否可见，设为 False 时，控件不可见，设为 True 时，控件可见。18.对于循环队列，下列叙述中正确的是_。 A. 循环队列中元素的个数由队头指针和队尾指针共同决定 B. 在循环队列中，只需要队头指针就能反映队列中元素的动态变化情况 C. 在循环队列中，队头指针一定大于队尾指针 D. 在循环队列中，队头指针一定小于队尾指针（分数：2.00）A. B.C.D.解析：解析 循环队列是将顺序队列首尾相连形成的，随着插入元素或删除元素的进行，其队头指针及队尾指针是在不断变化的，有
45、时可能会出现队头指针大于队尾指针的情况，也可能是队尾指针大于队头指针。19.下列函数中，能够得到一个字符串的一组函数是 U /U A. Leh 函数、Right 函数、Mid 函数 B. LTrim 函数、RTrim 函数、Trim 函数 C. Len 函数、LCase 函数、UCase 函数 D. Space 函数、Len 函数、Trim 函数（分数：2.00）A. B.C.D.解析：解析 本题是对常用的字符串函数的考查。B 项中的 LTrim、RTrim、Trim 三个函数分别用来删除字符串左边的前导空格、删除右边的尾随空格、删除字符串前导和尾随的空格。它们的结果值不一定能得到一个字符串，排除选项 B。Len 函数用来返回字符串的长度，得到的是一数值而不是一个字符串，故又可排除 C、D 选项。只有选项 A 是正确的。20.已知代数式 eXSin(30)2x/(x+y)Lnx，则正确的 Visual Basic 表达式为U /U。 A.E*Sin(30*3.14/180)*2*X/X+Y*Log(X) B.Exp(X)*Sin(30)*2*X/(X+Y)*Ln(X) C.Exp(X)*Sin(30*3.14/180)*2*x/(x+y)*Log(x) D.Exp(X)*Sin(30*3.14/180)*2*X/(X+Y)*L
