单选题在VB集成环境中要结束一个正在运行的工程，可单击工具栏上的一个按钮，这个按钮是
单选题下列描述中正确的是
单选题在窗体上画一个命令按钮(其Name属性为Commandl)，然后编写如下代码： Private Sub Commandl_Click() Dim n0 As Integer：Dim a，b As Integer a=InputBox(”Enter the first number”) b=InputBox(”Enter the second number”) ReDim n(a To b) For k=LBound(n) To UBound(n) n(k)=k Print n(k)； Next k End Sub 程序运行后，单击命令按钮，在输入对话框中分别输入2和3，输出结果为
单选题窗体上有1个名称为Command1的命令按钮，事件过程及函数过程如下：
Private Sub Command1_Click()
Dim m As String
m=InputBox("请输入字符串")
Print pick_str(m)
End Sub
Private Function pick_str(s As String)As String
temp=""
i=1
sLen=Len(s)
Do While i＜=sLen/2
temp=temp+Mid(s,i,1)+Mid(s,sLen-i+1,1)
i=i+1
Loop
pick_str=temp
End Function
运行程序，单击命令按钮，并在输入对话框中输入“basic”，则在窗体上显示的内容为______。
单选题为了使标签控件在显示其内容时不覆盖其背景内容，需进行设置的属性为
单选题有如下程序： Option Base 1 Pfivate Sub Form_Click() Dim arr,Sum Sum=0 arr=Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i)/3=arr(i)/3 Then Sum=Sum+arr(i) End If Nexti print Sum End Sub 程序运行后，单击窗体，输出结果为( )。
单选题为计算a"的值，某人编写了函数power如下： Private Function power(a As
Integer，n As Integer)As Long Dim s As
Long p=a For k=1
To n p=p*a
Next k power=p End
Function 在调试时发现是错误的，例如Print
power(5，4)的输出应该是625，但实际输出是3125。程序需要修改。下面的修改方案中有3个是正确的，错误的一个是______。
A.把For k=1 To n改为For k=2 To n
B.把p=p*a改为p=p^n
C.把For k=1 To n改为For k=1 To n-1
D.把p=a改为p=1
单选题下面的程序运行时，单击窗体后，窗体上显示的结果是( )。 Private Sub Form_Click() Dim a(1 To 6)As Integer Dim min1%,i%,j%,n%,t%,k% a(1)=8:a(2)=6:a(3)=9:a(4)=3:a(5)=2:a(6)=7 n=6 For i=1 To n-1 min 1=i For j=i+1 To n If a(j)＜a(min1)Then min1=j Next j t=a(i):a(i)=a(min1):a(min1)=t Next i For i=1 To n Print a(i) Next i End Sub
单选题关于水平滚动条，如下叙述中错误的是
单选题通过以下 ______ 窗口可以在设计时直观的调整窗体在屏幕上的位置。
单选题有如下程序：
Private Sub Form_Click()
Dim s As Integer, p As Integer
p=1
For i=1 To 4
For j=1 To i
s=s±j
Next j
p=p*s
Next i
Print p
End Sub
程序运行后，单击窗体，则输出结果是
单选题有下列二叉树，对此二叉树中序遍历的结果是()A．BDYEACFXZB．DYBEAFCZXC．ABCDEFXYZD．ABDYECFXZ
单选题在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签，两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮，然后画一个名称为Timer1的计时器控件，并把其Interval属性设置为500，如下图所示。编写如下程序：PrivateSubForm_Load()Timer1.Enabled=FalseEndSubPrivateSubCommand1_Click()Timer1.Enabled=TrueEndSubPrivateSubCommand2_Click()Timer1.Enabled=FalseEndSubPrivateSubTimer1_Timer()IfLabel1.Left＜WidthThenLabel1.Left=Label1.Left+20ElseLabel1.Left=0EndIfEndSub程序运行后单击“开始”按钮，标签在窗体中移动。对于这个程序，以下叙述中错误的是______。
单选题要使菜单项MenuOne在程序运行时失效，使用的语句是
A. MenuOne.Visible=True
B. MenuOne.Visible=False
C. MenuOne.Enabled=True
D. MenuOne.Enabled=False
单选题设有如下程序：PrivateSubForm_Click()Clsa$="123456"Fori=1To6PrintTab(12-i);______NextiEndSub程序运行后，单击窗体，要求结果如图所示，则应填入的内容为()。A)Left(a$,i)B)Mid(a$,8-i,i)C)Right(a$,i)D)Mid(a$,7,i)
单选题确定复选框是否选中，可访问的属性是
____
。
单选题下列控件不支持MouseDown事件的是______。
单选题要使文本框能显示多行文字，则需设定它的______属性为True。
单选题在窗体上有一个名为Cd1的通用对话框，为了在运行程序时打开保存文件对话框，则在程序中应使用的语句是______。 A) Cd1.Action=1 B) Cd1.Action=2 C) Cd1.ShowSave=0 D) Cd1.ShowSave=True
单选题有三个关系R、S和T如下：
R
B
C
D
a
0
k1
b
1
n1
S
B
C
D
f
3
h2
a
0
k1
n
2
x1
T
B
C
D
a
0
k1
由关系R和S通过运算得到关系T，则所使用的运算为______。