下面程序:FunctionF(aAsInteger)b=0Staticcb=b+1c=c+1F=a+b+cEndFunctionPrivateSubCommand1_Click()DimaAsIntegera=2ForI=1To3PrintF( )NextIEndSub运行上面的程序,单击命令按钮,输出结果为( )A.4,4,4B.4,5,6C.4,6,8D.4,7,9

下面程序:

FunctionF(aAsInteger)

b=0

Staticc

b=b+1

c=c+1

F=a+b+c

EndFunction

PrivateSubCommand1_Click()

DimaAsInteger

a=2

ForI=1To3

PrintF( )

NextI

EndSub

运行上面的程序,单击命令按钮,输出结果为( )

A.4,4,4

B.4,5,6

C.4,6,8

D.4,7,9


相关考题:

阅读程序:FunctionF(aAsInteger)AsIntegerb=0Staticcb=b+1c=c+1F=a+b+cEndFunctionPrivateSubCommand1_Click()DimaAsIntegera=2ForI=1To3PrintF( )NextIEndSub运行结果为( )A.4和5和6B.4和4和4C.5和5和6D.6和6和6

在窗体中添加一个名称为Command1的命令按钮,然后编写如下代码: 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 a As Integer Dim b As Integer a=2 For i=1 To 3 b=F(A) Print b Next i End Sub 程序运行后,如果单击按钮,则在窗体上显示的内容是A.4 4 4B.4 5 6C.5 6 7D.5 5 5

有如下程序: Function F(a As Integer) b = 0 Static C b = b + 1 c = c + 2 F = a + b + c End Function Private Sub Command1_Click() Dim a As Integer a = 2 For i=1 To 3 Print F(a); Next i End Sub 运行上面的程序,单击两次命令按钮,在窗体上输出结果为A.4 4 4B.4 5 6C.5 7 9D.11 13 15

在窗体中添加—个名称为Command1的命令按钮,然后编写如下代码: 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 a As Integer Dim b As Integer a=2 For i=l To 3 b=F(A)Print b Next i End Sub 程序运行后,如果单击按钮,则在窗体上显示的内容是A.4 4 4B.4 5 6C.5 6 7D.5 5 5

阅读程序: 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 a As Integer a=2 For i=1 To 3 Print F(A)Next i End Sub 运行上面的程序,单击命令按钮,输出结果为 ______。A.4 4 4B.4 5 6C.4 6 8D.4 7 9

有如下程序段:Private Sub Command1_Click( ) Dim a As Integer a=2 For i=1 To 3 Print G(A)Next iEnd SubFunction G(a As Integer) b=0 Static c b=b + 1 c=c + 1 G=a + b + cEnd Function运行上面的程序后,单击命令按钮,输出结果为A.1 2 3B.2 3 4C.4 5 6D.1 4 6

阅读程序: 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 4B.4 5 6C.4 6 8D.4 7 9

有如下程序: Private Sub Commandl_Click() Dim a As Integer a=2 For i=1 To 3 Print Gad (A)Next i End Sub Function Gad (a As Integer) b=0 Static c b=b + 1 c= c + 1 Gad= a + b + C End Function 运行上面的程序后,单击命令按钮,输出结果为A.1 2 3B.2 3 4C.4 5 6D.1 4 6

阅读程序: 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 a As Integer a=2 For i=1 To 3 Prim F(A)Next i End Sub 运行上面的程序,单击命令按钮,输出结果为 ______。A.4 4 4B.4 5 6C.4 6 8D.4 7 9