窗体上有名为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个单选按钮构成的控件数组Option1，如图1所示。程序运行后，如果单击某个单选按钮，则执行Text1中数值与该单选按钮所对应的运算(乘1、乘10或乘100)，并将结果显示在Text2中，如图 2所示。为了实现上述功能，在程序中的横线处应填入的内容是( )。Private Sub Option1_Click(Index As Integer)If Text1.Text＜＞""ThenSelect Case______C．ase 0T

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

[单选题]（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，编写下列程序：D．im y As IntegerPrivate Sub Command1_Click()D．im x As Integerx=2Text1.Text=p2(p1(x),y)Text2.Text=p1(x)E．nd SubPrivate Function p1(x As Integer)As Integerx=x+y:y=x+yp1=x+yE．nd FunctionPrivate Function p2(x

[单选题]窗体上有两个文本框Text1、Text2以及一个命令按钮Command1，编写下列程序： Dim y As IntegerPrivate Sub Command1_Click()Dim x As Integer x=2 Text1.Text=p2(p1(x), y) Text2.Text=pi(x)End SubPrivate Function p1(x As Integer) As Integer x=x+y:y=x+y p1=x+yEnd FunctionPrivate Function p

[单选题]窗体上有三个文本框Text1、Text2和Text3以及一个命令按钮Command1，设文本框Text1中内容为 12，文本框Text2中内容为34。下面程序的执行结果为______。Private Sub Command1_ Cilick() Text3.Text = Str＄(Val(Text1.Text)) + Val(Text2.Text) Print val(Text3,Text)End SubA．12B．34C．46D．1234

[单选题]窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序：D．im y As IntegerPrivate Sub Command1_Click()D．im x As Integerx=2Text1.Text=Fun2(Fun1(x),y)Text2.Text=Fun1(x)E．nd SubPrivate Function Fun1(x As Integer) As Integerx=x+y:y=x+yF．un1=x+yE．nd FunctionPrivate Fun

[单选题]窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序D．im y As IntegerPrivate Sub Command1_Click()D．im x As Integerx=2Text1.Text=Fun2(Funl(x),y)Text2.Text=Funl(x)E．nd SubPrivate Function Funl(x As Integer) As Integerx=x+y ∶y=x+yF．unl=x+yE．nd FunctionPrivate Fun

[单选题]窗体上有名称分别为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（