在窗体上建立名称为Text1、Text2和删的三个文本框，其中Text1和Text2文本框用来接受两个整数（假设为M和N)，建立一个名称为command1的命令按钮，单击它将得到数M从右边起的N位数字，并把该数字显示在Text3文本框中，如下图所示。请填空。 private Fuction digit（ByVal m As Integer, ByVal n As Integer) As Integ

（ 19 ）在窗体上画两个文本框（名称分别为 text1 和 text2 ）和一个命令按钮（名称为 command1 ） , 然后编写如下事件过程： 在窗体上有若干控件，其中有一个名称为Text1文本框。影响Text1的Tab顺序的属性是 ______。 在窗体中添加一个命令按钮，名称为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，结果是______ 。 新建一个工程。在窗体中画三个标签，名称分别为Label1、Label2和Label3，标题分别为“加数1”、“加数2”和“和”。在三个标签下分别有三个文本框（名称分别为Textl、Tex2和Text3)用来输入数字。要求编写一个事件过程，程序运行后在文本框Text1和Text2中输入数字，单击文本框Text3后其中输出两个数的和。如图14所示。程序中不得使用任何变量。 注意：存盘时必须存放在考生文 在窗体（Name属性为Form1)上画两个文本框（其Name属性分别为Text1和Text2)和一个命令按钮（Name属性为Command1)，然后编写如下两个事件过程： Private Sub Command1_Click（)A=Text1.Text+Text2.TextPrint A End Sub Private Sub Form Load（)Text1.Text=" "Text2.Text 窗体上有名称分别为Text1、Text2的文本框，名称为Command1的命令按钮。运行程序，在Text1中输入“FormList”，然后单击命令按钮，执行如下程序：Private Sub Command1_Click（)Text2.Text=UCase（Mid（Text1.Text，5，4))End Sub在Text2中显示的是（）。 在窗体上画两个名称分别为Text1、Text2的文本框。Text1的Text属性为“Database”， 如图所示。现有如下事件过程： Private Sub Text1_Change（)Text2.Text=Mid（Text1,1,1)End Sub运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是：（）。 一个窗体上有三个文本框，按放置顺序分别是:Text1，Text2，Text3，若使程序运行时Text3首先获得“焦点”，那么，应设置其()属性值为0 。 一个窗体上有三个文本框,按放置顺序分别是:Text1,Text2,Text3 ,若使程序运行时Text3首先获得“焦点”,那么应设置其()属性值为 0 。 在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程： 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)内容分别为 和 。 在窗体上画两个名称分别为Text1、Text2的文本框，Text1的Text属性为“DatBase”，如下图所示。现有如下事件过程：运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是（） 在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮，编写如下事件过程： Private Sub Command1_Click()Text1.Text=“计算机”Me.Text1=“等级”Text1=“考试” End Sub 程序运行后．如果单击命令按钮，则在文本框中显示的是 窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：当向文本框Text1中输入小写字母a时，文本框Text2中显示的是（） 在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程 Private Sub Command1_Click() n=Text1，Text Select Case n Case 1 To 20 x=10 Case 2，4，6 x=20 Case Is 在窗体上画两个文本框（名称分别为Text1和Text2)和一个命令按钮（名称为Command1)，然后编写如下事件过程： Private Sub Command1 Click（) Text1.Text = InputBox（"请输入数据1") Text2.Text = InputBox（"请输入数据2) End Sub 程序运行后，如果单击命令按钮，将先后显示两个输入对话框，在两个输入对话框中分 窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：Private Sub Text1_KeyUp（KeyCode As Integer，Shift As Integer)Dim c As Stringc=UCase（Chr（KeyCode))Text2.Text=Chr（Ase（c)+2)End Sub当向文本框Text1中输入小写字母a时，文本框Text2 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下事件过程： Private Sub Command1_Click（) Dim inData As String Text1.Text=" " Open "d:Myfile.txt" For （14) As1 Do While （15) Input1，inData Text1.Text=Text1.Text+i 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编定如下事件过程： Private Sub Command1_Click（) Dim inData As String Text1.Text:“” Open "d:myfile.txt" For （10) As1 Do While （11) Input 1,inData Text1.Text=Text1.Text+i 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下事件过程： Private Sub Command1_Click（) Dim inData As String Text1.Text="" Open"d:myfile.txt"Fo （8) As1 Do While （9) Input 1,inData Text1.Text=Text1.Text+inData