试卷详情
-
计算机等级考试二级VISUAL BASIC机试4
-
[单项选择]以下关系表达式中,其值为True的是( )。
A. "XYZ">"XYz"
B. "VisualBasic"<>"visualbasie"
C. "the"="there"
D. "Integer"<"Int/
-
[单项选择]执行语句Dim X,Y As Integer后,( )。
A. X和Y均被定义为整型变量
B. X和Y均被定义为变体类型变量
C. X被定义为整型变量,Y被定义为变体类型变量
D. X被定义为变体类型变量,Y被定义为整型变量
-
[单项选择]求1! +2! +……+10! 的程序如下:
Private Function s(x As Integer)
f=1
For i = 1 To x
f=f * i
Next
s=f
End Function
Private Sub Command1_Click( )
Dim i As Integer
Dim y As Long
Fori=1 To 10
______
Next
Print y
End Sub
为实现功能要求,程序的横线处应该填入的内容是( )。
A. Call s(i)
B. Call s
C. y=y+s(i)
D. y=y+s
-
[单项选择]在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是( )。
A. Private Sub Text1_Change( )
B. Private Sub Text1_Click( )
C. Private Sub Text1_Change( )
D. Private Sub Label1_Change( )
-
[单项选择]以下说法中正确的是( )。
A. 当焦点在某个控件上时,按下一个字母键,就会执行该控件的KeyPress事件过程
B. 因为窗体不接受焦点,所以窗体不存在自己的KeyPress事件过程
C. 若按下的键相同,KeyPress事件过程中的KeyAscii参数与KeyDown事件过程中的KeyCode参数的值也相同
D. 在KeyPress事件过程中,KeyAscii参数可以省略
-
[单项选择]设有如下程序:
Option Base 1
Dim a(3, 4) As Integer, b(4, 3) As Integer
Private Sub Command1_Click( )
’循环1
For i = 1 To 3
For j = 1 To 4
b(j, i) =a(i, j)
Next j
Next i
’循环2
x=b(1, 1)
For i = 1 To 4
For j = 1 To 3
Print b(i, j);
if x<b(i, j) Then x=b(i, j)
Next j
Print
Next i
End Sub
程序中的数组a已被赋值。以下关于上述程序的叙述中,正确的是( )。
A. 窗体模块中,不能使用Dim声明a、b数组
B. “循环1”可以正常运行
C. “循环2”中循环变量i、j的终值不对,所以不能正常运行
D. 程序可以正常运行,x中保存的是数组b中所有元素中最小的数
-
[单项选择]下面控件中,没有Caption属性的是( )。
A. 复选框
B. 单选按钮
C. 组合框
D. 框架
-
[单项选择]在面向对象方法中,不属于“对象”基本特点的是( )。
A. 一致性
B. 分类性
C. 多态性
D. 标识唯一性
-
[单项选择]下列叙述中正确的是( )。
A. 顺序存储结构的存储一定是连续的,链式存储结构的存储空间不一定是连续的
B. 顺序存储结构只针对线性结构,链式存储结构只针对非线性结构
C. 顺序存储结构能存储有序表,链式存储结构不能存储有序表
D. 链式存储结构比顺序存储结构节省存储空间
-
[单项选择]在软件开发中,需求分析阶段可以使用的工具是( )。
A. N-S图
B. DFD图
C. PAD图
D. 程序流程图
-
[单项选择]窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:
Private Type x
a As Integer
b As Integer
End Type
Private Sub Command1_Click( )
Dim y As x
y. a = InputBox( )
If y. a/2 =y. a / 2 Then
y. b=y. a * y. a
Else
y. b = Fix(y. a / 2)
End If
Text1. Text = y. b
End Sub
对以上程序,下列叙述中错误的是( )。
A. x是用户定义的类型
B. InputBox函数弹出的对话框中没有提示信息
C. 若输入的是偶数,y. b的值为该偶数的平方
D. Fix(y. a/2)把y. a/2的小数部分四舍五入,转换为整数返回
-
[单项选择]执行以下程序段:
a$="Visual Basic Programming"
b$="C++"
c$=UCase(Left$(a$, 7)) & b$ & Right$(a$, 12)
变量c$的值为( )。
A. Visual BASIC Programming
B. VISUAL C++ Programming
C. Visual C++ Programming D) VISUAL BASIC Programming
-
[单项选择]窗体上有一个名称为Command1的命令按钮,其事件过程如下:
Private Sub Command1_Click( )
x = "VisuatBasicProgramming"
a = Right(x, 11)
b =Mid(x, 7, 5)
c = MsgBox(a , , b)
End Sub
运行程序后单击命令按钮。以下叙述中错误的是( )。
A. 信息框的标题是Basic
B. 信息框中的提示信息是Programming
C. c的值是函数的返回值
D. MsgBox的使用格式有错
-
[单项选择]数据流图中带有箭头的线段表示的是( )。
A. 控制流
B. 事件驱动
C. 模块调用
D. 数据流
-
[单项选择]设工程文件包含两个窗体文件Form1. frm、Form2. frm及一个标准模块文件Module1. bas。两个窗体上分别只有一个名称为Command1的命令按钮。
Form1的代码如下:
Public x As Integer
Private Sub Form_Load( )
x=1
y=5
End Sub
Private Sub Command1_Click( )
Form2. Show
End Sub
Private Sub Command1_Cliek( )
Print Form1. x, y
End Sub
Module1的代码如下:
Public y As Integer
运行以上程序,单击Form1的命令按钮Command1,则显示Form2;再单击Form2上的命令按钮Command1,则窗体上显示的是( )。
A. 1 5
B. 0 5
C. 0 0 D) 程序有错
-
[单项选择]设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是( )。
A. List1. List
B. List1. ListIndex
C. List1. Text D) List1. Index
-
[单项选择]假定有以下循环结构:
Do Until条件表达式
循环体
Loop
则以下正确的描述是( )。
A. 如果“条件表达式”的值是0,则一次循环体也不执行
B. 如果“条件表达式”的值不为0,则至少执行一次循环体
C. 不论“条件表达式”的值是否为“真”,至少要执行一次循环体
D. 如果“条件表达式”的值恒为0,则无限次执行循环休
-
[单项选择]某人编写了向随机文件中写一条记录的程序,代码如下:
Type RType
Name As String * 10
Tel As String * 20
End Type
Private Sub Command1_Click( )
Dim p As RType
p. Name = InputSox( "姓名" )
p. Tel = InputBox( "电话号" )
Open "Books. dat" For Random As # 1
Put # 1, , p
Close # 1
End Sub
该程序运行时有错误,修改的方法是( )。
A. 在类型定义“Type RType”之前加上“Private”
B. Dim P As RType必须置于窗体模块的声明部分
C. 应把Open语句中的For Random改为For Output
D. Put语句应该写为Put # 1, P. Name, P. Tel
-
[单项选择]用来设置文字字体是否斜体的属性是( )。
A. FontUnderline
B. FontBold
C. FontSlope
D. FontItalic
-
[单项选择]一间宿舍可住多个学生,则实体宿舍和学生之间的联系是( )。
A. 一对一
B. 一对多
C. 多对一
D. 多对多
-
[单项选择]以下关于过程及过程参数的描述中,错误的是( )。
A. 调用过程时可以用控件名称作为实际参数
B. 用数组作为过程的参数时,使用的是“传地址”方式
C. 只有函数过程能够将过程中处理的信息传回到调用的程序中
D. 窗体(Form)可以作为过程的参数
-
[单项选择]设有如下一段程序:
Private Sub Command1_Cliek( )
Static a As Variant
a=Array("one", "two", "three", "four five")
Print a(3)
End Sub
针对上述事件过程,以下叙述中正确的是( )。
A. 变量声明语句有错,应改为Static a(5)As Variant
B. 变量声明语句有错,应改为static a
C. 可以正常运行,在窗体上显示three
D. 可以正常运行,在窗体上显示four
-
[单项选择]以下关于菜单的叙述中,错误的是( )。
A. 当窗体为活动窗体时,用Ctrl+E键可以打开菜单编辑器
B. 把菜单项的Enabled属性设置为False,则可删除该菜单项
C. 弹出式菜单在菜单编辑器中设计
D. 程序运行时,利用控件数组可以实现菜单项的增加或减少
-
[单项选择]在数据管理技术发展的三个阶段中,数据共享最好的是( )。
A. 人工管理阶段
B. 文件系统阶段
C. 数据库系统阶段
D. 三个阶段相同
-
[单项选择]一个栈的初始状态为空。现将元素1、2、3、4、5、A、B、C、D、E依次入栈,然后再依次出栈,则元素出栈的顺序是( )。
A. 12345ABCDE
B. EDCBA54321
C. ABCDE12345
D. 54321EDCBA
-
[单项选择]执行下列语句:
strInput=InputBox("请输入字符串", "字符串对话框", "字符串")
将显示输入对话框。此时如果直接单击“确定”按钮,则变量strInput的内容是( )。
A. "请输入字符串" B) "字符串对话框"
B. "字符串"
C. 空字符串
-
[单项选择]在长度为n的有序线性表中进行二分查找,最坏情况下需要比较的次数是( )。
A. O(n)
B. O(n2)
C. O(log2n)
D. O(nlog2n)
-
[单项选择]窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下:
Private Sub Form_Load ( )
Shape1. Top = 0
Timer1. Interval = 100
End Sub
Private Sub Timer1_Timer( )
Static x As Integer
Shapel. Top = Shape1. Top + 100
x=x+1
If x Mod 10 =0 Then
Shape1. Top = 0
End If
End Sub
以下关于上述程序的叙述中,错误的是( )。
A. 每执行一次Timer1_Timer事件过程,x的值都在原有基础上增加1
B. Shape1每移动10次回到起点,重新开始
C. 窗体上的shape1由下而上移动
D. Shape1每次移动100
-
[单项选择]以下叙述中错误的是( )。
A. 在程序运行时,通用对话框控件是不可见的
B. 调用同一个通用对话框控件的不同方法(如ShowOpen或ShowSave)可以打开不同的对话框窗口
C. 调用通用对话框控件的ShowOpen方法,能够直接打开在该通用对话框中指定的文件
D. 调用通用对话框控件的ShowColor方法,可以打开颜色对话框窗口
-
[单项选择]以下不能输出“Program”的语句是( )。
A. Print Mid("VBProgram", 3, 7)
B. Print Right("VBProgram", 7)
C. Print Mid("VBProgram", 3)
D. Print Leff("VBProgram", 7)
-
[单项选择]窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程:
Private Sub Text1_Change(Index As Integer)
Select Case Index
Case 0
Text1 (1). FontSize = Text1 (0). FontSize * 2
Text1 (1). Text = Text1 (0). Text
Case 1
Text1 (0). FontSize = Text1 (1). FontSize / 2
Text1 (0). Text = Text1 (1). Text
Case Else
MsgBox "执行Else分支"
End Select
End Sub
关于上述程序,以下叙述中错误的是( )。
A. Index用于标识数组元素
B. 本程序中Case Else分支的语句永远不会被执行
C. 向任何一个文本框输入字符,都会在另一个文本框中显示该字符
D. 下标为0的文本框中显示的字符尺寸将越来越小
-
[单项选择]设a=4,b=5,c=6,执行语句Print a<b And b<c后,窗体上显示的是( )。
A. True
B. False
C. 出错信息
D. 0
-
[单项选择]假定通过复制、粘贴操作建立了一个命令按钮数组Command1,以下说法中错误的是( )。
A. 数组中每个命令按钮的名称(Name属性)均为Command1
B. 若未做修改,数组中每个命令按钮的大小都一样
C. 数组中各个命令按钮使用同一个Click事件过程
D. 数组中每个命令按钮的Index属性值都相同
-
[单项选择]有如下程序:
Private Sub Form_Click( )
Dim s As Integer, p As Integer
p=1
For i=1 To4
For j=1 To i
s=s+j
Next j
P=P * s
Next i
Print p
End Sub
程序运行后,单击窗体,则输出结果是( )。
A. 90
B. 180
C. 400
D. 800