题目内容
（请给出正确答案）
在窗体上画三个命令按钮，其名称分别为Command1、Command2和Command3，然后编写如下事件过程： Private Sub Command1 Click() Command2.Enabled = False Command3.Visible = False End Sub程序运行后，单击命令按钮Command1，则执行的操作是______。
A．命令按钮Command2和Command3禁用
B．命令按钮Command2和Command3隐藏
C．命令按钮Command2隐藏，Command3禁用
D．命令按钮Command2禁用，Command3隐藏
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
更多“在窗体上画三个命令按钮，其名称分别为Command1、Command2和Command3，然后编写如下事件过程：Privat”相关的问题
在窗体上画一个文本框，名称为Text1(可显示多行)，然后再画三个命令按钮，名称分别为Commandl、Command2和Command3，标题分别为“读数”、“统计”和“存盘”，如图8所示。程序的其功能是：单击“读数”按钮，则把考生目录下的in5．txt文件中的所有英文字符放入Text1 (可多行显示)；单击“统计”按钮，找出并统计英文字母i、i、k、l、m、n(不区分大小写)各自出现的次数；单击“存盘”按钮，将字母i～n出现次数的统计结果依次存到考生目录下的顺序文件out5．txt中。 注意：存盘时必须存放在考生文件夹下，工程文件名为sit5．vbp，窗体文件名为sjt5．frm。
在窗体上画1个命令按钮和1个文本框，其名称分别为Commandl和Textl，然后编写如下代码：
Dim Save All As String
Private Sub Commandl_C1iCk()
Text1.Text=Left(UCase(SaveAU)，4)
End Sub
Private Sub Textl_KeyPress(KeyAscii As Intege)
SaveA11=Save All+Chr(KeyAscii)
End Sub
程序
在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，然后编写如下代码：
Dim SaveAll As String
Private Sub Command1_Click（）
Text1.Text=Left（UCase（SaveAll），4）
End Sub
Private Sub Text1_KeyPress（KeyAscii As Integer）
SaveAll=SaveAll+Chr（KeyAscii）
End Sub
程序运行后，在文本框中输入abcdefg，单击命令按钮，则文本框中显示的内容是______。
在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Labell，然后编写如下事件过程： Private Sub Command1_Click() Counter＝0 For i=1 To 4 For j＝6 To 1 Step -2 Counter=Counter+1 Next j Next i Labell.Captidn=Str(Counter) End Sub 程序运行后，单击命令按钮，标签中显示的内容是______。
A．11
B．12
C．16
D．20
在窗体上画一个命令按钮和一个标签，其名称分别为Commandl和Labell，然后编写如下事件过程： Private Sub Commandl_Click() Counter=0 Fori=1T04 Forj=6 To 1 Step-2 Counter=Counter+1 Nextj Nexti Labell.Caption=Str(Counter) End Sub 程序运行后，单击命令按钮，标签中显示的内容是
A．11
B．12
C．16
D．20
（6）在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为 Text1、Label1 和 Command1，然
后编写如下两个事件过程：
Private Sub Command1_Click()
S$=InputBox("请输入一个字符串")
Text1.Text=S$
End Sub
Private Sub Text1_Change()
Label1.Caption=UCase(Mid(Text1.Text, 7))
End Sub
程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入字符串“VisualBasic”，
则在标签中显示的内容是 【6】 。
在窗体上画一个命令按钮和一个标签，其名称分别为Commandl和Label1，然后编写如下事件过程：
Private Sub Command1_Click()
Counter=0
For i=1 T0 4
For j=6 T0 1 Step -2
Counter=Counter+1
Next j
Next i
Label1.Caption=Str(Counter)
End Sub
程序运行后，单击命令按钮，标签中显示的内容是______。
在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写如下程序： Private Sub func(L As Label,ByVal a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form_Load() Label1.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Label1，A)Label2.Caption=a End Sub 程序运行后，单击命令按钮，在两个标签Label1和Label2中显示的内容分别是： ______。
A．ABCD和10
B．1234和100
C．ABCD和100
D．1234和10
在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Labell，然后编写如下事件过程： Private Sub Command1_Click() Counter=0 For i=1 To 4 For j=8 To 1 Step-2 Counter=Counter+1 Next i Next i Labell.Caption=Str(Counter) End Sub 程序运行后，单击命令按钮，标签中显示的内容是
A．11
B．12
C．16
D．20
警告：系统检测到您的账号存在安全风险
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
