单项选择题

阅读程序:
Function F(a As Integer)
b=0
Static c
b=b+1
c=c+1
f=a+ b+ c
End Function
Private Sub Command1_Click()
Dim S As Integer
a=2
For i=1 To 3
Print P(

A.
Next i
End Sub
运行上面的程序,单击命令拄钮,输出结果为______ 。A) 4
4
4
B.4
5
6
C.4
6
8
D.4
7
9
<上一题 目录 下一题>
热门 试题

单项选择题
单击命令按钮之后,下列程序代码的执行结果为______。 Private Function P(N As Integer) Static sum For I=I To N Sum = sum +1 Next I P =sum End Function Private Sub Command1_Click() S=P(1)+P(2)+P(3)+P(4) Print S: End Sub
A.20
B.30
C.115
D.135
单项选择题
对窗体编写如下代码: Option Base 1 Private Sub Form_ KeyPress (KeyAscii As Integer) a=Array(237,126,87,48,498) m1=a(1) m2=1 If KeyAscii=13 Then For i=2 To 5 If a(i)>m1 Then m1=a(I) m2=i End If Next i End If Print m1 Print m2 End Sub 程序运行后,按回车键,输出结果为______ 。
A.48
4
B.237
1
C.498
5
D.498
4
相关试题
  • 一下程序的作用是生成一个10×10的矩阵...
  • 在Visual Basic 中,要将一个窗体装载到...
  • 以下程序段中Do...Loop 循环执行的次数...
  • 以下程序的作用是生成一个如下图的矩阵,该...
  • 有如下程序,该程序的执行结果是 【6】 ...