（ 7 ） 在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框 。 程序运行后 ， Command 1为禁用（灰色），此时如果在文本框中输入字符，则命令按钮 Command1 变为可用。请填空。

Private Sub Form_Load()

C．ommand1.Enabled = False

E．nd Sub

Private Sub Text1_ ( 7 ) ()

C．ommand1.Enabled = True

E．nd Sub

[单选题]（ 13 ）设在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框。要求单击 Command 1按钮时可把光标移到文本框中。下面正确的事件过程是A． ） Private Sub Command1_Click()Text1.GotFocusE．nd SubB． ） Private SubC．ommand1.GotFocusE．ndSubC． ） Private Sub Command1_Click()Text1.SetFocusE．nd SubD． ） Privat

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

[单选题]在窗体上画一个名称为Command1的命令按钮，一个名称为Label1、Label2、Label3的标签，然后编写如下的事件过程：Private x As Integer Private Sub Command1_Click()Static y As IntegerDim z As Integern = 10z = n + zy = y + zx = x + zLabel1.Caption = xLabel2.Caption = yLabel3.Caption = z End Sub运行程序后，

[单选题]在窗体中添加一个名称为Command1的命令按钮、一个名称为Label1的标签，编写如下代码： Option Base 1 Private Sub Command1_Click( ) a=Array(23，34，25，46，35) ┊ End Sub 过程的功能是求数组a中是奇数的元素的个数，并把结果显示在标签中。为实现此功能，省略号处的程序段应该是A．For i=0 T0 4 If a(i)Mod 2＜>0 Then b=b+1 End lf Next i Label1.Caption=

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

[单选题]在窗体中添加一个命令按钮，名称为Command1；添加一个文本框，名称为Text1，然后编写如下程序： Private Sub Commandl Click() Dim a(5)， b(5) For j = 1 To 4 a(j) = 3 ( j b(j) = a(j) ( 3 Next j Text1.Text = b(j/2) End Sub 程序运行后，单击命令按钮，在文本框中显示A．25B．18C．36D．35

[主观题]在窗体上有一个命令按钮，其名称为Command1。要实现程序运行后，单击命令按钮，如果在输入对话框里分别输入12和4，编写如下事件过程：Private Sub Command1_Click()A．=InputBox("被除数")B．=InputBox("除数")Print A；"÷"；B；"="；A / BE．nd Sub则窗体中显示的内容是______。

[单选题]设在窗体上有一个名称为Command1的命令按钮，并有以下事件过程： Private Sub Commandl Click() StatiC b As Variant b=Array(1，3，5，7，9) ... End Sub 此过程的功能是把数组b中的5个数逆序存放(即排列为9，7，5，3，1)。为实现此功能，省略号处的程序段应该是A．For i=0 To 5-1/2 tmp=b(i) b(i)=b(5-i-1) b(5-i-1)=tmp NextB．For i=0 To 5 tmp=b(i

[单选题]设在窗体上有一个名称为Command1的命令按钮，并有以下事件过程： Private Sub Command1_Click() Static b As Variant b=Array(1,3,5,7,9) End Sub 此过程的功能是把数组b中的5个数逆序存放(即排列为9，7，5，3，1)。为实现此功能，省略号处的程序段应该是( )。A．For i=0 To 5-1/2 tmp=b(i) b(i)=b(5-i-1) b(5-i-1)=tmp NextB．For i=0 To 5 tmp=b(i