单项选择题

下列程序的执行结果是( )。 Function P(N As Integer) For i=1 To N Sum=Sum+i Next i P=Sum End Function Private Sub Command1_Click() S=P(1)+P(2)+P(3)+P(4) Print S; End Sub

A．15
B．16
C．20
D．25

<上一题目录下一题>

热门试题

单项选择题

设有如下过程； Sub ff(x,y,z) x=y+Z End Sub 下列选项中所有参数的虚实结合都是传址方式调用的是( )。

A．Call ff(5,7,2)
B．Call ff(x,y,
C．Call ff(3+x,5+y,
D．Call ff(x+y,x-y,

单项选择题

下列程序的功能是：将数据1，2，…，8写入顺序文件Num.txt中，请选择正确的程序段( )。 Private Sub Form_Click() Dim i As Integer Open Num.txt For Output As #1 For i=1 To 8 ______ Next i Close #1 End Sub

A．print #1,i
B．input #1,i
C．print #1
D．input #1

相关试题