某表单含有2个标签对象、2个文本框对象（Text1、Txt2）、1个形状对象（Shape1）和1个命令按钮。其中，文本框Text1用来输入园半径数据，文本框Text2用于显示园面积，形状对象Shape1用于显示园的图形，命令按钮的标题属性为“计算”。单击命令按钮时，应完成功能：当园半径的值介于10~100之间时，….第8章最后一题

下列过程的功能是：在对多个文本框进行输入时，对第1个文本框（text1)输入完毕后用回车键使焦点跳到第2个文本框（text2)，而不是Tab键来切换。请完成该程序。 Private Sub Textl_（eyDown（Keycode As Integer，Shift As Integer) If [14] Then Text2. [15] End If End Sub 在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮 (名称为Command1)，外观如下图所示。 编写如下程序： Private Sub Form_Load() Text1.Text="" Text2.Text="" Text3.Text="" End Sub Private Sub Commandl_Click() x=Val(Text1.Text) y=Val(Text2.Text) Text3.Text=f(x,y) End Sub Function f(ByVal x As Integer,ByValy As Integer) DoWhiley＜＞0tmp=x ModyX=yy=tmp Loop f=X End Function 运行程序，在Textl文本框中输入36，在Text2文本框中输入24，然后单击命令按钮，则在Text3文本框中显示的内容是( )。 中国大学MOOC: 表单对象的name属性值为“mainForm”,该表单对象的第一个元素是文本框,其name属性值为“user”，那么可以通过mainForm.user的方式访问到这个文本框 在窗体上画两个名称分别为Text1、Text2的文本框，Text1的Text属性为“DatBase”，如下图所示。现有如下事件过程：运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是（） 在窗体(Name 属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1)，然后编写如下两个事件过程： Private Sub Commnd1_Click() a=Text1.Text+Text2.Text Print a End Sub Private Sub Form_ Load ()Text1 Text=“”Text2 Text=“” End sub程序运行后，在第一个文本框(Text1)和第二个文本框(text2)中分别输入123和321，然后单击命令按钮，则输出结果为______ 。 在窗体上画2个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程： Private Sub Command1_Click() Text1.Text=”VB Programming” Text2.Text=Text1.Text Text1.Text=”ABCD” End Sub 程序运行后，单击命令按钮，两个文本框中显示的内容分别为____和____ 在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程： Private Sub Command1_Click（) Text1.Text = "计算机" Text2.Text = Text1.Text Text1.Text = "等级考试" End Sub 程序运行后，单击命令按钮，两个文本框（Text1和Text2)内容分别为 （6) 和 （7) 。 在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程： Private Sub Coraraand1_Click（) Text1.Text="计算机" Text2.Text=Text1.Text Text1.Text="等级考试" End Sub 程序运行后，单击命令按钮，两个文本框（Text1和Text2)内容分别为 和 。 窗体上有一个命令按钮和一个文本框，程序执行后，在文本框中输入12345，单击命令按钮后的输出结果为( )。 Private Sub Command1_Click() Dim A As Integer,B As Integer Text1.SelStart=2 Text1.SelLength=2 A=Val(Text1.SelText) B=Len(Text1.Text) Print A*B End Sub 在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Label1的标签，窗体外观如图a所示。要求当改变任一个文本框的内容时就会将该文本框的内容显示在标签中，如图b所示。实现上述功能的程序如下：图a图b关于上述程序，以下叙述中错误的是（） 在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程： Private Sub Command1_Click（)Text1．Text="计算机"Text2．Text=Text1．TextText1．Text="等级考试" End Sub 程序运行后，单击命令按钮，两个文本框（Text1和Text2)中的内容分别为 【6】 和 【7】 。 在窗体上画两个文本框，然后编写程序。程序运行后，如果在第一个文本框中输入A和B、C、D或a、b、c、d，则在第二个文本框中显示EFDH。请完善下列程序。 Private Sub Form_Load（) Show Text1.Text="" Text2.Text="" Text1.SetFocus End Sub Private Sub Text1_KeyDown（KeyCode As Integ 新建一个工程。在窗体中画三个标签，名称分别为Label1、Label2和Label3，标题分别为“加数1”、“加数2”和“和”。在三个标签下分别有三个文本框（名称分别为Textl、Tex2和Text3)用来输入数字。要求编写一个事件过程，程序运行后在文本框Text1和Text2中输入数字，单击文本框Text3后其中输出两个数的和。如图14所示。程序中不得使用任何变量。 注意：存盘时必须存放在考生文 在窗体上添加一个命令按钮Command1和一个文本框Text1，把文本框的Tex入8和10，则文本框中显示的内容是 在窗体上画两个名称分别为Text1、Text2的文本框。Text1的Text属性为“Database”， 如图所示。现有如下事件过程： Private Sub Text1_Change（)Text2.Text=Mid（Text1,1,1)End Sub运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是：（）。 在窗体中添加一个命令按钮，名称为Command1，两个文本框名称分别为Text1、Text2，然后编写如下程序： Private Sub Command1_Click() a=Text1.Text b=Text2.Text c=LCase (a) d=UCase (b) Print c；d End Sub程序运行后，在文本框Text1、Text2中分别输入AbC和Efg，结果是______ 。 在窗体上画两个文本框，然后编写程序。程序运行后，如果在第一个文本框中输入A和B、 C、D或a、b、c、d，则在第二个文本框中显示EFDH。请完善下列程序。 Private Sub Form_Load（)ShowText1．Text=" "Text2．Text=" "Text1．SetFocus End Sub Private Sub Text1_KeyDown（KeyCode As Integer 在窗体上画3个标签、3个文本框（名称分别为Text1、Text2和Text3）和1个命令按钮（名称为Command1），外观如图所示。编写如下程序Private Sub Form_Load（) Text1.Text="" Text2.Text="" Text3.Text=""End SubPrivate Sub Command1_Click（) x=Val（Text1.Text) y=Val（Te 下列程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”条件，则在窗体上输山文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。 Private Sub Command1_Click（)x=Val（Text1.Text)If______Then Print xElse ______ Text1.Text=""End If End Sub 有下面一个程序段，从文本框中输入数据，如果该数据满足条件，除以4余1，除以5余2则输出，否则，将焦点定位在文本框中，并清除文本框的内容。 Private Sub Command1_Click（) x=Val（Text1．Text) If【 】 Then Print x Else Text1．Text="" 【 】 End If End Sub