在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框，在文本框中输入以下字符串：Microsoft Visual Basic Programming 然后编写如下事件过程： Private Sub Commandl_Click() Open"d:/temp/outf,txt"For Ouput As #1 For i=1 To Len(Text1.Text) c=Mid(Text1.Text,i,1) If c＞="A"And C＜="Z"Then Print #1,LCase(C)End If Next i Close End Sub 程序运行后，单击命令按钮，文件outf.txt中的内容是______。

A．MVBP

B．mvbp

C．M

D．m V V B b P p

[单选题]在窗体上画一个名称为Text1的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Dim arrayl(10,10)As Integer Dim i As Integer,j As Integer For i=1 To 3 For j=2 To 4 array l(i,j)=i+j Next j Next i Text1.Text=arrayl(2,3)+arrayl(3,4) End Sub 程序运行后，单击命令按钮

[单选题]在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令按钮，然后编写如下事件过程：Private Commandl_Click（）D．im i As Integer, n As IntegerF．or i=0 To 50i = i+3n = n+1If i>10Then Exit ForNextTextl.Text=Str（n）E．nd Sub程序运行后，单击命命令按钮，在文本框中显示的值是（ ）。 A．5B．4C．3D．2

[单选题]在窗体上画一个名称为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的文本框和一个名称为Commmand1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click () Dim array 1 (10, 10) As Integer Dim i, j As Integer for i = 1 To 3 for j = 2 To 4 array1(i, j)= i+ j Next j Next i Text1.Text= array1(2, 3) +array1(3, 4)End Sub程序运行后，单击命

[单选题]在窗体上画一个名称为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

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

[单选题]3在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Text1)，然后编写如下事件过程： Private Sub Commandl_Click() x=Val(Text1.Text) SelectCaseX Case 1，3 y=X*X CaseIS＞=10，IS＜=-10 y=X Case-10 To 10 y=-X End Select End SA．执行y=x*xB．执行y=-xC．先执行y=x*x，再执行y=-xD．程序出错

[单选题]在窗体上画一个名称为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

[单选题]在窗体上画一个名称为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程