窗体上有一个名称为Text1的文本框和一个名称为Command1、标题为“计算”的命令按钮，如图所示。函数fun及命令按钮的单击事件过程如下，请填空。Private Sub Command1_Click（)Dim x As Integerx=Va1（InputBox（“输入数据”))Text1=Str（fun（x)+fun（x)+fun（x))End

窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框，事件代码如下：打开窗体，单击命令按钮，文本框Text1中显示的内容是__________。 在窗体中有一个命令按钮Command1和一个文本框Text1，编写事件代码如下：打开窗体运行后，单击命令按钮，文本框Text1输出的结果是（） 设窗体上有一个文本框，名称为Text1，程序运行后，要求该文本框只能显示信息，不能接收输入信息，以下能实现该操作的语句是 假定一个文本框，其名称为Text1，为了使该文本框具有焦点，应执行的语句是______。 在窗体上有一个命令按钮command1和一个文本框Text1，编写事件代码如下：打开窗体运行后，单击命令按钮，文本框中显示的结果是（） 设窗体上有一个文本框，名称为text1，程序运行后，要求该文本框只能显示信息，不能接受输入的信息，以下能实现该操作的语句是()。 在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮，编写如下事件过程： Private Sub Command1_Click()Text1.Text=“计算机”Me.Text1=“等级”Text1=“考试” End Sub 程序运行后．如果单击命令按钮，则在文本框中显示的是 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程Private Sub Command1_Click（）Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program"End Sub运行后，如果单击命令按钮，则在文本框中显示的是 在窗体上绘制一个名称为Command1的命令按钮和一个名称为Text1的文本框，在文本框中输入以下字符串： Microsoft Sub Command1_Click（) 然后编写如下事件过程： Private Sub Command1_Click（) Open "d：empoutf.txt" For Output As 1 For i=1 To Len（Text1.Text)c=Mid（Text1 在窗体上画一个文本框，其名称为Text1。为了在程序运行后Text1中的文本不可编辑，应当使用的语句是______。 在窗体上添加一个命令按钮Command1和一个文本框Text1，把文本框的Tex入8和10，则文本框中显示的内容是 在窗体上建立名称为Text1、Text2和删的三个文本框，其中Text1和Text2文本框用来接受两个整数（假设为M和N)，建立一个名称为command1的命令按钮，单击它将得到数M从右边起的N位数字，并把该数字显示在Text3文本框中，如下图所示。请填空。 private Fuction digit（ByVal m As Integer, ByVal n As Integer) As Integ 窗体上有一个由两个文本框组成的控件数组，名称为Text1，并有如下事件过程： Private Sub Text1_Change（Index As Integer) Select Case Index Case 0 Text1 （1). FontSize = Text1 （0). FontSize * 2 Text1 （1). Text = Text1 （0). Text Case 1 Text1 程序是一个窗体双击事件代码，窗体的名称是Mywindow。窗体上有一个名为Text1的文本框，用来显示文本。 程序段首先在文本框中显示“窗体能够触发双击事件”然后将滚文本清除；重复上述过程5次。 Option Explicit Private 【12】 Dim k As Integer For k=1 to 100 If k Mod 20 Then 【13】 Else Text1.Text="" 设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程：程序运行后单击命令按钮，文本框中显示的是（） 窗体上有一个名称为Command1的命令按钮，一个名称为Text1的文本框。编写如下程序： Private Sub Command1_Click（) Dim x As Integer x = Val（InputBox （"输入数据") ) Text1 = Str（x + fun（x) + fun（x) ) End Sub Private Function fun（ByRef n As Inte 假定有一个文本框，其名称为Text1，为了使该文本框具有焦点，应执行的语句是 【11】 。 在窗体中有一个文本框Text1，编写事件代码如下：打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是（） 窗体上有两个名称分别为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，然后编写如下程序：程序运行后，如果从键盘上输入16，则在文本框显示的内容是（）。