单项选择题

下列程序段的输出结果为( )。
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．2023 24 3540
B．2025 30 3540
C．2023 25 3540
D．2025 354045

<上一题目录下一题>

热门试题

单项选择题

窗体上有两个文本框Text1、Text2以及一个命令按钮Command1，编写下列程序： Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1.Text=p2(p1(x)，y) Text2.Text=p1(x) End Sub Private Function p1(x As Integer)As Integer x=x+y:y=x+y p1=x+y End Function Private Function p2 (x As Integer, y As Integer)As Integer p2=2*x+y End Function 当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别为( )。

A．2 4
2 4
B．2 4
4 8
C．4 4
8 8
D．10 10
58 58

单项选择题

下列程序段的运行结果是( )。 Subsele() Dim n As Integer i=21:n=3 Do While i＞n i=i-n Loop Print i End Sub

A．2
B．4
C．5
D．3

相关试题