本栏目下题库来源于互联网,轻速云承诺对于用户导入平台的题库是严格保密的,不会在此呈现!
轻速云给您提供更好的在线考试系统服务!
2013年9月全国计算机等级《二级VB》上机临考冲刺试卷(2)
1、【 单选题
数据库系统的三级模式不包括(  )。 [1分]
概念模式
内模式
外模式
数据模式
答案:
2、【 单选题
下列描述中正确的是(  )。 [1分]
Visual Basic 只能通过过程调用执行通用过程
可以在Sub过程的代码中包含另一个Sub过程的代码
可以像通用过程一样指定事件过程的名字
Sub过程和Function过程都有返回值
答案:
3、【 单选题
下列数据结构中,能够按照“先进后出”原则存取数据的是(  )。 [1分]
循环队列
队列
二叉树
答案:
4、【 单选题
在窗体上面画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下代码:
Sub S(X As Integer,y As Integer)
Static z As Integer
y=x*x+Z
z=y
End Sub
Private Sub Command1 Click(  )
Dim i As Integer.z As Integer
m=0
z=0
For i=1 T0 3
S i,Z
m=m+z
Next i
Label1.Caption=Str(m)
程序运行后,单击命令按钮,在标签中显示的内容是(  )。 [1分]
50
20
14
7
答案:
5、【 单选题
下列关于文件的叙述中,错误的是(  )。 [1分]
使用Append方式打开文件时,文件指针被定位于文件尾
当以Input打开文件时,如果文件不存在,则自动建立一个新文件
顺序文件的各个记录的长度可以不同
随机文件打开后.既可以进行读操作,也可以进行写操作
答案:
6、【 单选题
执行下列程序段
a$="visual Basic Programming"
b$="C++"
C$=UCase(Left$(a$,7))&b$&Right$(a$,1 2)后,变量c$的值为( )。 [1分]
Visual BASIC Programming
VISUAL C++Programming
Visual C++Programming
VISUAL BASIC Programming
答案:
7、【 单选题
如果一个正整数从高位到低位上的数字依次递减,则称其为降序数(如:9632是降序数,而8516则不是降序数)。现编写如下程序,判断输入的正整数是否为降序数。
Private Sub Command1 Click(  )
Dim n As Long
Dim flag As Boolean
n=InputBox("输入一个正整数")
S=Trim(Str(n))
For i=2 To Len(s)
If Mid(s,i-1,1)
Next i
If i=Len(S)Then flag=True Else flag=False
If flag Then
Print n;"是降序数"
Else
Print n;"不是降序数"
End If
End Sub
运行以上程序,发现有错误,需要对给flag变量赋值的If语句进行修改。以下正确的修改是(  )。 [1分]
If i=Len(s)+1 Then flag=False Else flag=True
If i=Len(s)+1 Then flag=True Else flag=False
If i=Len(s)-1 Then flag=False Else flag=True
If i=Len(s)-1 Then flag=True Else flag=False
答案:
8、【 单选题
下面描述中,不属于软件危机表现的是(  )。 [1分]
软件过程不规范
软件开发生产率低
软件质量难以控制
软件成本不断提高
答案:
9、【 单选题
下列对于软件测试的描述正确的是(  )。 [1分]
软件测试的目的是证明程序是否正确
软件测试的目的是使程序运行结果正确
软件测试的目的是尽可能多地发现程序中的错误
软件测试的目的是使程序符合结构化原则
答案:
10、【 单选题
有如下事件过程:
Private Sub Form Click(  )
Dim n As Integcr
x=0
n=InputBox("请输入一个整数")
For i=1 To i
for j =1 To j
x=x+1
Next j
Next i
Print x
End sub
程序运行后,单击窗体,如果在输入对话框中输入5,则在窗体上显示的内容是(  )。 [1分]
13
14
15
16
答案:
11、【 单选题
在窗体上画l个命令按钮和l个文本框,其名称为Command1和Text1,再编写如下程序:
Dim ss As String
Private Sub Text1 KeyPress(KeyAscii As Integer)
If Chr(KeyAscii)<>""Then ss=ss+Chr(KeyAscii)
End Sub
Private Sub Command1 Click(  )
Dim m As String,i As Integer
For i=Len(ss)To 1 Step-1
m=m+Mid(SS,i,1)
Next
Text1.Text=UCase(m)
End Sub
程序运行后,在文本框中输入“Number 100”,并单击命令按钮,则文本框中显示的就是(  )。 [1分]
NUMtBER l00
REBMUN
REBM UN l00
001 REBMUN
答案:
12、【 单选题
窗体上有1个名称为Text1的文本框;1个名称为Timer1的计时器控件,其Interval 属性值为5000,Enabled属性值是True。Timer1的事件过程如下:
Private Sub Timer1 Timer(  )
Static flag As Integer
If Flag=0 Then Flag=1
Flag=-flag
If flag=1 Then
Text1.ForeColor=&HFF& &HFF&为红色
Else
Text1.ForeColor=&HCOO& &HCOO&为绿色
End If
End Sub
以下叙述中正确的是(  )。 [1分]
每次执行此事件过程时,flag的初始值均为0
flag的值只可能取0或1
程序执行后,文本框中的文字每5秒改变一次颜色
程序有逻辑错误,Else分支总也不能被执行
答案:
13、【 单选题
耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是( )。 [1分]
提高耦合性降低内聚性有利于提高模块的独立性
降低耦合性提高内聚性有利于提高模块的独立性
耦合性是指一个模块内部各个元素问彼此结合的紧密程度
内聚性是指模块间互相连接的紧密程度
答案:
14、【 单选题
在新建一个Visual Basic工程时,将新建窗体的Name属性设置为TheFirst,则默认的窗体文件名为(  )。 [1分]
Forml.frm
工程1.frm
TheFirst.frm
Form1.vbp
答案:
15、【 单选题
下列程序执行后,变量X的值为(  )。
Dim a,b,C,d As Single
Dim X As Single
f1=10
b=30
c=400
If b>fl Then
d=fl:fl=b:b=d
End If
If b>C Then
X=b
Else If fl>c Then
X=c
Else
X=a
End If [1分]
10
30
400
430
答案:
16、【 单选题
有下面的程序段,其功能是按图1所示的规律输出数据:
Dim a(3,5)As Integer For i=1 To 3
For j=1 To 5
a(i,j)=i+j
Print a(i,j);
Next
Print
Next
   
若要按图2所示的规律继续输出数据,则接在上述程序段后面的程序段应该是(  )。 [1分]
For i=1 To 5
For j=1 To 3
Print a(j,i);
Next
Print
Next
For i=1 T0 3
For j=1 To 5
Print a(j,i);
Next
Print Next
For j=l To 5
For i=1 To 3
Print a(j,i);
Next
Print
Next
For i=1 To 5
For=1 To 3
Print a(i,j):
Next
Print
Next
答案:
17、【 单选题
计算的近似值的一个公式是π/4=1-(1/3)+(1/5)-(1/7)+…+(-1)n-1(1/2n -1)。
某人编写下面的程序用此公式计算并输出的近似值:
Private Sub Cornmand1 Click(  )
P1=1
Sign=1
n=20000
For k=3 To r
Sign=-Sign
PI=PI+SiRn/k
Next k
Print PI*4
End Sub
运行后发现结果勾3.22751,显然,程序需要修改。下面修改方案中正确的是(  )。 [1分]
把For k=3 To n改为For k=1 To n
把n=20000改为n=20000000
把For k=3 To n改为For k=3 To n Step 2
把PI=1改为P1=0
答案:
18、【 单选题
有三个关系R、S和T如下:
   
则由关系R和S得到关系T的操作是(  )。 [1分]
自然连接
投影
答案:
19、【 单选题
在Visual Basic集成环境中,可以列出工程中所有模块名称的窗口是(  )。 [1分]
工程资源管理器窗口
窗体设计窗口
属性窗口
代码窗口
答案:
20、【 单选题
设在工程文件中有一个标准模块,其中定义了下列记录类型:
Type Books
Name As String*10
TelNum As String*20
End,Type
在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Command1 Click 时,在顺序文件Person.txt中写入一条Books类型的记录。下列能够完成该操作的事件过程是( )。 [1分]
Private Sub Command1 Click( )
Dim B AS Books
Open"Person txt"For Output As#1
Name=InputBox(”输入姓名”)
relNum=lnputBox(”输入电话号码”)
Wlite#1 B Name,B TelNum
Ch,se#1
End Sub
Private Sub Command1 Click( )
Dim B AS Books
Open"Person txt"For Input As#1
>Name=InputBox("输入姓名")
TelNum=InputBox("输入电话号码")
Print#1,B.Name,B.TelNam
Close#1
End Sub
Private Sub Command1 Click( )
Dim BAS Books
Open"Person txt"For Output As#1
Name=InputBox("输入姓名")
TelNum=InputBox("输入电话号码")
Write#1,B
Close#1
End Sub
Private Sub Commandl Click( )
Open"Person txt"For Input As#1
Name=lnputBox("输入姓名")
TelNum=lnputBox("输入电话号码")
Prim#1 Name TelNum
Close#1
End Sub
答案:
21、【 单选题
使用驱动器列表框Drive1、目录列表框Dir1、文件列表框File1时,需要设置控件的同步,以下能够正确设置两个控件同步的命令是(  )。 [1分]
Dir1.Path=Drive1.Path
File1.Path=Dri1.Path
File1.Path=Drive1.Path
Drive1.Drive=Dri1.Path
答案:
22、【 单选题
若看到程序中确以下事件过程,则可以肯定的是,当程序运行时(  )。
Private Sub Click—MouseDown(Button As Integer,Shift As Integer,X As Single,Y
As Single)
Print"VB Program"
End Sub [1分]
用鼠标左键单击名称为“Command1”的命令按钮时,执行此过程
用鼠标左键单击名称为“MouseDown”的命令按钮时,执行此过程
用鼠标右键单击名称为“MouseDown”的命令按钮时,执行此过程
用鼠标左键或右键单击名称为“Click”的命令按钮时,执行此过程
答案:
23、【 单选题
用来设置文字字体是否斜体的属性是(  )。 [1分]
FontUnderline
FontBold
FontSlope
FontItalic
答案:
24、【 单选题
在窗体上有一个文本框Text1,Text属性值为空,然后编写下列事件过程:
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim str As String,n As Integer
str=UCase(Chr(KeyAscii))
n=Len(str)。
Text1.Text=String(n,str)
End Sub
程序运行后,若在文本框中输入单字母“p”,则在文本框Text1中显示的内容为(  )。 [1分]
A.pp
pP
pp
Pp
答案:
25、【 单选题
设窗体的名称为Form1,标题为Win,则窗体的MouseDown事件过程的过程名是(  )。 [1分]
Form1 MouseDown
Win MouseDown
Form MouseDown
MouseDown_Form1
答案:
26、【 单选题
对于循环队列,下列叙述中正确的是(  )。 [1分]
队头指针是固定不变的
队头指针一定大于队尾指针
队头指针一定小于队尾指针
队头指针可以大于队尾指针,也可以小于队尾指针
答案:
27、【 单选题
在窗体上画一个命令按钮,名称为Command1,然后编写下列代码:
Option Base 0
Private Sub Command1 Click( )
Dim A1(4)As Integer,A2(4)As Integer
For k=0 To 2
A1(k+1)=InputBox(”请输入一个整数”)
A2(3-k)=A1(k+1)
Next k
Print A2(k)
End Sub
程序运行后,单击命令按钮,在输入对话框中依次输入2、4、6,则输出结果为( )。 [1分]
0
1
2
3
答案:
28、【 单选题
下列各控件不包含滚动条的控件是(  )。 [1分]
Lis tBox
ComboBox
TextBox
Label
答案:
29、【 单选题
软件按功能可以分为:应用软件、系统软件和支撑软件(或工具软件)。下列属于应用软件的是( )。 [1分]
编译程序
操作系统
教务管理系统
汇编程序
答案:
30、【 单选题
窗体上有名称为Option1的单选按钮,且程序中有语句:
If(  )ption1.Value—True Then
下面语句中与该语句不等价的是(  )。 [1分]
If Option1.Value Then
If Option1一True Then
If Value=True Then
If Option1 Then
答案:
31、【 单选题
窗体上有一个名称为CommonDialog1的通用对话框,一个名称为Command1的命令按钮,并有如下事件过程:
Private Sub Command1_Click(  )
CommonDialog.DefaultExt="doc"
CommonDialog.FileName="VB.txt"
CommonDialog.Filter="All(*.*)|*.*|Word|.Doc|"
CommonDialog.FilterIndex=1
CommonDialog.ShowSave
End Sub
运行上述程序,如下叙述中正确的是(  )。 [1分]
打开的对话框中文件“保存类型”框中显示All(*.*)
实现保存文件的操作,文件名是VB.txt
DefaultEx1属性与FileName属性所指明的文件类型不一致,程序出错
对话框的Fiber属性没有指出txt类型,程序运行出错
答案:
32、【 单选题
树是结点的集合,它的根结点的数目是(  )。 [1分]
有且只有1个
1或多于1
0或1
至少有2个
答案:
33、【 单选题
在窗体上建立通用对话框需要添加的控件是(  )。 [1分]
Data控件
Form控件
CommonDialog控件
VBComboBox控件
答案:
34、【 单选题
下述关于数据库系统的叙述中,正确的是(  )。 [1分]
数据库系统减少了数据冗余
数据库系统避免了一切冗余
数据库系统中数据的一致性是指数据类型一致
数据库系统比文件系统能管理更多的数据
答案:
35、【 单选题
窗体上有一-个Text1文本框,一个Command1命令按钮,并有以下程序:
Private Sub Command1 Click(  )
Dim n
If Text1.Text<>"123456"Then
n=n+1
Print"口令输入错误”&n&”次"
End If
End Sub
   
希望程序运行时得到左图所示的效果,即:输入口令,单击“确定口令’’命令按钮,若输入的口令不是“123456”,则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果,程序需要修改。下面修改方案中正确的是(  )。 [1分]
在Dim n语句的下面添加一句:n=0
把Print“口令输入错误”&n&“次”改为Print“口令输入错误”+n+“次”
把Print“口令输入错误”&n&“次”改为Print“口令输入错误”&Str(n)&“次”
把Dim n改为Static n
答案:
36、【 单选题
设a=5,b=6,c=7,d=8,执行语句x=IIf((a>b)And(c>d),10,20)后,X的值是(  )。 [1分]
10
20
30
200
答案:
37、【 单选题
有弹出式菜单的结构如右表,程序运行时,单击窗体则弹出如下图所示的菜单。下面的事件过程中能正确实现这一功能的是(  )。
    [1分]
Private Sub Vorm Click(  )
PopupMenu cut
End Sub
Private Sub Command1 Click(  )
PopupMenu edit
End Sub
Private Sub Form Click(  )
PopupMenu edit
End Sub
Private Sub Form Click(  )
PopupMenu cut
PopupMenu paste
End Sub
答案:
38、【 简答题
在窗体上建立一个二级菜单,该菜单含有“文件”和“编辑”(名称分别为vbFile和vbEdit)两个主菜单项,其中“文件”菜单包括“打开”、“保存”和“关闭”三个子菜单项(名称分别为vbOpen、vbSave和vbClose),如图8-1所示。只建立菜单,不必定义其事件过程。
   
注意:保存时必须存放在考生文件夹下,窗体文件名为Sj1.frm,工程文件名为Sj1.vbp。 [8分]
解析:
   
39、【 简答题
在名称为Form1的窗体上创建两个名称分别为Option1和Option2,标签分别为“教授”和“研究员”的单选按钮,再建立一个名称为Label1的标签,实现如下功能:
当选中“教授”时,标签上显示“博士学位以上”,如果选中“研究员”,则标签上显示“硕士学位以上”,结果如图7-1所示。
   
注意:存盘时必须存放在考生文件夹下,工程文件名为Sj1.vbp,窗体文件名为Sj1.frm。 [10分]
解析:
 根据题意,新建“标准EXE”工程,在窗体上添加一个Labe1控件和两个Option控件,设置Label1的名称为Label1、Caption属性为空,Option的名称分别为0ption1和Option2、Caption属性分别为“教授”和“研究员”。设计完成后,进入代码窗口编写如下代码:
   
40、【 简答题
在考生文件夹下有一个工程文件sj4.vbp与窗体文件sj4.frm,在Form1的窗体中有一个标签、两个命令按钮和一个计时器。要求程序运行时实现以下功能:单击“开始”按钮,就开始倒计数,每隔1秒,文本框中的数减1;单击“停止”按钮,则停止计数,初始计数为60,当计数到0时,则重新从60开始倒计数。如图2—4所示。
   
注意:修改适当的控件的属性,并去掉程序中的注释符“'”,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。考生完成程序编写后,将-工程文件与窗体文件保存到考生文件夹下,文件名分别为sj4.vbp与sj4.frm。 [12分]
解析:
本题主要考查计时器控件的使用。计时器是否启用通过Enabled属性设置,值为True时启用,值为False不启用。启用后间隔多长时间触发一次其Timer事件由其Interval属性设置,Interval属性的单位为毫秒,缺省值为0,此时计时器也不启用。根据题意,将一个标签、两个命令按钮和一个计时控件添加到窗体中,标签的名称为Label1、Caption属性为60,命令按钮的名称分别为Command1和Command2,Caption属性分别为“开始”和“停止”,Timer的名称为Timer1。双击Commandl进入代码窗口,补充后的代码如下:
   
12 下一页 末页
2页,共41个题库
2页,共41个题库
轻速云给您提供更好的在线考试系统服务!
推荐
推荐题库
开始使用轻速云组织培训考试
四步组织一场考试答题,一键搭建企业培训平台
免费使用 免费使用 预约演示
咨询热线
400-886-8169
周一到周日 8:00-22:00
©2022 轻速云 苏ICP备16049646号-1 轻速云科技提供专业的在线考试系统、在线培训系统
联系我们
客服热线客服热线:400-886-8169 | 周一至周日 8:00-22:00
©2022 轻速云 苏ICP备16049646号-1
轻速云科技提供专业的在线考试系统、在线培训系统
在线咨询 400-886-8169