在窗体上画1个文本框，名称为Text1，然后编写如下程序： Private Sub Form_Load（) Open"d:empdat.txt"For Output As 1 Text1.Text="" End Sub Private Sub Text1_KeyPress（Key Ascii As Integer) If （10) =13 Then If U Case（Text1.Text)= （

在窗体上画两个名称分别为Text1、Text2的文本框，Text1的Text属性为“DatBase”，如下图所示。现有如下事件过程：运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是（） 在窗体中有一个文本框Text1，编写事件代码如下：打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是（） 在窗体上画1个文本框，名称为Text1，然后编写如下程序： Private Sub Form Load（) Open "C:dat.txt" For Output As1 Text1.Text="" End Sub Private Sub Text1_KeyPress（KeyAscii As integer) If______=13 Then If UCase（Text1.Text=______) 在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序：程序运行后，如果从键盘上输入16，则在文本框显示的内容是（）。 窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序：程序运行后，如果从键盘上输入16，则在文本框中显示的内容是（） 在窗体上画—个文本框，名称为Text1，然后编写如下程序： Private Sub Form_Load（) Open"d:empdat.txt"For Output As 1 Text1.Text="" End Sub Private Sub Text1_KeyPress（Key Ascii As Integer) IfKeyAscii=13 Then If UCase（Text1.Text)= 窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：当向文本框Text1中输入小写字母a时，文本框Text2中显示的是（） 在窗体上画1个文本框，名称为Text1，然后编写如下程序： Private Sub Form_Load（) Open"d:empdat.txt"For Output As 1 Text1.Text="" End Sub Private Sub Text1_KeyPress（Key Ascii As Integer) If______=13 Then If U Case（Text1.Text)=__ 在窗体上画1个文本框，名称为Text1，然后编写如下程序： Private Sub Form_Load（) Open"d:empdat.txt"For Output As 1 Text1.Text="" End Sub Private Sub Text1_KeyPress（Key Ascii As Integer) If （10) =13 Then If U Case（Text1.Text)= （ 在窗体中有一个命令按钮Command1和一个文本框Text1，编写事件代码如下：打开窗体运行后，单击命令按钮，文本框Text1输出的结果是（） 在窗体上画1个命令按钮（名称为Commandl)和1个文本框（名称为Text1)，然后编写如下事件过程： Private Sub Commandl_Click（) x=Val（Text1.Text) SelectCaseXCase 1，3 y=X*XCaseIS＞=10，IS＜=-10 y=XCase-10 To 10 y=-X End Select End Sub 程序运行后，在文本框中输入3， 在窗体上画一个文本框，名称为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，编写下列事件过程：Private（） 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：程序运行后，在文本框中输入456，然后单击命令按钮，在输入对话框中输入123，则文本框中显示的内容是（） 在窗体上画一个文本框，名称为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______As 1 Do While ______ Input 1，inData Text1. Text=Text1 设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如 下的事件过程：程序运行后，单击命令按钮，则在文本框中显示的内容是（）。 在窗体上画一个文本框，其名称为Text1。为了在程序运行后Text1中的文本不可编辑，应当使用的语句是______。