单选题有如下一个函数过程： Function Fun(a As Integer) Static c b=0：b=b+1：c=c+1 Fun=a+b+c End Function 在窗体上添加一个命令按钮，事件过程如下： Private Sub Command1_Click() Dim a As Integer a=2 For i=1 To 3 Print Fun(a)； Next End Sub 运行该程序，单击命令按钮，输出结果是
单选题在窗体上画一个命令按钮(名称为Command1)，并编写如下代码：
Function Fun1(ByVal a As Integer, b As Integer)As Integer
Dim t As Integer
t=a-b:b=t+a:Fun1=t+b
End Function
Private Sub Command1_Click()
Dim x As Integer
x=10
Print Fun1(Fun1(x, (Fun1(x, x-1))), x-1)
End Sub
程序运行后，单击命令按钮，输出结果是
单选题下列语句中，获得列表框Listl中项目个数的语句是
单选题以下程序段：
Private Sub Form_Load( )
Dim Nop As Integer, Op As String * 1
Num1 = 3
Num2 = 2
Nop = val(Inputbox("请输入1-4之间的整数"))
Select Case Nop
Case 1
Op = "＋"
Result = Num1 + Num2
Case 2
Op = "－"
Result = Num1 - Num2
Case 3
Op = "×"
Result = Num1 * Num2
Case 4
Op = "÷"
Result = Num1 / Num2
End Select
Label1= Num1 & Op & Num2 & "=" & Result
End Sub
窗体运行后，输入3，则label1的标题显示结果为（ ）
单选题如果A为整数且|A| ＞=100，则打印”OK”，否则打印”Error”，表示这个条件的单行格式If语句是______。
单选题有如下程序： Private Sub Form_Click() Dim S As Integer，P As Integer p=1 For i=1 To 4 For i=1 To i s=s+j Nextj p=p*s Next i Print P End Sub 程序运行后，单击窗体，则输出结果是
单选题下列程序段的执行结果为______。 Dim A(4) n=3 A(1)=1 For k=0 To n-1 For 1=1 To k+1 X=k+2-1 A(X)=A(X)+A(X-1) If k＜n-1 Then Exit For Print A(X); Next 1 Next k
单选题某人编写如下函数来判断a是否为素数，若是，则函数返回True；否则返回False。Function prime(a As Integer)As BooleanDim k As Integer，isprime As BooleanIf a＜2Thenisprime=FalseElseisprime=Truek=2Do While k＜a／2And isprimeIf a Mod k=0Thenisprime=FalseElsek=k+1End IfLoopEnd Ifprime=isprimeEnd Function在测试时发现有1个非素数也被判断为素数，这个错判的数是( )。
单选题表达式2*3^2+4*2／2+3^2的值是
单选题InputBox函数返回值的类型为( )。
单选题下列子过程语句中正确的是( )。
单选题以下叙述中错误的是______。
单选题设在窗体上有一个名称为Check1的复选框数组，并有以下事件过程：
Private Sub Check1_Click(Index As Integer)
End Sub
则下面叙述中错误的是
单选题在窗体上画一个文本框(名称为Text1)和一个标签(名称为Lahel1)，程序运行后，在文本框中每输入一个字符，都会立即在标中显示文本框中字符的个数。以下可以实现上述操作的过程是( )。
单选题假定有如下程序：
Private Sub Form_Click()
Dim N As Integer, J As Integer
N=0 J=1
Do Until N＞2
N=N+1:J=J+N*(N+1)
Loop
Print N; J
End Sub
运行程序，单击窗体，输出结果是
单选题设有如下程序：
Private Sub Form_Click()
Dim i As Integer, x As String, y As String
x="ABCDEFG"
For i=4 To 1 step-1
y=Mid(x,i,i)+y
Next i
Print y
End Sub
程序运行后，单击窗体，输出结果是______。
单选题设有如下数组声明语句：
Dim arr（-2 to 2,0 to 3）AS Integer
该数组所包含的数组元素个数是（ ）。
单选题在下列选项中，哪个不是一个算法一般应该具有的基本特征_________。
单选题数据库设计的四个阶段是：需求分析、概念设计、逻辑设计和( )。
单选题在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 x=4 For i=1 To 3 x=3 For k=1 To 2 x=x+6 Next Next Next Print X End Sub 程序运行后，单击命令按钮，输出的结果是( )。 A) 7 B) 15 C) 157 D) 538