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