题目内容
（请给出正确答案）
在窗体上添加—个文本框，名为Text1，然后编写如下的Load事件过程，则程序的运行结果是 Private Sub Form_Load() Text1.Text=”” Text1.Setfocus t=1 For k=10 To 6 Step-2 t=t*k Next k Text1.Text=t End Sub
A．在文本框中显示120
B．文本框仍为空
C．在文本框中显示480
D．出错
如果结果不匹配，请 联系老师 获取答案
更多“在窗体上添加—个文本框，名为Text1，然后编写如下的Loa…”相关的问题
在窗体上添加一个命令按钮(名为Conunand1)和一个文本框(名为Text1)，并在命令按钮中编写如下事件代码： Private Sub Command1_Click() m=2170 n=Len (Str$ (m) +Space (5)) Me! Text1=n End Sub打开窗体运行后，单击命令按钮，在文本框中显示()。
A．5
B．8
C．9
D．10
在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，并在命令按钮中编写如下事件代码： Private Sub Command1_Click m=2.17 n=Len(Str$(m．+Space(5)． Me!Text1=n End Sub 打开窗体运行后，单击命令按钮，在文本框中显示
A.5
B.8
C.9
D.10
在窗体上添加一个文本框，名为text1，然后编写如下的load事件过程，则程序的运行结果是______ 。 private sub form_ load text1.text=“” text1.setfocus for k=1 to 5 t=t*k next k text1.text=t end sub
A． 在文本框中显示120
B．文本框中仍为空
C．在文本框中显示1
D．出错
在窗体上添加一个命令按钮(名为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
A.21
B.42
C.54
D.72
在窗体上添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，并在命令按钮中编写如下事件代码：PrivateSubCommandlClick()m=17n=Len(Str$(m)+Sp2ace(5))Me!Text1=nEndSub打开窗体运行后，单击命令按钮，在文本框中显示______。
A．5
B．8
C．9
D．10
.jpg)
注意：
程序中不能使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise68.vbp，窗体文件名为execise68.frm。
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Text1)，然后编写如下事件过程：
Private Sub Command1_Click()
Dim x As Integer，y As Integer，z As Integer
x=5：y=7：z=0
Me!Text1=””
Call p1(x,y,z)
Me!Text1=z
End Sub
Sub p1(a As Integer，b As Integer，c As Integer)
c=a+b
End Sub
打开窗体运行后，单击命令按钮，文本框中，显示的内容是【 】。
Private Sub Command1_Click（）
Dim k As Integer
Dim sum As Single, max As Single, min As Single
sum = Text1（0）
max = Text1（0）
min = ______
For k = ______ To 6
If max ＜ Text1（k） Then
max = Text1（k）
End If
If min ＞ Text1（k） Then
min = Text1（k）
End If
sum = sum + Text1（k）
Next k
Text2 = （______） / 5
在名为Form1的窗体上绘制两个文本框，名称分别为Text1和Text2(如下图所示)，初始情况下都没有内容。请编写适当的事件过程，使得程序在运行时，在Text1中输入的任何字符，立即显示在Text2中。
.jpg)
注意：
程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为execise7/vbp，窗体文件名为execise7.frm。
