（ 19 ）窗体上有名称为 Command1 的命令按钮和名称为 Text1 的文本框

Private Sub Command1_Click()

Text1.Text= ” 程序设计 ”

Text1.SetFocus

E．nd Sub

Private Sub Text1_GotFocus()

Text1.Text= ” 等级考试 ”

E．nd Sub

运行以上程序，单击命令按钮后

A． ）文本框中显示的是 “ 程序设计 ” ，且焦点在文本框中

B． ）文本框中显示的是 “ 等级考试 ” ，且焦点在文本框中

C． ）文本框中显示的是 “ 程序设计 ” ，且焦点在命令按钮上

D． ）文本框中显示的是 “ 等级考试 ” ，且焦点在命令按钮上

[试题]（ 9 ） 窗体上有名称为 Command1 的命令按钮及名称为 Text1 、 能显示多行文本的文本框 。 程序运行后 ，如果单击命令按钮，则可打开磁盘文件 c:/test.txt ，并将文件中的内容（多行文本）显示在文本框中。下面是实现此功能的程序，请填空。Private Sub Command1_Click()Text1= ””Number=FreeFileOpen “ c:/test.txt ” For Input As NumberD．o While Not Eof( ( 14 ) )L

[单选题]窗体上有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的命令按钮。要求程序运行时，单击命令按钮，就可把文本框中的内容写到文件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

[试题]在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框。程序运行后， Command1 为禁用（灰色），此时如果在文本框中输入字符，则命令按钮 Command1 变为可用。请填空。Private Sub Form_Load（）C．ommand1 Enabled=FalseE．nd SubPrivate Sub Text1_ ________ （）C．ommand1 Enabled=TrueE．nd Sub

[单选题]窗体上有一个名称为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 对以上程序，下

[单选题]在窗体上有—个名称为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

[单选题]在窗体上画1个命令按钮（名称为Command1）和1个文本框（名称为Text1），然后编写如下事件过程：Private Sub Command1_Click（）x=Val（Text1.Text）Select Case xC．ase 1，3y=x*xC．ase Is>=10，Is<=-10y=xC．ase -10 To 10y=-xE．nd SelectE．nd Sub程序运行后，在文本框中输入3，然后单击命令按钮，则以下叙述中正确的是（ ）。A．执行y=x*xB．执行y=-xC．先执

[单选题]窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮，要求程序运行时，单击命令按钮(如图1所示)，就可以把文本框中的内容写到文件Out．txt中，每次写 入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是（ ）。

[单选题]在窗体上有一个文件名称为Text1的文本框和1个名称为Command1的命令按钮，要求在程序执行时，每单击命令按钮一次，文本框向右移动一定距离。下面能够正确实现上述功能的程序是（ ）。A．Private Sub Command1_Click（）Text1.Left=100E．nd SubB．Private Sub Command1_Click（）Text1.Left= Text1.Left-100E．nd SubC．Private Sub Command1_Click（）Text1.Move.T

[试题]在窗体上画1个名称为Command1的命令按钮和2个名称分别为Text1、Text2的文本框，如图所示，然后编写如下程序：F．unction Fun（x As Integer,ByVal y As Integer）As Integerx=x+yIf x<0 ThenF．un=xE．lseF．un=yE．nd IfE．nd FunctionPrivate Sub Command1_Click（）D．im a As Integer,b As Integera=-10：b=5Text1.Text=