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

Private Sub Option1_Click(Index As Integer)

If Text1.Text＜＞""Then

Select Case______

C．ase 0

Text2.Text=Text1.Text

C．ase 1

Text2.Text=Text1.Text*10

C．ase 2

Text2.Text=Text1.Text*100

E．nd Setect

E．nd If

E．nd 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______ Ca

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

[单选题]窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Commandl的命令按钮。 运行后的窗体外观如下图所示。设有如下的类型声明： Type Person name As String*8 major As String*20 End Type 当单击“保存”按钮时，将两个文本框中的内容写入一个随机文件Test290.dat中。设文本框中的数据已正确地赋值给Person类型的变量P。则能够正确地把数据写入文件的程序段是( )。A．Open"c:/Test29.dat"ForRan

[单选题]（27）窗体上有两个文本框Text1、Text2以及一个命令按钮Commandl,编写下列程序： Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1Text=p2(p1(x),y) Text2Text=p1(x) End Sub Private Function pl(x As Integer) As Integer x=x+y:y=x+y pl=x+y End Function Private Fun

[单选题]（30）窗体上有两个文本框Text1、Text2以及一个命令按钮Commandl,编写下列程序： Dim y As Integer Private Sub Commandl_Click() Dim x As Integerx=2 Text1.Text=p2(pl(x),y) Text2.Text=p2(x) End Sub Private Function p2(x As Integer,y As Integer) x=x+y：y=x+y pl=x+y End Function Private

[单选题]在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明：Private Type Personname As String*8mjot As String+20E．nd TypeD．im P As Person设文本框中的数据已正确地赋值给Person类型的变量P，当单击“保存”按钮时，能够正确地把变量中的数据写入随机文件Test2．dat中的程序段是A．Open“c：＼Test2．dat”ForOutpu

[单选题]窗体上有名称分别为Text1、Text2的2个文本框，要求文本框Text1中输入的数据小于500，文本框Text2中输入的数据小于1000，否则重新输入。为了实现上述功能，在以下程序中问号（?）处应填入的内容是。Private Sub Text1_LostFocus（）C．all CheckInput（Text1，500）E．nd SubPrivate Sub Text2_LostFocus（）C．all CheckInput（Text2，1000）E．nd SubSub CheckInput（

[单选题]窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型声明当单击“保存”按钮时．将两个文本框中的内容写入一个随机文件Test29.dat中设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是

[单选题]窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。设有如下的类型声明： Type Person name As String*8 major As String*20 End Type 当单击“Command1”按钮时，能够正确地把数据写入文件的程序段是______。A．Private Sub Command1_Click() Dim p As Person p. name=Text1. Text p. major=Text2. Text Open"C

[单选题]（ 28 ） 窗体上有名称分别为 Text1 、 Text2 的 2 个文本框 ， 要求文本框 Text1 中输入的数据小于 500 ， 文本框 Text2 中输入的数据小于 1000 ，否则重新输入。为了实现以上功能，在下列程序中问号（ ? ）处应填入的内容是（ ）。Private Sub Text1_LostFocus( )C．all CheckInput(Text1,500)E．nd SubPrivate Sub Text2_LostFocus( )C．all CheckInput(Tex