程序运行后，“数值”结果为() 。

下面的框图程序执行后，数值显示为何值？

A、1

B、0

C、数值不确定

D、2

窗体上有名称为Text1、Text2的两个文本框，和一个由3个单选按钮构成的控件数组Option1，如图1所示。程序运行后，如果单击某个单选按钮，则执行Text1中数值与该单选按钮所对应的运算(乘1、乘10或乘100)，并将结果显示在Text2中，如图 2所示。为了实现上述功能，在程序中的横线处应填入的内容是( )。

Private Sub Option1_Click(Index As Integer)

If Text1.Text＜＞""Then

Select Case______

Case 0

Text2.Text=Text1.Text

Case 1

Text2.Text=Text1.Text*10

Case 2

Text2.Text=Text1.Text*100

End Setect

End If

End Sub

A．Opfion1.Index

B．Index

C．Opfion1.(Index)

D．Opfion1(Index).Value

窗体上有名称为Text1、Text2的两个文本框，和一个由3个单选按钮构成的控件数组Opfion1，如图1所示。程序运行后，如果单击某个单选按钮，则执行Text1中数值与该单选按钮所对应的运算(乘1、乘10或乘100)，并将结果显示在Text2中，如图2所示。为了实现上述功能，在程序中的横线处应填入的内容是( )。 Private Sub Option1_Click(Index As Integer) If Text1.Text ＜＞ "" Then Select Case______ Case 0 Text2.Text=Text1.Text Case 1 Text2.Text=Text1.Text*10 Case 2 Text2.Text=Text1.Text*100 End Select End If End Sub

A．Option1.Index

B．Index

C．Option1(index)

D．Option1(index).Value

窗体上有名称为Arrl、Arr2的两个文本框，和一个由3个单选按钮构成的控件数组Optionl,如图1所示。程序运行后，如果单击某个单选按钮，则执行Textl中数值与该单选按钮所对应的运算（乘1、乘10或乘100），并将结果显示在Text2中，如图2所示。为了实现上述功能，在程序中的横线处应填入的内容是rivate Sub Optionl_Click(Index As Integer) If Text1.Text""Then Select Case Case 0 Text2.Text=Text1.Text Case 1 Text2.Text=Text1.Text*10 Case 2 Text2.Text=Text1.Text*100 End Select End If End SubA.Option1.Index B.Index C.Option1.(Index) D.Option1.(Index)Value

窗体上有名为Text1、Text2的两个文本框，和一个由3个单选按钮组成的控件数组0ptionl， 如图1所示。程序运行后，如果单击某个单选按钮，则执行Text1中数值与该单选按钮所 对应的运算(乘1、乘10或乘100)，并将结果显示在Text2中，如图2所示。为了实现 上述功能，在程序中的横线处应填入的内容是（ ）。

A. Option1．Index

B. Index

C. Option1(Index1)

D. Option1(Index)．Value

窗体上有名为Text1、Text2的两个文本框，和一个由3个单选按钮组成的控件数组0ptionl， 如图1所示。程序运行后，如果单击某个单选按钮，则执行Text1中数值与该单选按钮所 对应的运算(乘1、乘10或乘100)，并将结果显示在Text2中，如图2所示。为了实现 上述功能，在程序中的横线处应填入的内容是（ ）。

A.Option1．Index

B.Index

C.Option1(Index1)

D.Option1(Index)．Value

（ 24 ） 窗体上有名称分别为 Text1 、 Text2 的 2 个文本框 ， 有一个由 3 个单选按钮构成的控件数组 Option1 ，如图 2 所示 。 程序运行后 ， 如果单击某个单选按钮 ， 则执行 Text1 中的数值与该单选按钮所对应的运算（乘以 1 、 10 或 100 ），并将结果显示在 Text2 中，如图 3 所示。为了实现以上功能，在程序中的问号（ ? ）处应填入的内容是（ ）。

Private Sub Option1_Click(Index As Integer)

If Text1.Text<> “ “ Then

Select Case ?

Case 0

Text2.Text=Val(Text1.Text)

Case 1

Text2.Text=Val(Text1.Text)*10

Case 2

Text2.Text=Val(Text1.Text)*100

End Select

End If

End Sub

A ） Index

B ） Option1.Index

C ） Option1(Index)

D ） Option1(Index).Value

（1）在考生文件夹下有工程文件sj3.vbp及窗体文件sj3.frm，该程序是不完整的，请在有"?"的地方添入正确的内容，然后删除"?"及代码前的所有注释符（即‘号），但不能修改其他部分。存盘时不得改变文件名和文件夹。

本题描述如下：在窗体上画一个名称为Text1的文本框和两个命令按钮，其名称分别为Command1和Command2、标题分别"大写A"和"小写a"。要求程序运行后，如果单击"大写A"命令按钮，则弹出对话框，输入要显示的个数，根据输入的数值在文本框中显示相应数量的大写字符串A；如果单击"小写a"命令按钮，也弹出对话框，输入要显示的个数，根据输入的数值在文本框中显示相应数量的小写字符串a。

程序运行时的窗体界面如图37-3所示。

图37-3

（2）在考生文件夹下有工程文件sj4.vbp及窗体文件sj4.frm，请在有"?"的地方正确内容，然后删除"?"及代码前的所有注释符（即‘号），但不能修改其他部分。编写程序使程序运行时满足下列的条件。存盘时不得改变文件名和文件夹。

本题描述如下：在窗体上有一个名称为HScroll1的水平滚动条（Min为400，Max为2000）和3个名称分别为Command1、Command2和Command3、标题分别为"减200"、"显示"和"加200"的命令按钮。程序运行后，如果单击"减200"命令按钮，则滚动块向左滚动200单位；如果单击"显示"命令按钮，则显示当前滚动条的值；如果单击"加200"命令按钮，则滚动块向右滚动200单位。程序运行时效果如图37-4所示。

图37-4

在考生文件起下有工程文件sj3．vbp及窗体文件sj3．frm，在窗体上画一个名称为 Text1的文本框和两个名称分别为Command1和Command2、标题分别为“大写A”和“小写a”的命令按钮。要求程序运行后，如果单击“大写A”命令按钮，则弹出对话框，输入要显示的个数，根据输入的故值在文本框中显示相应数量的大写字符串A；如果单击“小写a”命令按钮，也弹出对话框．输入要显示的个数，根据输入的数值在文本框中显示相应数量的小写字符串a。 程序运行时的窗体界面如图5-3所示。注意：该程序是不完整的，请在有“?”的地方添入正确的内容，然后删除“?”及代码前的所有注释符(即“'”号)，但不能修改其他部分。存盘时不得改变文件名和文件夹。

在考生文件夹中有工程文件execise110.vbp及窗体文件execise110.frm。如下图所示，在名为Form1的窗体上有一个Labe1控件，4个Text控件及7个命令按钮，其功能如下，

(1)开始启动工程时，界面上除Input及Quit按钮之外，其他按钮均不可用(灰色显示)。

(2)单击Input按钮之后，利用InputBox让用户连续且必须录入10个数。若录入为非数字符号，则给出警告“输入数据无效，请重新输入数值数据，请输入第n个数”。

(3)录入完毕后，Input按钮变灰，其他按钮变为可用状态。

(4)按相应的按钮可分别求出所录入数据的升序、降序排列及最大、最小值，并在右侧对应的文本框中显示(注意用A(10)存放最大数，A(1)存放最小数)。

(5)单击Clear按钮将所有文本框清空。

本程序不完整，请补充完整，并能正确运行。

要求：

去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功

能，但不得修改程序的其他部分。最后，按原文件名并在原文件夹中保存修改后的文件。