在窗体上建立一个名称为Text1的文本框，再建立一个名称为Cmd1，标题为“计算’’的命令按钮，如图11-22所示。要求程序运行后，单击命令按钮，将计算100～200之间所有素数之和，在文本框中显示结果，同时把结果存入文件out.txt中。（在考生文件夹中有标准模块mode.bas，其中的putdata过程可以把结果存入文件，而isprime函数可以判断整数x是否为素数，如果是素数，则函数返回Tr

在窗体中有一个文本框Text1，编写事件代码如下：打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是（） 设窗体中有一个文本框Text1，若在程序中执行了Text1.SetFocus，则触发______。 设窗体中有一个文本框Text1，若在程序中执行了Text1.SetFocus，则触发 在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮，编写如下事件过程： Private Sub Command1_Click()Text1.Text=“计算机”Me.Text1=“等级”Text1=“考试” End Sub 程序运行后．如果单击命令按钮，则在文本框中显示的是 以下是一个比赛评分程序。在窗体上建立一个名称为Text1的文本框数组，然后画一个名为Text2的文本框和名为Command1命令按钮。运行时在文本框数组中输入6个分数，单击"计算得分"命令按钮，则最后得分显示在Text2文本框中（去掉一个最高分和一个最低分后的平均分即为最后得分)，如下图所示。请填空。 Private Sub Command1_Click（) Dim k As Integer Di 设窗体上有一个文本框Text1和一个命令按钮Command1，并有以下事件过程：程序执行时，在文本框中输入“Basic”，然后单击命令按钮，则Text1中显示的是（） 以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组，然后画一个名为Text2的文本框和名为Commandl的命令按钮。运行时在文本框数组中输入7个分数，单击“计算得分”命令按钮，则最后得分显示在Text2文本框中（去掉一个最高分和一个最低分后的平均分即为最后得分)，如下图所示。请填空。 Pfivale Sub Commaildl_C1iCk（) Dimk As hteger Dim 在窗体上画一个文本框，其名称为Text1。为了在程序运行后Text1中的文本不可编辑，应当使用的语句是______。 假定一个文本框，其名称为Text1，为了使该文本框具有焦点，应执行的语句是______。 在窗体上建立名称为了ext1、Text2和Text3的三个文本框，其中Text1和Text2文本框用来接受两个整数（假设为M和N)，建立一个名称为Command1的命令按钮，单击它将得到数M从右边起的第N位数字，并把该数字显示在Text3文本框中，如图20-15如示。请填空。 Private Function digit（ByVal m As Integer，ByVal n As Integer) 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，再编写如下程序：程序运行后在文本框中输入“Number100”，并单击命令按钮，则文本框中显示的是（） 以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组，然后画一个名为 Text2的文本框和名为Commandl的命令按钮。运行时在文本框数组中输入7个分数，单击．“计算得分”命令按钮，则最后得分显示在Text2文本框中（去掉一个最高分和一个最低．分后的平均分即为最后得分)，如图所示。请填空。Private Sub Commandl_Click（) Dim k As Integer D 在窗体上有一个命令按钮command1和一个文本框Text1，编写事件代码如下：打开窗体运行后，单击命令按钮，文本框中显示的结果是（） 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程Private Sub Command1_Click（）Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program"End Sub运行后，如果单击命令按钮，则在文本框中显示的是 窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：当向文本框Text1中输入小写字母a时，文本框Text2中显示的是（） 以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组，然后画一个名为Text2的文本框和名为Command1命令按钮。运行时在文本框数组中输入7个分数，单击“计算得分”命令按钮，则最后得分显示在Text2文本框中（去掉一个最高分和一个最低分后的平均分几位最后得分)，如图16-9所示。请填空。 Private Sub Command1_Click（)Dim k As IntegerDi 以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组，然后画一个名为 Text2的文本框和名为Command1的命令按钮。运行时在文本框数组中输入7个分数，单击“计算得分”命令按钮，则最后得分显示在Text2文本框中（去掉一个最高分和一个最低分后的平均分即为景后得分)，如图所示。请填空。Private Sub Command1_Click（)Dim k As 以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组，然后画一个名为Text2的文本框和名为Command1的命令按钮。运行时在文本框数组中输出7个分数，单击“计算得分”命令按钮， 则最后得分显示在Text2文本框中（去掉一个最高分和一个最低分后的平均分即为最后得分)请将程序补充完整。 Private Sub Command1_click（) Dim k As Integer Dim 在窗体上绘制一个名称为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 （ 19 ）在窗体上画两个文本框（名称分别为 text1 和 text2 ）和一个命令按钮（名称为 command1 ） , 然后编写如下事件过程：