单选题执行下面这段程序后，单击命令按钮，窗体中输出结果是 ______。 Private Sub
Command1_Click() a=1 : b=4 : c = 9 : d = 5
If a ＜ b Then If c＜d Then
x=True Else
If a＜c Then
x=False
Else x=True
End If End
If End If Print
Val(x) End Sub
A.True
B.False
C.0
D.1
单选题设x和y均为整形变量，则执行程序中的循环后，y的值为 x=1 y=1 Do While y ＜ = 50 If x＞=10 Then Exit Do End If If (x Mod 2) = 1 Then x=x+5 End If If x Mod 2 ＜＞ 1 Then x=x-3 End If y=y+1 Loop
单选题对关系S和关系R进行集合运算，结果中既包含关系S中的所有元组也包含关系R中的所有元组，这样的集合运算称为( )。
单选题在窗体上画一个文本框，其名称为Text1，然后编写以下程序：
Private Sub Form_Load()
Show
Text1.Text=""
Text1.SetFocus
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Char=Chr(KeyAscii)
KeyAscii=Asc(UCase(Char))
End Sub
以上程序的功能是______。
单选题某程序执行后显示了一个MDI窗体和两个子窗体，其中某子窗体中有一个按钮，执行下列程序后的输出结果为______。 Private Sub Command1_Click() Print DoEvents() End Sub
单选题单击命令按钮时，下列程序的执行结果是______。
Private Sub Command1_Click()
Dim a As Integer,b As Integer,c As Integer
a=3:b=4:c=5
Print SecProc(c,b,a)
End Sub
Function FirProc(x As Integer,y As Integer,x As Integer)
FirProc=2*x+y+3*z
End Function
Function SeeProc(x As Integer,y As Integer,z As Integer)
SecProc=FirProc(z,x,y)+x
End Function
单选题有一种控件，可以在其中承载其他控件，还可以在其中用Print方法输出文本，这种控件是
单选题当执行以下过程时，在名为1p1Result的标签内将显示( )。 Private Sub Cmdlt_Click() Dim i．r r=0 For i=1 To 5 Step 1 r=r+i Next i 1p1Result.Caption:=Str$(r) End Sub A) 字符串15 B) 整数15 C) 字符串S D) 整数5
单选题设有如下程序：
Private Sub Form_Click()
Dim a
Dim i As Integer,j 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
程序运行后，单击窗体，则在窗体上显示的是
单选题下列程序段的执行结果为( )。 I=4 x=5 Do I=I+1 x=x+2 Loop Until I＞=7 Print"I=";I Print"x=";x
单选题单击命令按钮执行以下程序，输出结果为( )。Private Sub Command1_Click()Dim x As Integer，y As Integerx=12：y=32Call Proc(x，y)Print x；yEnd SubPublic Sub Proc(n As Integer，ByVal m As Integer)n=n Mod10：m=m Mod10End Sub
单选题在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
a$=InputBox("请输入一个二进制数")
n=Len(a$)
For i=1 To n
Dec=Dec*2+______(a$,i,1)
Next i
Print Dec
End Sub
程序功能为：单击命令按钮，将产生一个输入对话框，此时如果在对话框中输入一个二进制数，并单击“确定”按钮，则把该二进制数转换为等值的十进制数。这个程序不完整，应在横线处填入的内容是
单选题下列关于标签的描述中，错误的是
单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub CommaLndl_Click() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n/3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。
单选题下面程序的输出结果是( )。 Private Sub Command1_Click() ch$="ABCDEF" proc ch Print ch End Sub Private Sub proc(ch As String) s="" For k=Len(ch) To 1 Step -1 s=s＆Mid(ch，k，1) Next k ch=s End Sub
单选题运行下面的程序后，输出的结果为( )。 Cls Dim t(5，5)aslnteger For i=1 To 5:t(i，i)=1:Next For i=1 To 5 Forj=1 To 5 Print t(i，j) Next Print Next A) 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 B) 1 1 1 1 1 C) 1 0 0 0 0 0 1 0 0 0 0 0 1 0 0 0 0 0 1 0 0 0 0 0 1 D) 1 1 1 1 1
单选题在窗体上画一个名为Command1的命令按钮，然后编写如下代码：
Option Base 1
Private Sub Command1_Click()
Dim a
a=Array(1, 2, 3, 4)
j=1
For i=4 To 1 Step_1
s=s+a(i)*j
j=j*10
Next i
Print s
End Sub
运行上面的程序，其输出结果是______。
单选题现有如下程序： Private Sub Command1_Click() s=0 For i = 1 To 5 s = s + f(5+i) Next Print s End Sub Public Function f(x As Integer) If x ＞ = 10 Then t=x+1 Else t=x+2 End If f=t End Function 运行程序，则窗体上显示的是( )。 A) 38 B) 49 C) 61 D) 70
单选题在窗体上添加一个按钮，名为Command1，然后编写如下的事件过程，输出结果为( )。 Private Sub Comand1_Click() Fori=1 To 4 X=4 For i=1 To 3 X=3 For k=1 To 2 X=X+5 Next Next Next Print X End Sub A) 13 B) 26 C) 30 D) 40
单选题在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim a(3，3) For i=1 To 3 For j=1 To 3 If i=j Then a(i，j)=1 If i＜j Then a(i，j)=2 If i＞i Then a(i，j)=3 Next j Next i For i=1 To 3 For j=1 To 3 Print a(i，j)； Next j Print Next i End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为 ______。