在窗体上画一个文本框，名称为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

（ 19 ）在窗体上画两个文本框（名称分别为 text1 和 text2 ）和一个命令按钮（名称为 command1 ） , 然后编写如下事件过程： 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程Private Sub Command1_Click（）Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program"End Sub运行后，如果单击命令按钮，则在文本框中显示的是 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：程序运行后，在文本框中输入456，然后单击命令按钮，在输入对话框中输入123，则文本框中显示的内容是（） 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然，如果单击命令按钮，则在文本框中显示的是 在窗体上画一个文本框，其名称为Text1。为了在程序运行后Text1中的文本不可编辑，应当使用的语句是______。 设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如 下的事件过程：程序运行后，单击命令按钮，则在文本框中显示的内容是（）。 在窗体上画一个文本框，名称为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)=__ 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，再编写如下程序：程序运行后在文本框中输入“Number100”，并单击命令按钮，则文本框中显示的是（） 在窗口上画一个名称为Text1的文本框和一个名为Command1的命令按钮，然后编写如下事件过程：程序运行后单击命令按钮，在文本框中显示的值是（） 在窗体上画一个文本框，名称为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，编写事件代码如下：打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是（） 在窗体上有一个文本框，其名称为Text1，编写下列事件过程：Private（） 在窗体上画一个名称为TxtA的文本框,然后编写如下事件过程:PrivateS够触发KeyPress事件的操作是 在窗体中有一个命令按钮Command1和一个文本框Text1，编写事件代码如下：打开窗体运行后，单击命令按钮，文本框Text1输出的结果是（） 在窗体上画1个文本框，名称为Text1，然后编写如下程序：Private Sub Form_Load（)Open "d:empdat.txt" For Output As 1Text1.Text=" "End SubPrivate Sub Text1 KeyPress（KeyAscii As Integer)If （）=13 ThenIf UCase（Tex 在窗体上画一个名称为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