单项选择题

在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，则执行如下事件过程后，文本框中的输出为______。private Sub Command1_ click() for i = 1 To 4 for j = 1 To 3 x = 3 for K = 1 To 2 x=x+3 Next K Next j Next i Text1.Text= Str(x)End Sub

A．3
B．6
C．9
D．12
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Command1的命令按钮和一个名称为Tcxt1的文本框，然后编写如下程序：Private Sub Command1_ Click Dim x, y, z As Integer x = 5: y = 7: z =0 Text1. Text = Call p1(x, y, z) Text1.Text = Str (z)End SubPrivate Sub p1(ByVal a As Integer, ByVal b As Integer, c As Integer) c = a+ bEnd Sub程序运行后，如果单击命令按钮，则在文本框中显示的内容是______。
A．0
B．12
C．Str(
D．没有显示
单项选择题
有如下的一个函数过程：Function fn(ByVal num As Long) Dim k As Long k= 1 num = Abs(num) do while num k = k * (num Mod 10) num= num 10 Loop fn=kEnd Function 以下是一个调用该函数的事件过程，在运行该程序后，在输入对话框中输入数字123，该过程的运行结果是 ______。Private Sub Command1_Click() Dim n As Long Dim r As Long n = CLng(n) r = fn(n) Print rEnd Sub
A．12
B．6
C．3
D．1
相关试题