在窗体上画一一个名称为Text1的文本框，然后画一个名称为Hscroll1的滚动条，其Min和Max属性分别为0和1 000。程序运行后，如果移动滑块，则在文本框中显示滚动条的当前值。以下能实现上述操作的程序是（ ）。

[单选题]在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图所示。 以下能实现上述操作的程序段是（ ）。A．Private Sub Hscroll1_Change（）Text1.Text=HScroll1.ValueE．nd SubB．Private Sub Hscroll1_Click（）Text1.Text=HScroll1.ValueE．nd SubC．Private

[单选题]在窗体上画一个名称为Text1的文本框．然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图16-6所示。 以下能实现上述操作的程序段是______。A．Private Sub HScroll1_Change() Text1.Text=HScroll1. Value End SubB．Private Sub HScroll1_Click() Text1. Text=HScroll1. Value End

[单选题]在窗体(名称为Forml)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是______。A． Private Sub Text1_Change() Commandl.Caption="计算机等级考试" End SubB．Private Sub Commandl_Click() Caption=”计算机等级考试” End SubC．Pr

[单选题]（ 19 ）在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()D．im i As Integer, n As IntegerF．or i = 0 To 50i = i + 3n = n + 1If i > 10 Then Exit ForNextText1.Text = Str(n)E．nd Sub程序运行后，单击命令按钮，在文本框中显示的值是A． ） 5B． ） 4C． ）

[单选题]在窗体上画一个名称为Text1的文体框，然后画一个名称为HScrolll的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图所示。以下能实现上述操作的程序段是A．Private Sub Hscroll1_Change( ) Text1．Text=Hscroll1．Value End SubB．Private Sub Hscroll1_Click( ) Text1．Text=Hscroll1．Value End SubC．Private

[单选题]（ 15 ）在窗体上画一个文本框（名称为 text1 ）和一个标签（名称为 label1 ） , 程序运行后，在文本框中每输入一个字符 ， 都会立即在标签中显示文本框中字符的个数 ， 以下可以实现实现上述操作的事件过程是A． ）Private Sub Text1_Change()Label1.Caption = Str(Len(Text1.Text))E．nd SubB． ）Private Sub Text1_Click()Label1.Caption = Str(Len(Text1.Text)

[单选题]在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是（ ）。A．Private Sub Text1_Change（）C．ommand1.Caption = "计算机等级考试"E．nd SubB．Private Sub Command1_ Click （）C．aption = "计算机等级考试"E．nd Sub

[单选题]在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是______。A．Prlvate Sub Text1_Change() Command1. Caption="计算机等级考试" End SubB．Private Sub Command1_Click() Caption="计算机等级考试" End SubC．

[试题]（12）在窗体上画一个文本框，名称为 Text1，然后编写如下程序：Private Sub Form_Load( )Open "d:/temp/dat.txt" For Output As #1Text1.Text=""E．nd SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii=13 ThenIf UCase(Text1.Text)= (14) ThenC．lose #1E．ndE．lseWrite #1, (15)

[单选题]（27）在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click( )D．im i As Integer, n As IntegerF．or i=0 To 50i=i+3n=n+1If i>10 Then Exit ForNextText1.Text=Str(n)E．nd Sub程序运行后，单击命令按钮，在文本框中显示的值是（ ）。A．）2B．）3C．）4D．）5