题目内容
（请给出正确答案）
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编如下事件过程：
Private Sub Command1_Click()
Dim i As Integer, n As Integer
n=0
For i=0 To 50
i=i+3
n=n+1
If i＞10 Then Exit For
Next i
Text1.Text=Str(n)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是______。
如搜索结果不匹配，请 联系老师 获取答案
更多“在窗体上画一个名称为Text1的文本框和一个名称为Comma…”相关的问题
第1题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Text1.Text="Visual" Me.Text1="Basic" Text1="Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是()。
A．Visual
B．Basic
C．Program
D．出错
第2题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写 如下事件过程： Private Sub Command1_Click() Text1.Text ="Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是
A．Visual
B．Basic
C．Program
D．出错
第4题
A.75
B.23
C.57
D.32
第5题
设有如下通用过程：
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：
End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（）。
A.30
B.25
C.20
D.15
第8题
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后如果在文本框中输入文本，则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是（）。
A.Private Sub Text1 Change（）
Label1．Caption=Text1．Text
End Sub
B.Private Sub Label1 Change（）
Label1．Caption=Text1．Text
End Sub
C.Private Sub Text1 Click（）
Label1．Capnon=Text1．text
End Sub
D.Private Sub Label1 Click（）
Label1．Caption=Text1．Text
End sot
第9题
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后如果在文本框中输入文本，则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是（）。
A.Private Sub Text1 Change（） Label1．Caption=Text1．Text End Sub
B.Private Sub Label1 Change（） Label1．Caption=Text1．Text End Sub
C.Private Sub Text1 Click（） Label1．Capnon=Text1．text End Sub
D.Private Sub Label1 Click（） Label1．Caption=Text1．Text End sot
第10题
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Labe11)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。下列可以实现上述操作的事件过程是（）。
A.Private Sub Text1 Change（） Labe11．Caption=Str(Len(Text1．Text)) End Sub
B.Private Sub Text1 Click（） Labe11．Caption=str(Len(Text1．Text)) End Sub
C.Private Sub Text1 Change（） Labe11．Caption=Text1．Text End Sub
D.Private Sub Labe1 1_Change（） Labe11．Caption=Str(Len(Text1．Text)) End Sub
第11题
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请在【 】处填入适当的内容，将程序补充完整。 Private Sub Form_Load() Command1.Enabled=False End Sub Private Sub Text1【 】() Command1.Enabled=True End Sub
为了保护您的账号安全，请在“上学吧”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
微信搜一搜
上学吧
微信搜一搜
上学吧
