题目内容
（请给出正确答案）
[单选题]
假定有以下程序段： For i= 1 To 4 For j=5 To 1 Step-1 Print i*j Next j， Next i 则语句Print i*j的执行次数是
A.20
B.16
C.17
D.18
查看答案
如果结果不匹配，请 联系老师 获取答案
题目内容
（请给出正确答案）
如果结果不匹配，请 联系老师 获取答案
题目内容
（请给出正确答案）
A.20
B.16
C.17
D.18
如果结果不匹配，请 联系老师 获取答案
更多“假定有以下程序段：Fori=1To4For j=5 To 1…”相关的问题
假定有以下程序段： n=0 for i=1 to 4 for j=3 to -1 step -1 n=n+l next j next i运行完毕后n的值是()。
A．12
B．15
C．16
D．20
假定有以下程序段 n=0 For i=1 To 3 For j=-4 To-1 n=n+1 Next j Next i 运行完毕后，n的值是()。
A．0
B．3
C．4
D．12
假定有下列程序段
For i=1 TO 3
For j=5 TO 1 Step-1
Print i*j
Next j
Next i
则语句Print i*j的执行次数是（）。
A.15
B.16
C.17
D.18
A.1
B.5
C.4
D.2
（33）假定有以下函数过程：
Function Fun(S As String)As String
Dim s1 As String
For i=1 To Len(S)
s1=LCase(Mid(S, i, 1))+s1
Next i
Fun=s1
End Function
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim Str1 As String, Str2 As String
Str1=InputBox("请输入一个字符串")
Str2=Fun(Str1)
Print Srt2
End Sub
程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确定”按钮后在窗体
上的输出结果为（）。
A）ABCDEFG
B）abcdefg
C）GFEDCBA
D）gfedcba
假定有以下函数过程： Function Fun(S As String) As String Dim s1 As String For i=1 To Len(S) s1 = UCase(Mid(S， i， 1)) +s1 Next i Fun =s1 End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim Str1 As String， Str2 As String Strl = InputBox(“请输入一个字符串”) Str2=Fun(Str1) Print Str2 End Sub 程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确定” 按钮后在窗体上的输出结果为，
A．abcdefg
B．ABCDEFG
C．gfedcba
D．GFEDCBA
下面程序段，运行后的结果是 Private Sub Commandl_Click() Dim b%(1 To 4)，i%，t# For i=1 To 4 b(i)=i Next i t=Tof(b() ) Print"t="；t， End Sub Function Tof(a() As Integer) Dim t#，i% t=1 For i=2 To UBound(A)t=t * a(i) Next i Tof=t End Function
A．t=18
B．t=24
C．t=30
D．t=32
下列程序段的执行结果为()。 Dim m(10),n(10) I=3 For I=1 to 5 M(t)=t N(I)=2*I+t Next t Print n(I);m(I)
A．3 11
B．3 15
C．11 3
D．15 3
已知程序段： S=0 FOR I = 1 T() 10 STEP 2 S=S+1 I=I.2 NEXT I当循环结束后，变量I和s的值分别为()。
A．10和2
B．11和5
C．16和4
D．22和3
