在窗体上画一个名为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim arrayl(10, 10)As Integer Dim i As Integer, j As Integer For i=1 To 3 For j=2 To 4 arrayl(i, j)=i+j Next j Next i Text1. Text=arrayl(2, 3)+arrayl(3, 4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是______。

A．12

B．13

C．14

D．15

[单选题]在窗体上画一个名称为Command1 的命令按钮和一个名称为Text1的文本框，然后编写如下程序： Private Sub Command1_Click( ) Dim x,y,z As Integer x=5 y=7 z=0 Texttext = " " Call P1 (x,y,z) TextText = Str(z) End Sub Sub P1(ByVal a As Integer,ByVal b As Integer,c As Integer) c=a+b End Sub 程序运行后

[单选题]在窗体上画一个名为Text1的文本框和一个名为Command1的命令按钮。要求：程序运行时，单击命令按钮，能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件Test.dat中，如图所示。请在空格处填上适当的内容，则在以下横线处合适的语句是（ ）。A． Input Print#1，Mid(Text1．Text，i，1)B． Output Print#1，Mid(Text1．Text，i，1)C． Outpat Print#1，LeR(Text1．Text，i，1)D． Output Inp

[单选题]在窗体画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程： Private Sub Command1_Click() n=Val(Text1. Text) For i=2 To n For j=2 To Sqr(i) If i Hod j=0 Then Exit For Next j If j＞Sqr(i)Then Print i Next i End Sub 该事件过程的功能是______。A．输出n以内的奇数B．输出n以内的偶数C．输出n以内的素数D．

[单选题]在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程：Private Sub Command1_Click（）n = Val（Text1.Text） If n/2 = n/2 Then f = f1（n）Else f = f2（n）End IfPrint f; nE．nd SubPublic Function f1（ByRef x）x=x*xf1=x+xE．nd FunctionPublic Function f2（

[单选题]在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程： Private Sub Command1_Click() n = Val(Text1.Text) If n/2 = n/2 Then f = f1(n) Else f = f2(n) End If Print f; n End Sub Public Function f1(ByRef x) x=x*x f1=x+x End Function Public Function f2(ByV

[单选题]在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，在文本框中输入以下字符串：Microsoft Visual Basic Programming然后编写如下事件过程：Private Sub Command1_Click（）Open "d:/temp/outf.txt" For Output As #1F．or i = 1 To Len（Text1.Text） c = Mid（Text1.Text, i, 1） If c >= "A" And c

[单选题]在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（）D．im array1（10, 10） As IntegerD．im i As Integer, j As IntegerF．or i = 1 To 3F．or j = 2 To 4array1（i, j） = i + jNext jNext iText1.Text = array1（2, 3） + array1（3, 4）E．nd Sub程

[单选题]在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：Private Sub Command1_Click（）n = Val（Text1.Text）F．or i = 2 To nF．or j = 2 To sqr（i）If i Mod j = 0 Then Exit ForNext jIf j > Sqr（i） Then Print iNext iE．nd Sub该事件过程的功能是（ ）。A．输出n以内的奇数B．输出n以内的偶数C．输出n以内的

[单选题]在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Option Base 1Private Sub Command1_Click( )D．im s As IntegerD．im aa(3, 2) As IntegerF．or i = 1 To 3F．or j = 1 To 2aa(i, j) = i + jNext jNext is = aa(1, 2) + aa(2, 1)Print sE．nd Sub程序运行后，单击命令按钮，窗体上显示的值是

[单选题]在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：Private Sub Command1_Click() n = Val (Text1.Text) For i = 2 To n For j = 2 To Sqr(i) If i Mod j = 0 Then Exit For Next j If j > Sqr (i) Then Print i Next iEnd Sub 该事件过程的功能是。A．输出n以内的奇数B．输出n以内的偶数C．输出