单项选择题

下列程序段的输出结果是( )。

Dim M(5,5),S(5)

For i=1 To 5

S(i)=0

For j=1 To 5

M(i,j)=i+j

S(i)=S(i)+M(i,j)

Next j

Next i

For Each x In S

Print x;

Next x

A．20 23 24 35 40
B．20 25 30 35 40
C．20 23 25 35 40
D．20 25 35 40 45

<上一题目录下一题>

热门试题

单项选择题

单击命令按钮时，下列程度段的执行结果是( )。 Pdvate Sub Command1_Clik() Dim a As Integer,b As Integer,c As Integer a=2;b=4;c=6 CaII S1(a,b) Print a= ; b= ;b; c= ;c Call S2(a,b) Print a= ;a; b= ;b; c= ;c; End Sub Private Sub S1(x As Integer,y As Integer) Dim c As Integer x=2*x:y=y+2:c=x+y End Sub Sub S2(x As Integer,ByVal y As Integer) Dim e As Integer x=2*x:y=y+2:e=x+y End Sub

A．a=4 b=6 c=6
a=4 b=6 c=6
B．a=8 b=6 c=6
a=8 b=6 c=6
C．a=4 b=6 c=6
a=8 b=6 c=6
D．a=8 b=6 c=6
a=4 b=6 c=6

单项选择题

在E盘当前目录文件夹下建立一个名为“Student.txt”，的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有下列记录类型和窗体的事件过程，请选择正确的语句完成程序( )。 Private Type student StuName As String*10 StuGrade As String*10 StuAge As Integer End Type Private Sub Form_Click() Dim s As student Open c: student.txt For Random As#1 Len=Len(s) For i=1 To 1 s.StuName=InputBox( 请输入姓名 ) s.StuGrade=InputBox( 请输入年级号 ) s.StuAge=Val(InputBox( 请输入年龄 )) ______ Next i Close#1 End Sub

A．Prim#1,s
B．Print#1,1
C．Put#1,,s
D．Put#1,,i

相关试题