1、【
单选题
】
在窗体上画一个名称为Label1、标题为"Visual Basic 考试"的标签,两个名称分别为Co mmand1和Co mmand2、标题分别为"开始"和"停止"的命令按钮,然后画一个名称为Ti mer1的计时器控件,并把其Interval 属性设置为500,如图所示。
编写如下程序:
Private Sub Form_Load()
Ti mer1.Enabled =false
End Sub
Private Sub Co mmand1_Click()
Ti mer1.Enabled =True
End Sub
Private Sub Ti mer1_Ti mer()
If Label1.Left <Width Then
Label1.Left =label1.Left +20
Else
Label1.Left =0
End If
End Sub
程序运行后单击"开始"按钮,标签在窗体中移动。对于这个程序,以下叙述中错误的是( )。
[1分]
、
标签的移动方向为自右向左
、
单击"停止"按钮后再单击"开始"按钮,标签从停止的位置继续移动
、
当标签全部移出窗体后,将从窗体的另一端出现并重新移动
、
标签按指定的时间间隔移动
答案:
2、【
单选题
】
下面程序执行时,在窗体上显示的是( )。
Private Sub Co mmand1_Click()
Di ma(10)
For k =1To 10
a(k)=11k
Next k
Print a(a(3)\a(7)Mod a(5))
End Sub
[1分]
答案:
3、【
单选题
】
某二叉树中有n 个度为2的结点,则该二叉树中的叶子结点数为( )。
[1分]
答案:
4、【
单选题
】
要使文本框获得输入焦点,则应采用文本框控件的( )方法。
[1分]
、
GotFocus
、
LostFocus
、
KeyPress
、
SetFocus
答案:
5、【
单选题
】
Sub过程与Function过程最根本的区别是( )。
[1分]
、
Sub过程可以用Call语句直接使用过程名调用,而Function过程不可以
、
Function过程可以有形参,Sub过程不可以
、
Sub过程不能返回值,而Function过程能返回值
、
两种过程参数的传递方式不同
答案:
6、【
单选题
】
已知使用Show 方法的格式为:[窗体名称].Show[模式],如果要使窗体是"模态型"窗体,则"模式"值为( )。
[1分]
答案:
7、【
单选题
】
为计算an 的值,某人编写了函数power 如下:
Private Function power(a As Integer ,n As Integer)
As Long
Di mPAsLong
p =a
For k =1To n
p =p*a
Next k
power =p
End Function
在调试时发现是错误的,例如Print power(5,4)的输出应该是625,但实际输出是3125。程序需要修改。下面的修改方案中有3个是正确的,错误的一个是( )。
[1分]
、
把For k =1To n 改为For k =2To n
、
把p =p*a 改为p =p^n
、
把For k =1To n 改为For k =1To n -1
、
把p =a 改为p =1
答案:
8、【
单选题
】
以下叙述中错误的是( )。
[1分]
、
在程序运行时,通用对话框控件是不可见的
、
在同一个程序中,用不同的方法(如ShowOpen 或ShowSave 等)打开的通用对话框具有不同的作用
、
调用通用对话框控件的ShowOpen 方法,可以直接打开在该通用对话框中指定的文件
、
调用通用对话框控件的ShowColor 方法,可以打开颜色对话框
答案:
9、【
单选题
】
在窗体上有一个命令按钮,然后编写如下事件过程:
Private Sub Co mmand1_Click() Di ma(5)As Stri ng For i =1To 5 a(i)=Chr(Asc("A")+(i -1)) Next i For Each b In a Print b ; Next
End Sub
程序运行后,单击命令按钮,输出结果是( )。
[1分]
、
ABCDE
、
1 2 3 4 5
、
abcde
、
出错信息
答案:
10、【
单选题
】
设在窗体中有一个名称为List1的列表框,其中有若干个项目(如图)。要求选中某一项后单击Command1按钮,就删除选中的项,则正确的事件过程是( )。
[1分]
、
Private Sub Command1_Click()
List1.Clear
End Sub
、
Private Sub Command1_Click()
List1.Clear List1.ListIndex
End Sub
、
Private Sub Command1_Click()
List1.Re movelte m List1.ListIndex
End Sub
、
Private Sub Command1_Click()
List1.Re movelte m
End Sub
答案:
11、【
单选题
】
下列不能打开菜单编辑器的操作是( )。
[1分]
、
按"Ctrl +E"组合键
、
单击工具栏中的"菜单编辑器"按钮
、
执行"工具"菜单中的"菜单编辑器"命令
、
按"Shift +Alt +M"组合键
答案:
12、【
单选题
】
在窗体上画1个名称为Co mmand1的命令按钮,然后编写下列程序:
Private Sub Co mmand1_Click()
Print fun("ABCDEFG")
End Sub
Function fun(st As Stri ng)As stri ng
stlen =Len(st)
te mp =""
For k =1To stlen/2
te mp =te mp +Mid(st ,k ,1)+Mid(st ,stlen -k +1,1) Next k fun =te mp
End Function
程序运行时,单击命令按钮,则在窗体上显示的是( )。
[1分]
、
ABCDEFG
、
AGBFCE
、
GFEDCBA
、
AGBFCED
答案:
13、【
单选题
】
在窗体上画一个名称为Co mmand1的命令按钮,然后编写下列事件过程:
Private Sub Co mmand1_Click()
c =1234
c1=Tri m(Str(c))
For i =1To 4
Print Next
End Sub
程序运行后,单击命令按钮,要求在窗体上显示下列内容:1121231234则在横线处应填入的内容为( )。
[1分]
、
Right(c1,i)
、
Left(c1,i)
、
Mid(c1,i ,1)
、
Mid(c1,i ,i)
答案:
14、【
单选题
】
下列叙述中正确的是( )。
[1分]
、
提高耦合性降低内聚性有利于提高模块的独立性
、
降低耦合性提高内聚性有利于提高模块的独立性
、
耦合性是指一个模块内部各个元素间彼此结合的紧密程度
、
内聚性是指模块间互相连接的紧密程度
答案:
15、【
单选题
】
下列关于过程叙述不正确的是( )。
[1分]
、
过程的传值调用是将实参的具体值传递给形参
、
过程的传址调用是将实参在内存的地址传递给形参
、
过程的传值调用参数是单向传递的,过程的传址调用参数是双向传递的
、
无论过程传值调用还是过程传址调用,参数传递都是双向的
答案:
16、【
单选题
】
下面循环语句中在任何情况下都至少执行一次循环体的是( )。
[1分]
、
Do While <条件> 循环体
Loop
、
While <条件> 循环体
Wend
、
Do 循环体
Loop Until <条件>
、
Do Until <条件> 循环体
Loop
答案:
17、【
单选题
】
使用"打开"对话框的方法是( )。
[1分]
、
双击工具箱中的"打开"对话框控件,将其添加到窗体上
、
单击Co mmonDialog 控件,然后在窗体上画出Co mmonDialog 控件,再将Action 属性设为1
、
在程序中用Show 方法显示"打开"对话框
、
在程序中用Showopen 方法显示"打开"对话框
答案:
18、【
单选题
】
窗体上有一个用菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。以下叙述中错误的是( )。
[1分]
、
在设计"粘贴"菜单项时,在菜单编辑器窗口中设置了"有效"属性(有"√")
、
菜单中的横线是在该菜单项的标题输入框中输入了一个"-"(减号)字符
、
在设计"选中"菜单项时,在菜单编辑器窗口中设置了"复选"属性(有"√")
、
在设计该弹出菜单的主菜单项时,在菜单编辑器窗口中去掉了"可见"前面的"√"
答案:
19、【
单选题
】
在窗体上画一个名称为Label1的标签,然后编写如下事件过程:
Private Sub Form_Click()
Di marr(10,10)As Integer
Di mi As Integer ,j As Integer
For i =2To 4
For j=2To 4
arr(i ,j)=j*j
Next j
Next i
Label1.Caption =Str(arr(2,2)+arr(3,3))
End Sub
程序运行后,单击窗体,在标签中显示的内容是( )。
[1分]
答案:
20、【
单选题
】
下列关于完全二叉树的叙述中,错误的是( )。
[1分]
、
除了最后一层外,每一层上的结点数均达到最大值
、
可能缺少若干个左右叶子结点
、
完全二叉树一般不是满二叉树
、
具有结点的完全二叉树的深度为[log2n]+1
答案:
21、【
单选题
】
按文件的访问方式不同,可以将文件分为( )
[1分]
、
顺序文件和随机文件
、
文本文件和数据文件
、
数据文件和可执行文件
、
ASCII文件和二进制文件
答案:
22、【
单选题
】
设有下列通用过程:
Public Function Fun(xStr As Stri ng)As Stri ng
Di mtStr As Stri ng ,strLAs Integer
tStr =""
strL=Len(xStr)
i =strL/2
DO While i <=StrL
tStr =tStr &Mid(xStr ,i +l ,1)
i =i +1
Loop
Fun =tStr &tStr
End Function
在窗体上画一个名称为Text1的文本框和一个名称为Co mmand1的命令按钮。然后编写下列的事件过程:
Private Sub Co mmand1_Click()
Di mS1As Stri ng S1="ABCDEF"
Text1.Text =LCase(Fun(S1))
End Sub
程序运行后,单击命令按钮,文本框中显示的是( )。
[1分]
、
ABCDEF
、
abcdef
、
defdef
、
defabc
答案:
23、【
单选题
】
假定有一个菜单项,名为MenuIte m,为了在运行时使该菜单项不可见,应使用的语句为( )。
[1分]
、
MenuIte m.Enabled =False
、
MenuIte m.Enabled =True
、
MenuIte m.Visi ble =True
、
Menulte m.Visi ble =Flase
答案:
24、【
单选题
】
下列程序执行后,输出结果是( )。
For n =3To 1Step -1
x$=Stri ng$(n ,"#")
Print x$
Next n
[1分]
、
1#
2#
3#
、
###
##
#
、
#
#####
、
3#
2#
1#
答案:
25、【
单选题
】
图像框中的Stretch 属性为True 时,其作用效果为( )。
[1分]
、
只能自动设定图像框长度
、
只能自动扩大图像
、
只能自动缩小图像
、
图形自动调整大小适应图像控件
答案:
26、【
单选题
】
对下面的二叉树前序遍历的结果是( )。
[1分]
、
ACFXDBEYZ
、
ABEFXYZCD
、
ABCDEFXYZ
、
ABD
答案:
27、【
单选题
】
下列叙述中正确的是( )。
[1分]
、
在模块化程序设计中,一个模块应该尽量多地包括与其他模块联系的信息
、
在自顶向下、逐步细化的设计过程中,首先应设计解决问题的第一个细节
、
在模块化程序设计中,一个模块内部的控制结构也要符合结构化原则
、
在程序设计过程中,不能同时采用结构化程序设计方法与模块化程序设计方法
答案:
28、【
单选题
】
设有两个串p 和q ,求q 在p 中首次出现位置的运算称为( )。
[1分]
答案:
29、【
单选题
】
下列关于文件的叙述中,错误的是( )。
[1分]
、
使用Append 方式打开文件时,文件指针被定位于文件尾
、
当以Input 打开文件时,如果文件不存在,则自动建立一个新文件
、
顺序文件的各个记录的长度可以不同
、
随机文件打开后,既可以进行读操作,也可以进行写操作
答案:
30、【
单选题
】
有下列二叉树,对此二叉树前序遍历的结果是( )。
[1分]
、
ACBEDGFH
、
ABDGCEHF
、
HGFEDCBA
、
ABCDEFGH
答案:
31、【
单选题
】
下列数据模型中,具有坚实理论基础的是( )。
[1分]
、
层次模型
、
网状模型
、
关系模型
、
以上3个都是
答案:
32、【
单选题
】
下列关系表达式中,其值为True 的是( )。
[1分]
、
"XYZ">"XYz"
、
"VisualBasic"<>"visualbasic"
、
"the"="there"
、
"Integer"<"Int"
答案:
33、【
单选题
】
在计算机中,算法是指( )。
[1分]
、
查询方法
、
加工方法
、
解题方案的准确且完整的描述
、
排序方法
答案:
34、【
单选题
】
同一概念在一处为实体而在另一处为属性或联系的冲突在视图集成中称为( )。
[1分]
、
命名冲突
、
概念冲突
、
域冲突
、
约束冲突
答案:
35、【
单选题
】
设a =2,b =3,c =4,d =5,下列表达式的值是( )。
Not a<=c Or 4*c =b^2And b <>a+c
[1分]
答案:
36、【
单选题
】
数据库应用系统中的核心问题是( )。
[1分]
、
数据库设计
、
数据库系统设计
、
数据库维护
、
数据库管理员培训
答案:
37、【
单选题
】
下事件过程:
Private Sub Co mmand1_Click()
Di marray1(10,10)As Integer
Di mi ,j As Integer
For i =1To 3
For j=2To 4
array1(i ,j)=i +j
Next j
Next i
Text1.Text =array1(2,3)+array1(3,4)
End Sub
程序运行后,单击命令按钮,在文本框中显示的值是( )。
[1分]
答案:
38、【
单选题
】
窗体上有一个名称Text1的文本框,一个名称为Co mmand1的命令按钮。窗体文件的程序如下:
Private Type x
a As Integer
b As Integer
End Type
Private Sub Co mmand1_Click()
Di my As x y .a=InputBox("")
If y .a\2=y .a/2Then
y .b =y .a*y .a Else
y .b =Fi x(y .a/2)
End If
Text1.Text =y .b
End Sub
对以上程序,下列叙述中错误的是( )。
[1分]
、
x 是用户定义的类型
、
InputBox 函数弹出的对话框中没有提示信息
、
若输入的是偶数,y .b 的值为该偶数的平方
、
Fi x(y .a/2)把y .a/2的小数部分四舍五入,转换为整数返回
答案:
39、【
单选题
】
索引属于( )。
[1分]
答案:
40、【
单选题
】
Visual Basic 中的数值可以用十六进制或八进制表示,十六进制数的开头符号是&H ,八进制数的开头符号是( )。
[1分]
答案: