设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如 下的事件过程：程序运行后，单击命令按钮，则在文本框中显示的内容是（）。

在窗体上画两个名称分别为Text1、Text2的文本框，Text1的Text属性为“DatBase”，如下图所示。现有如下事件过程：运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是（） （ 19 ）在窗体上画两个文本框（名称分别为 text1 和 text2 ）和一个命令按钮（名称为 command1 ） , 然后编写如下事件过程： 在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：程序运行后，单击命令按钮，在窗体上显示的是（）。 在窗体上画一个名称为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 在名称为Form1的窗体上画一个文本框，其名称为Text1，然后通过属性窗口设置窗体和文本框的属性，实现如下功能．完成设置后的窗体如下图所示。要求：不编写任何代码。 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程：Private Sub Commandl_Click（)Dim inData As StringTextl.Text=""Open"d：myfile.txt"For 【 】As1Do While 【 】Input,inDataLoopText1.Text=Text1.Text+inDLoopClos 在窗体上画一个名称为Text1,的文本框和一个名称为Command1的命令按钮，然后编写以下程序代码：运行程序，单击Command1，则在文本框Text1中显示的结果为（） 在窗体上画一个文本框，名称为Text1，然后编写如下程序： Private Sub Form_Load（) Open"d:empdat.txt"For Output As 1 Text1.Text=" " End Sub Private Sub Text1_KeyPress（KeyAscii As Integer) If______=13 ThenIf UCase（Text1.Text)=____ 在窗体上画一个文本框，名称为Text1，然后编写如下程序： Private Sub Form_Load（) Open "d:empdat.txt" For Output As 1 Text1.Text="" End Sub Private Sub Text1_KeyPress（KeyAscii As Integer) If （8) =13 Then If UCase（Text1.Text)= （9 在窗体上画一个文本框，名称为Text1，然后编写如下程序： Private Sub Form_Load（) Open"d:empdat,txt"For Output As1 Text1.Text=" " End Sub Private Sub Text1_KeyPress（KeyAscii As Integer) If KeyAscii=13 ThenIf UCase（Text1.Text)=__ 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然，如果单击命令按钮，则在文本框中显示的是 在窗体上画一个文本框，名称为Text1，然后编写如下程序：程序运行后，在文本框中输入一个字符串，然后单击窗体，则文本框中的内容（） 在窗体上画一个文本框，名称为Text1，然后编写如下程序： Private Sub Form_Load（) Open"d:empdat.txt"For Output As1 Text1.Text:“” End Sub Private Sub Text1_KeyPress（KeyAscii As Integer) If （13) =13 Then If UCase（Text1.Text1= （14) 在窗体上画一个命令按钮和一个文本框，其名称分别为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 在窗体上画一个名称为Co mmand1的命令按钮，然后编写如下事件过程：Pr（） 在窗体上画一个名称为Text1的文本框，然后编写如下事件过程：PrivatSuForm_Load（）。程序运行后，如果按Shift+F2键，则文本框中的内容是（） 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下事件过程：Private Sub Command1_Click（)Dim inData As StringText1.Text=""Open"d:myfile.txt" For（）As1Do While（）Input 1,inDataText1.Text=Text1.T 在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如下事件过程： Private Sub Commandl_click（) CommonDialogl.Friter="AllFiles（*.*)|*.*|Text Files"&_ "（*.txt)|*.txt|Executable Files（*.exe)|*.exe" CommonDialog1.Filte