单项选择题

现有如下程序：
Private Sub Command1_Click()
s=0
Fori=1 To 6
s=s+f(5+i)
Next
Print s
End Sub
Public Function f(x As Integer)
If x＞=8 Then
t=x+2
Else
t=x+1
End If
f=t
End Function
运行程序，则窗体上显示的是______。

A．38
B．49
C．61
D．70

<上一题目录下一题>

热门试题

单项选择题

已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分，某人编写程序如下：Option Base 1Private Sub Command1_Click()Dim sum As IntegerSum=0For i=1 To 4For j=1 To 3Sum=sum+score(i,j)Next jPrint 第＆i＆个学生的总分是: ;sumNext iEnd Sub运行此程序时发现，除第1个人的总分计算正确外，其他人的总分是错误的。程序需要修改，以下修改方案中正确的是____

A．把外层循环语句For i=1 To 4改为For i=1 To 3内层循环语句For j=1 TO 3改为For j=1 TO 4
B．把sum=0移到For i=1 TO 4和For j=1 TO 3之间
C．把sum=sum+score(i,j)改为sum=sum+score(j,i)
D．把sum=sum+score(i,j)改为sum=score(i,j)

单项选择题

下列关于队列的叙述中正确的是 ______。

A．在队列中只能插入数据
B．在队列中只能删除数据
C．队列是先进先出的线性表
D．队列是先进后出的线性表

相关试题