[单项选择题] 在窗体上绘制一个名称为Command1的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串: Microsoft Sub Command1_Click() 然后编写如下
19 查阅
[单项选择题] 在窗体上绘制一个名称为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.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
V
B
P
D.m
v
b
p
参考答案: