网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
下面程序运行时，内层循环的循环总次数是 For M=1 To 3 For N=0 TO M—1 Next N Next M
A．6
B．5
C．3
D．4
参考答案
更多 “ 下面程序运行时，内层循环的循环总次数是 For M=1 To 3 For N=0 TO M—1 Next N Next MA．6B．5C．3D．4 ” 相关考题
考题
下列程序段的执行结果是Dim A(3,3)For M = 1 To 3For N = 1 To 3If N = M Or N = 3 - M + 1 ThenA(M,N) = 1Else A(M,N) = 0 End IfNext NNext MFor M = 1 To 3For N = 1 To 3Print A(M,N)Next NPrint Next MA. 1 0 0 0 1 0 0 0 1 B. 1 1 1 1 1 1 1 1 1C. 0 0 0 0 0 0 0 0 0 D. 1 0 1 0 1 0 1 0 1
考题
假定有以下程序段 n=0 for i=1 to 3 for j=-4 to -1 n=n+1 next j next i 运行完毕后，n的值是________。A．0B．3C．4D．12
考题
执行下面的程序，输出的结果是 ______ 。 Private Sub Command1_Click() ch $ = "Welcome to China!" n = Len(ch $ ) For i =1 To n-1 s$ =Mid(ch$ ,i,1) If s$ ="o" Then m=m + 1 Next i Print m End SubA．1B．2C．8D．0
考题
有如下程序，运行时输出的结果是 ______。 Option Base 1 Private Sub Command1_Click() Dim a(3,3) As Integer For m=1 To 3 For n=1 To 3 a(m-1，n-1)=m+n+1 Next n Next m For m=0 To 2 For n=0 To 2 Print a(n,m)； Next n Print Next m End SubA．0 1 2 1 2 3 2 3 4B．3 4 5 4 5 6 5 6 7C．1 3 5 3 5 7 5 7 9D．2 4 6 4 6 8 6 8 10
考题
下列程序段的执行结果为( )。 Dim A(3,3) For M=1 To 3 For N=1 To 3 If N=M Or N=3-M+1 Then A(M,N)=1 Else A(M,N)=0 End If Next N Next M For M=1 To 3 For N=1 To 3 Print A(M,N) Next N Print Next MA．1 0 0 0 1 0 0 0 1B．1 1 1 1 1 1 1 1 1C．0 0 0 0 0 0 0 0 0D．1 0 1 0 1 0 1 0 1
考题
在窗体上画1个命令按钮，并编写如下事件过程iPrivate Sub Commandl—Click()Dim a(3，3)For m=1 T0 3F0r n=1 To 3If n=m Or n=4-m Thena(m，n)=m+nElsea(m，n)：0End IfPrint a(m，n)；Next nPrimNext mEnd Sub运行程序，单击命令按钮，窗体上显示的内容为A．2 0 0B．2 0 4C．2 3 0D．2 0 0
考题
下列程序段的执行结果为Dim A(3，3)For M=1 To 3For N=1 To 3If N=M Or N=3-M+1 ThenA(M,N) =1ElseA(M,N) =0End IfNext NNext MFor M=1 To 3For N=1 To 3Print A(M,N)Next NPrintNext MA．1 0 0 0 1 0 0 0 0B．1 1 1 1 1 1 1 1 1C．0 0 0 0 0 0 0 0 0D． 1 0 1 0 1 0 1 0 1
考题
假定有下面的程序段： For i＝1 To 3 For j＝1 To i For k＝j To 3 Print"i=";i,"j＝";j,"k＝";k Next k Next j Next i 这是一个三重循环程序，在这个程序中，外层、中层和内层循环的循环次数是A．3、6和14B．3、8和16C．3、4和12D．3、9和18
考题
下列程序段的执行结果是( )。Dim A(3,3)For M=1 To 3For N=1 To 3If N=M Or N=3-M+1 ThenA(M,N)=1ElseA(N,N)=0End IfNext NNext MFor M=1 To 3For N=1 To 3Print A(M,N)Next NPrintNext MA．1 0 0 0 1 0 0 0 1B．1 1 1 1 1 1 1 1 1C．0 0 0 0 0 0 0 0 0D．1 0 1 0 1 0 1 0 1
考题
下列程序段的执行结果为 Dim A(3,3) For M=1 To 3 For N=1 To 3 If N=M Or N=3-M+1 Then A(M,N)=1 Else A(M,N)=0 End If Next N Next M For M=1 To 3 For N=1 To 3 Print A(M,N) Next N Print Next MA．1 0 0 0 1 0 0 0 0B．1 1 1 1 1 1 1 1 1C．0 0 0 0 0 0 0 0 0D．1 0 1 0 1 0 1 0 1
考题
单击命令按钮后，下列程序代码的执行结果是______。Public Sub fun (a As Integer, b As Integer, c As Integer)Doa=b+ cn=n+1Loop While n ＞ 3End SubPrivate Sub command1_ click()Dim m As Integer, n As Integer, i As IntegerFor i = 0 To 2: m = n + 1: Next iFor i = 1 To 2: Call fun (m, n, i): Next iFor i = 0 To 3Print m;Next iEnd Sub
考题
以下程序段的执行结果是 ______。 Dim A(3, 3) For m = 1 To 3 For n = 1 To 3 If n = m Or n = 3 - m + 1 Then A(m, n) =m + n Else A(m, n) = 0 End If Next n Next m For m = 1 To 3 For n = 1 To 3 Print A(m, n); Next n Print Next mA． 1 1 1 1 1 1 1 1 1B．2 0 4 0 4 0 4 0 6C．0 0 0 0 0 0 0 0 0D．1 0 1 0 1 0 1 0 1
考题
在窗体上画1个命令按钮，并编写如下事件过程： Private Sub Command1 Click（ ） Dim a(3，3) For m=1 To 3 For n=1 To 3 If n=m or n=4—m Then a(m．n)=m+n Else a(m，n)=0 End If Print a(m，n)； Next n Print Next m End Sub 运行程序，单击命令按钮，窗体上显示的内容为（ ）。A.2 0 0 0 4 0 0 0 6B.2 0 4 0 4 0 4 0 6C.2 3 0 3 4 0 0 0 6D.2 0 0 0 4 5 0 5 6
考题
下面程序运行时，若输入“Visual Basic Prograrmming”，则在窗体上输出的是（ ）。Private Sub Command1Click（ ） Dim cout(25)As Integer，ch As String ch=Ucase(Int,utBox("请输入字母字符串")) For k=1 To i en(ch)． n=ASC(Mid(ch，k，1))-Asc("A") If n=0 Then count(n)=count(n)+1 End If Next k m=count(0) For k=1 To 25 If mcount(k)Then m=count(k) End If Next k Print m End SubA.0B.1C.2D.3
考题
以下程序的作用是生成一个如下图的矩阵，该程序不完整，请补充完改程序。Private Sub Command1_Click()Dim A(3，3)For M=1 To 3For N=1 To 3If N=M Or【 】ThenA(M，N)=1Else【 】=0End IfNext NNext MFor M=1 To 3For N=1 To 3Print A(M，N)；Next NPrintNext MEnd Sub
考题
（ 14 ）下面 VBA 程序段运行时，内层循环的循环总次数是 【 14 】 。For m = 0 To 7 step 3For n = m -1 To m+1Next nNext m
考题
单选题下面程序段中循环语句的循环次数是（）。 For x=10 To 1 Step -3 Write（x） Next xA
0B
4C
5D
10
热门标签
最新试卷