题目内容
（请给出正确答案）
在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Commandl_C1ick() Dim i As Integer, n As Integer For i=0 To 50 i=i+3 n=n+1 If i＞10 Then Exit For Next Textl. Text=Str(n) End sub 程序运行后，单击命令按钮，在文本框中显示的值是 ()
A．2
B．3
C．4
D．5
安装简答题APP，拍照搜题省时又省心！
更多“在窗体上画一个名称为Textl的文本框和一个名称为Comma…”相关的问题
在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：
Private Sub Commandl_Click()
Dim i As Integer，n As Integer
For i=0 T0 50
i=i+3
n=n+1
If i＞10 Then Exit For
Next
Textl．Text=Str(n)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是
A．2
B．3
C．4
D．5
在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Dim arrayl(10，10)As Integer Dim i，j As Integer For i=1 To 3 For j=2 To 4 arrayl(i,j)：i＋j Next j Next i Textl．Text=arrayl(2，3)+arrayl(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是()。
A．12
B．13
C．14
D．15
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjtl．vbp，窗体文件名保存为sjtl．frm。
A．Textl.Clear
B．Textl.Locked=True
C．Textl.Visible=False
D．Textl.Enabled=Trve
设有如下通用过程：
Public Function Fun（xStr As String）
Dim tStr As String, srtL As Integer
tStr+" "
strL=Len（xStr）
i=1
Do While i ＜=strL/2
tStr=tStr &Mid（xStr,i ,1）& Mid （xStr ,strL-i+1,1）
i=i+1
Loop
Fun=tStr
End Function
在窗体上画一个名称为 Textl 的文本框和一个名称为 Command1 的命令按钮，然后编写如下的事件过程：
Private Sub Command 1_ Click（）
Dim S1 As String
S1="abcdef"
Text1.Text=UCase（Fun（S1））
End Sub
程序运行后，单击命令按钮，则Text1中显示的是（）。 A．ABCDEF
B．abcdef
C．AFBECD
D．DEFABC
设有下列通用过程： Public Function Fun(xStr As String)As String Dim tStr As String，strL As Integer tStr="" strL=Len(xStr) i=strL／2 DO While i＜=StrL tStr=tStr＆Mid(xStr，i+1，1) i=i+1 Loop Fun=tStr＆tStr End Function 在窗体上画一个名称为Textl的文本框和一个名称为Command1的命令按钮。然后编写下列的事件过程： Private Sub Commandl Click（） Dim S1 As String S1="ABCDEF" Text1．Text=LCase(Fun(S1)) End Sub 程序运行后，单击命令按钮，文本框中显示的是（）。
A.ABCDEF
B.abedef
C.defdef
D.defabc
在窗体上画两个文本框(其名称分别为Textl和Text2)和一个命令按钮(其名称为 Command1)，然后编写如下两个事件过程： Private Sub Command1_Click() Text1.Text="Microsoft Visual Basic" End Sub Private Sub Text1_Change() TextText=UCase(Text1.Text) End Sub 程序运行后，单击命令按钮，则在Text2文本框中显示的内容是
A．Microsoft Visual Basic
B．microsoft visual basic
C．MICROSOFT VISUAL BASIC
D．空字符串
在窗体上画一个文本框(Textl)，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(Ucase(char)) Print String(4，KeyAscii) End Sub 程序运行后，在文本框Text1中输入A，则程序在窗体上的输出结果为
A．a
B．A
C．aaaa
D．AAAA
A.A.执行Forml中的语句：Forml.Textl=Form2.Textl
B.B.执行Forml中的语句：Textl=Forml.Text
C.C.执行Form2中的语句：Forml.Textl=Textl
D.D.执行Form2中的语句：Textl=Forml.Textl
A．25
B．18
C．36
D．35
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
微信搜一搜
简答题
微信搜一搜
简答题
如搜索结果不匹配，请 
