问题
单项选择题
在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，再编写如下程序：
Dim ss As String
Private Sub Text1_KeyPress(KeyAscii As Integer)
If Chr(KeyAseii) ＜ ＞ Then ss = ss + Chr(KeyAseii)
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
程序运行后，在文本框中输入“Number 100”，并单击命令按钮，则文本框中显示的是( )。
A) NUMBER 100
B) REBMUN
C) REBMUN 100 D) 001 REBMUN
答案
参考答案：D
解析： 题目中程序是将ss字符串进行反向排列，并放到m中去。其中Number空格后的100被当成字符串来处理，最后结果是将“Number100”反向排列，并通过UCase()函数将所有字母转换成大写，得到001 REBMUN。