本栏目下题库来源于互联网,轻速云承诺对于用户导入平台的题库是严格保密的,不会在此呈现!
轻速云给您提供更好的在线考试系统服务!
2014年全国计算机等级《二级VB》上机考试冲刺试题(5)
1、【 单选题
在C盘当前文件夹下有一个已建立好的顺序文件Alph .txt ,文件内容为只含有字母的一个字符串(有双引号界定符)。单击窗体,打开A1ph .txt 文件,读取字符串并显示在文本框Textl 中,然后调用StrSort 过程将此字符串按ASCII 码的顺序重新排列并显示在文本框Text2中,最后将重新排列的字符串存入AlpO .txt 文件中(无双引号界定符)。请选择横线处合适的语句(  )。
Private Sub Form_Load(  )
Di mStrIn As Stri ng ,StrOut As Stri ng
Open "C:\Alph .txt"For Input As #1
________________
Close
Textl .Text =StrIn
___________
Text2.Text =StrOut
Open "C:\AlpO .txt"For Output As #2
_______
Close
End Sub
Private Function StrSort(s As Stri ng)As Stri ng
Di ms Arr(  )As Stri ng*1,j As Integer ,J As Integer ,nAs Integer
Di mt As Stri ng*1
n =Len(s)
ReDi ms Arr(n)
For i =1To n
s Arr(i)=Mid(s ,i ,1)
Next i For i =1To n .1
For j=i +1To n
If s Arr(i)>s Arrj Then
t =s Arr(i):s Arr(i)=s Arr(i):s Arr(j)=t
End If
Next i ,i
For i =1To n
StrSort =StrSort &s Arr(i)
Next i
End Function [1分]
Input #1,Strln Strln Print #2,StrOut
Input #1,Strln StrSort(Stri n)Print #2,StrOut
Input #2,Strln StrSort(Strln)Print #1,Stt Out
Print #1,Strln StrSort(Stri n)Input #2,StrOut
答案:
2、【 单选题
窗体上有一个名称为Picture1的图片框控件,一个名称为Ti merl 的计时器控件,其Interval 属性值为1000。要求每隔5秒钟图片框右移100。现编写程序如下:
Private Sub Ti mer1_Ti mer()
Static n As Integer
n =n +1
If(n/5)=Int (n/5)And Picturel .Left <Forml .Width Then
Picture1.Left =Picture1.Left +100
End If
End Sub
分析以上程序,以下叙述中正确的是(  )。 [1分]
程序中没有设置5秒钟的时间,所以不能每隔5秒移动图片框一次
此程序运行时图片框位置保持不动
此程序运行时图片框移动方向与题目要求相反
If 语句条件中的"Picture1.Left <Form1.Width"用于限制图片框移动的范围
答案:
3、【 单选题
下列关于函数过程的叙述中,正确的是(  )。 [1分]
函数过程形参的类型与函数返回值的类型没有关系
在函数过程中,过程的返回值可以有多个
当数组作为函数过程的参数时,既能以传值方式传递,也能以传址方式传递
如果不指明函数过程参数的类型,则该参数没有数据类型
答案:
4、【 单选题
对于循环队列,下列叙述中正确的是( )。 [1分]
队头指针是固定不变的
队头指针一定大于队尾指针
队头指针一定小于队尾指针
队头指针可以大于队尾指针,也可以小于队尾指针
答案:
5、【 单选题
窗体上有一个名称为Co mmand1的命令按钮,其单击事件过程如下:
Private Sub Co mmand1_Click()
Di ma,b(2,3)As Integer
a=Array(3,7,5,11,31,43,17,62,9,23,37,41)
i =0
Do While i <=UBound(a)
For j=0To 2
For k =0To 3
b(j,k)=a(i)
i =i +1
Next k
Next j
Loop
Print b(2,2)
End Sub
运行程序,窗体上显示的是(  )。 [1分]
43
17
37
23
答案:
6、【 单选题
有关程序代码窗口的说法错误的是(  )。 [1分]
在窗口的垂直滚动条的上面有一个"拆分栏",利用它可以把窗口分为两个部分,每个窗口显示代码的一部分
双击控件设计窗体即可打开程序代码窗口
在程序代码的左下角有两个按钮,可以选择全模块查看或者是过程查看
默认情况下,窗体的事件是Load
答案:
7、【 单选题
设窗体上有一个文体框Text1和一个命令按钮Co mmand1,并有以下事件过程:
Private Sub Co mmand1_Click(  )
Di mS As Stri ng ,ch As Stri ng
S=""
For k =1TO Len(Text1)
ch =Mid(Text1,k ,l)
S=ch +S
Next k
Text1.Text =S
End Sub
程序执行时,在文本框中输入"Basic",然后单击命令按钮,则Text1中显示的是(  )。 [1分]
Basic
cisaB
BASIC
CISAB
答案:
8、【 单选题
为了使模块尽可能独立,要求(  )。 [1分]
模块的内聚程度要尽量高,且各模块间的耦合程度要尽量强
模块的内聚程度要尽量高,且各模块间的耦合程度要尽量弱
模块的内聚程度要尽量低,且各模块间的耦合程度要尽量弱
模块的内聚程度要尽量低,且各模块间的耦合程度要尽量强
答案:
9、【 单选题
将E-R 图转换为关系模式时,实体和联系都可以表示为(  )。 [1分]
属性
关系
答案:
10、【 单选题
下列叙述中,( )不属于测试的特征。 [1分]
测试的挑剔性
完全测试的不可能性
测试的可靠性
测试的经济性
答案:
11、【 单选题
如果一个变量未经定义就直接使用,则该变量的类型为( )。 [1分]
Integer
Byte
Boolean
Variant
答案:
12、【 单选题
在新建一个Visual Basic 工程时,将新建窗体的Name 属性设置为TheFirst ,则默认的窗体文件名为(  )。 [1分]
Forml .frm
工程1.frm
TheFirst .frm
Form1.vbp
答案:
13、【 单选题
为了计算1+3+5+…+99的值,某人编程如下:
k =1
s =0
While k <=99
k =k +2:s =s +k
Wend
Print s
在调试时发现运行结果有错误,需要修改。下列错误原因和修改方案中正确的是(  )。 [1分]
While…Wend 循环语句错误,应改为For k =1To99…Next k
循环条件错误,应改为While k <99
循环前的赋值语句k =l 错误,应改为k =0
循环中两条赋值语句的顺序错误,应改为s =s +k :k=k +2
答案:
14、【 单选题
在面向对象方法中,实现信息隐蔽是依靠(  )。 [1分]
对象的继承
对象的多态
对象的封装
对象的分类
答案:
15、【 单选题
在长度为n 的有序线性表中进行二分查找,最坏情况下需要比较的次数是(  )。 [1分]
O(n)
O(n2)
O(log2n)
O(nlog2n)
答案:
16、【 单选题
下列各选项说法错误的是(  )。 [1分]
文件对话框可分为两种,即打开(Open)文件对话框和保存(Save As)文件对话框
通用对话框的Name 属性的默认值为Co mmonDialogX,此外,每种对话框都有自己的默认标题
打开文件对话框可以让用户指定一个文件,由程序使用;而用保存文件对话框可以指定一个文件,并以这个文件名保存当前文件
DefaultEXT属性和DialogTitle 属性都是打开对话框的属性,但非保存对话框的属性
答案:
17、【 单选题
窗体上有Co mmand1、Co mmand2两个命令按钮。现编写以下程序:
Option Base 0
Di ma()As Integer ,m As Integer
Private Sub Co mmand1Click()
m=InputBox("请输入一个正整数")
ReDi ma(m)
End Sub
Private Sub Co mmand2Click()
m=InputBox("请输入一个正整数")
ReDi ma(m)
End Sub
运行程序时,单击Co mmand1后输入整数10,再单击Co mmand2后输入整数5,则数组a 中元素的个数是(  )。 [1分]
5
6
10
11
答案:
18、【 单选题
设有如下程序:
Option Base 0
Private Sub Form_Click()
Dim a
Dim i As Integer
a=Array(1,2,3,4,5,6,7,8,9)
For i=0 To 3
Print a(5-i);
Next
End Sub
程序运行后,单击窗体,则在窗体上显示的是(  )。 [1分]
4 3 2 1
5 4 3 2
6 5 4 3
7 6 5 4
答案:
19、【 单选题
Visual Basic集成的主窗口中不包括( )。 [1分]
属性窗口
标题栏
菜单栏
工具栏
答案:
20、【 单选题
有如下过程代码:
Sub var_dim()
static numa As Integer
Dim numb As Integer
numa=numa+2
numb=numb+1
print numa; numb
End Sub
连续3次调用var_dim过程,第3次调用时的输出是(  )。 [1分]
21
23
61
63
答案:
21、【 单选题
下列程序段的执行结果为(  )。
I =9
x=5
Do
I =I +1
x=x+2
Loop Until I >=7
Print "I =";I ;
Print "x=";x [1分]
I =4x=5
I =7x=15
I =6x=8
I =10x=7
答案:
22、【 单选题
以下关于文件的叙述中,错误的是(  )。 [1分]
顺序文件中的记录一个接一个地顺序存放
随机文件中记录长度是随机的
执行打开文件的命令后,自动生成一个文件指针
LOF 函数返回给文件分配的字节数
答案:
23、【 单选题
三种基本结构中,能简化大量程序代码行的是(  )。 [1分]
顺序结构
分支结构
选择结构
重复结构
答案:
24、【 单选题
对长度为n的线性表进行顺序查找,在最坏情况下需要比较的次数为( )。 [1分]
125
n/2
n
n+1
答案:
25、【 单选题
在窗体上画一个名为Co mmand1的命令按钮,然后编写以下程序:
Private Sub Co mmand1_Click()
Di m M(10)As Integer
For k =l To 10
M(k)=12-k
Nextk
x=8
Print M(2+M(x))
End Sub
运行程序,单击命令按钮,在窗体上显示的是(  )。 [1分]
6
5
7
8
答案:
26、【 单选题
某人设计了下面的函数fun ,功能是返回参数a 中数值的位数
Function fun(a As Integer)As Integer
Di mn %
n =1
While a\10>=0
n =n +1
a=a\10
Wend
fun =n
End Function
在调用该函数时发现返回的结果不正确,函数需要修改,下面的修改方案中正确的是(  )。 [1分]
把语句n =1改为n =0
把循环条件a\10>=0改为a\10>0
把语句a=a\10改为a=a Mod 10
把语句fun =n 改为fun =a
答案:
27、【 单选题
在窗体上画一个名称为Co mmand1的命令按钮,然后编写如下程序:
Public Enums
a=4
b =3
End Enum
Private Sub Co mmand1_Click()
Di mx As Integer
x=a
If x>=3Then
MsgBox "Pass !"
End Sub
运行程序,其结果是(  )。 [1分]
运行错误,因为Enum 定义有错
运行错误,因为x=a 类型不匹配
运行正常结束,不显示任何信息
运行正常,显示内容为"Pass !"的信息框
答案:
28、【 单选题
在窗体上画两个单选按钮(名称分别为Optionl、Option2,标题分别为"宋体"和"黑体")、1个复选框(名称为Checkl ,标题为"粗体")和1个文本框(名称为Text1,Text
属性为"改变文字字体"),窗体外观如下图所示。程序运行后,要求"宋体"单选钮和"粗体"复选框被选中,则下列能够实现上述操作的语句序列是(  )。
    [1分]
Option1.Value =False
Check1.Value =True
Optionl .Value =True
Checkl .Value =0
Option2.Value =False
Check1.Value =2
Optionl .Value =True
Checkl .Value =1
答案:
29、【 单选题
对于长度为n 的线性表,在最坏情况下,下列各排序法所对应的比较次数中正确的是(  )。 [1分]
冒泡排序为n/2
冒泡排序为n
快速排序为n
快速排序为n(n -1)/2
答案:
30、【 单选题
在程序运行期间,当滚动条的滑块被拖动时,则立即触发滚动条的( )事件。 [1分]
Click
Change
Dblclick
Scroll
答案:
31、【 单选题
下列程序在调试时出现了死循环:
Private Sub Co mmand1_Click()
n =InputBox("请输入一个整数")
Do
If n Mod 2=0Then
n =n +1
Else
n =n +2
End If
Loop Until n =1000
End Sub
下列关于死循环的叙述中正确的是(  )。 [1分]
只有输入的n 是偶数时才会出现死循环,否则不会
只有输入的n 是奇数时才会出现死循环,否则不会
只有输入的n 是大于1000的整数时才会出现死循环,否则不会
输入任何整数都会出现死循环
答案:
32、【 单选题
以下叙述中错误的是(  )。 [1分]
在KeyUp 和KeyDown 事件过程中,从键盘上输入A 或a 被视作相同的字母(即具有相同的KeyCode)
在KeyUp 和KeyDown 事件过程中,将键盘上的"1"和右侧小键盘上的"1"视作不同的数字(具有不同的KeyCode)
KeyPress 事件中不能识别键盘上某个键的按下与释放
KeyPress 事件中可以识别键盘上某个键的按下与释放
答案:
33、【 单选题
下面排序算法中,平均排序速度最快的是(  )。 [1分]
冒泡排序法
选择排序法
交换排序法
堆排序法
答案:
34、【 单选题
设有声明语句:
Di mb(-1To 10,2To 9,20)As Integer
则数组b 中全部元素的个数(  )。 [1分]
2310
2016
1500
1658
答案:
35、【 单选题
以下叙述中正确的是(  )。 [1分]
窗体的Name 属性指定窗体的名称,用来标识一个窗体
窗体的Name 属性的值是显示在窗体标题栏中的文本
可以在运行期间改变对象的Name 属性的值
对象的Name 属性值可以为空
答案:
36、【 单选题
下列叙述中,不符合良好程序设计风格要求的是( )。 [1分]
程序的效率第一,清晰第二
程序的可读性好
程序中要有必要的注释
输入数据前要有提示信息
答案:
37、【 单选题
标签控件能够显示文本信息,可设置显示文本内容的属性是( )。 [1分]
Alignment
Caption
Visi ble
BorderStyle
答案:
38、【 单选题
使用白盒测试法时,确定测试数据应该根据( )和指定的覆盖标准。 [1分]
程序的内部逻辑
程序的复杂结构
使用说明书
程序的功能
答案:
39、【 单选题
在窗体上有一个文本框,其名称为Text1,编写下列事件过程:
Private Sub Text1_KeyPress(KeyAscii As Integer)
Di mstr As Stri ng
str =Chr(KeyAscii)
KeyAscii =Asc(UCase(str))
Text1.Text =Stri ng(2,KeyAscii)
End Sub
程序运行后,如果在键盘上输入字母"a",则在文本框Text3中显示的内容为(  )。 [1分]
aaa
AAA
AA
aa
答案:
40、【 单选题
某人编写了一个能够返回数组a 中10个数中最大数的函数过程,代码如下:
Function MaxValue(a()As Integer)As Integer
Di m max%
max=1
For k =2To 10
If a(k)>a(max)Then
max=k
End If
Next k
MaxValue =max
End Function
程序运行时,发现函数过程的返回值是错的,需要修改,下面的修改方案中正确的是(  )。 [1分]
语句max=1应改为max=a(1)
语句For k =2To 10应改为For k =1To 10
If 语句中的条件a(k)>a(max)应改为a(k)>max
语句MaxValue =max 应改为MaxValue =a(max)
答案:
12 下一页 末页
2页,共43个题库
2页,共43个题库
轻速云给您提供更好的在线考试系统服务!
推荐
推荐题库
众多企事业单位的信赖之选
36万+企事业单位的共同选择
查看更多合作案例
众多企事业单位的信赖之选
开始使用轻速云组织培训考试
四步组织一场考试答题,一键搭建企业培训平台
免费使用 免费使用 预约演示
咨询热线
400-886-8169
周一到周日 8:00-22:00
©2023 轻速云 苏ICP备16049646号-1 轻速云科技提供专业的在线考试系统、在线培训系统
联系我们
客服热线客服热线:400-886-8169 | 周一至周日 8:00-22:00
©2023 轻速云 苏ICP备16049646号-1
轻速云科技提供专业的在线考试系统、在线培训系统
在线咨询 400-886-8169