单选题
在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，再编写如下程序：
Dim ss As String
Private Sub Text1_KeyPress(KeyAscii As Integer)
If Chr(KeyAscii) ＜＞"" Then ss=ss+Chr(KeyAscii)
End Sub
Private Sub Command1_Click()
Dim m As String，i As Integer
For i=Len(ss) To 1 Step-1
m=m+Mid(ss，i，1)
Next
Text1.Text=UCase(m)
End Sub
运行程序后，在文本框中输入“Number100”，并单击命令按钮，则文本框中显示的是
Ａ) NUMBER 100 Ｂ) REBMUN Ｃ) REBMUN 100 Ｄ) 001 REBMUN