单项选择题

现有如下程序： 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
<上一题 目录 下一题>
热门 试题

单项选择题
如下事件过程：Function Feed(x)If x ＜10 ThenFeed=XElseFeed=10+xEnd IfEnd FunctionPrivate Sub Command1_Click( )x=Val(Input Box( ，0))pay=Feed(x)Print payEnd Sub运行时在输入框内输入变量x的值为15，输出结果为( )。
A．0
B．15
C．25
D．30
单项选择题
有如下程序：Private Sub Commandl_Click()Dim a As Integera=2For i=1 To 3Print Gad (a)Next iEnd SubFunction Gad (a As Integer)b=0Static cb=b + 1c= c + 1Gad= a + b + CEnd Function运行上面的程序后，单击命令按钮，输出结果为( )。
A．12 3
B．234
C．456
D．146
相关试题