Private Sub Commandl_Click()
Textl．Text=“程序设计”
nxt1．SetFocus
E．nd Sub
Private Sub Textl_GotFocus()
Textl．Text=”等级考试”
E．nd Sub
运行以上程序，单击命令按钮后
A．文本框中显示的是“程序设计”，且焦点在文本框中
B．文本框中显示的是“等级考试”，且焦点在文本框中
C．文本框中显示的是“程序设计”，且焦点在命令按钮上
D．文本框中显示的是“等级考试”，且焦点在命令按钮上
[单选题]在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：Private Sub Commandl_Click()D．im i As Integer，n As IntegerF．or i=0 T0 50i=i+3n=n+1If i>10 Then Exit ForNextTextl．Text=Str(n)E．nd Sub程序运行后，单击命令按钮，在文本框中显示的值是A．2B．3C．4D．5
[单选题]设在窗体上有一个名称为Commandl的命令按扭和一个名称为Textl的文本框。要求单击Commandl按钮时可把光标移到文本框中。下面正确的事件过程是。 A．Private Sub Commandl_Click B．Private Sub Commandl_Click Textl．GotFocus Commandl．GotFocus End Sub End Sub C．Private Sub Commandl_Click D．Private Sub Commandl_Click Textl．S
[单选题]窗体上有名称分别为Textl、Text2的2个文本框，要求文本框Textl中输入的数据小于500，文本框Text2中输入的数据小于1000，否则重新输入。为了实现上述功能，在下 划线处应填入的内容是( )。 Private Sub Textl_ostFocus() Call Checklnput(Textl,500) End Sub Private Sub Text2_LostFocus() Call Checklnput(Text2,1000)A．TextB．SelTextC．ControlD
[单选题]窗体上有1个名称为Textl的文本框；1个名称为Timerl的计时器控件，其Interval属性值为5000，Enabled属性值是True。Timerl的事件过程如下：Private Sub Timerl Tliner()Static flag As IntegerIfflag=0 Then flag=1flag=-flagIfflag=1 ThenTextl．ForeColor=&HFF& &HFF&为红色E．lseTextl．ForeColor=&H
[单选题]窗体上有一个名称为Text1的文本框和—个名称为Command1的命令按钮。要求程序运行时，单击命令按钮，就可把文本框中的内容写到文件out.txt中，每次写入的内容附加到原有内容之后。下面能够正确实现上述功能的程序是______。A．Private Sub Command1_Click() Open "out.txt" For Input As#1 Print #1,Text1.Text Close #1 End SubB．Private Sub Command1_Click() Open
[单选题]窗体上有1个名称为Text1的文本框和1个名称为Command1的命令按钮。要求程序运行时，单击命令按钮，就可以把文本框中的内容写到文件out.txt中，每次写入的内容附加到文件原有内容之后。下面能够实现上述功能的程序是（ ）。A．Private Sub Command1_Click（）Open “out.txt” For Inpit As#1Print#1,Text1.TextC．lose#1E．nd SubB．Private Sub Command1_Click（）Open “out.txt
[单选题]窗体上有一个名称为Text1的文本框，一个名称为Command1的命令按钮。窗体文件的程序 如下： Private Type x a As Integer b As Integer End Type Private Sub Command1_Click() Dim y As x y.a=InputBox("") If y.a/2=y.a/2 Then y.b=y.a * y.a Else y.b=Fix(y.a/2) End If Text1.Text=y.b End Sub 对以上程序，下
[试题]设窗体上有一个名称为CDl的通用对话框、一个名称为Textl的文本框和一个名称为Commandl的命令按钮。程序执行时，单击Commandl按钮，则显示打开文件对话框，操作者从中选择一个文本文件，并单击对话框上的“打开”按钮后，则可打开该文字文件，并读人一行文本，显示在Textl中。下面是实现此功能的事件过程，请填空。 Private Sub Command1_Click CD1.Filter=“文本文件|*.txt|Word文档|*.doc” CDl.FilterIndex=1：CD1.Show
[单选题]在窗体上有—个名称为Text1的文本框和一个名称为Command1的命令按钮，要求在程序执行时，每单击命令按钮—次，文本框向右移动—定的距离。下面能够正确实现上述功能的程序是 ______。A．Private Sub Command1_Click() Text1.Left=100 End SubB．Private Sub Command1_Click() Text1.Left=Text1.Left-100 End SubC．Private Sub Command1_Click() Text1.M
[单选题]窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮，要求程序运行时，单击命令按钮(如图1所示)，就可以把文本框中的内容写到文件Out．txt中，每次写 入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是（ ）。