某人设计了如下程序用来计算并输出7!(7的阶乘)Private Sub Command1 Click（ ）t=0For k=7 To 2 Step-1t=t*kNextPrint tEnd Sub执行程序时，发现结果是错误的，下面的修改方案中能够得到正确结果的是（ ）。A.把t=0改为t=1B.把For k=7 To 2 Step-1改为For k=7 T0 1 Step-1C.把For k=7 To 2 Step-1改为For k=1 T0 7D.把Next改为Next k
某人设计了如下程序用来计算并输出7!(7的阶乘)
Private Sub Command1 Click（ ）
t=0
For k=7 To 2 Step-1
t=t*k
Next
Print t
End Sub
执行程序时，发现结果是错误的，下面的修改方案中能够得到正确结果的是（ ）。
A.把t=0改为t=1
B.把For k=7 To 2 Step-1改为For k=7 T0 1 Step-1
C.把For k=7 To 2 Step-1改为For k=1 T0 7
D.把Next改为Next k
相关考题：
（7）在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过程：Private Sub Command1_Click( )a$="National Computer Rank Examination"n=Len(a$)s=0For i=1 To nb$=Mid(a$, i, 1)If b$="n" Thens=s+1End IfNext iPrint sEnd Sub程序运行后，单击命令按钮，输出结果是 【7】 。
下列程序是用来计算1+2+3……+10的程序段，请补充该程序。Dim i, s, k As Integers =0: k = 0For【 】To 1k=k+1s=s+ kNext iPrint s
某人设计了如下程序用来计算并输出7!(7的阶乘)Private Sub Command1 Click（ ） t=0 For k=7 To 2 Step-1 t=t*k Next Print t End Sub 执行程序时，发现结果是错误的，下面的修改方案中能够得到正确结果的是（ ）。A.把t=0改为t=1B.把For k=7 To 2 Step-1改为For k=7 T0 1 Step-1C.把For k=7 To 2 Step-1改为For k=1 T0 7D.把Next改为Next k
某人设计了如下程序用于计算并输出7!(7的阶乘)： Private Sub Command1_Click t = 0 For k = 7 To 2 Step -1 t = t * k Next Print t End Sub 执行程序时，发现结果是错误的。下面的修改方案中能够得到正确结果的是。 A．把t=0改为t=1 B．把For k=7 TO 2 Step -1改为For k=7 TO 1 Step -1 C．把For k=7 TO 2 Step -1改为For k=1 TO 7 D．把Next改为Next k
在窗体上画一个名为Command1的命令按钮，然后编写以下程序：Private Sub Command1 Click（ ） Dim a(10)As Integer Fork=10 To 1 Step-1 a(k)=20-2*k Next k k=k+7 Print a(k-a(k)) End Sub 运行程序，单击命令按钮，输出结果是（ ）。A.18B.12C.8D.6
某人设计了下列程序用于计算并输出5!(5的阶乘):Private Sub Command1_Click()t=0For k=5 To 2 Step -1t=t*kNext kPrint tEnd Sub执行程序时,发现结果是错误的。下列修改方案中能够得到正确结果的是_______A. 把t=0改为t=1B. 把For k=5 To 2 Step -1改为For k=5 To 1 Step -1C. 把For k=5 To 2 Step -1改为For k=1 To 5D. 把Next改为Next t
阅读下列FORTAN程序：INTEGER X(7)DATA X/4,5,7,8,10,12,11/DO 10 K=l，7IF(MOD(X(K)，2)NE. 0)THEN S=S+X(K)N=N+1 END IF 10 CONTINUE T=S/NWRITE(*，20)S，T 20 FORMAT(2X，3F6.1)END程序运行后的输出结果是：A. 23.0 7.7B. 47. 0 6.7C. 34. 0 8.5D. 57. 0 11.4
某人设计了下列程序用于计算并输出7!（7的阶乘），执行程序时，发现结果是错误的。下列修改方案中能够得到正确结果的是______。 Dim t%, k% t = 0 For k = 7 To 2 Step -1 t = t * k Next Msgbox（t)A．把 t=0 改为 t=1B．把 For k=7 To 2 Step -1 改为 For k=7 To 1 Step -1C．把 For k=7 To 2 Step -1 改为 For k=1 To 7D．把 Next 改为 Next k
在窗体上画一个名为Command1的 命令按钮,然后编写以下程序 Private Sub Command1_Click（) Dim a（10) as integer For k=10 to 1 Step -1 a（k)=20-2*k Next k k=k+7 Print a（k-a（k)) End Sub 运行程序后,单击命令按钮,输出结果是 。A．18B．12C．8D．6