问题
单项选择题
在窗体上画一个命令按钮和一个文本框，其名称分别为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
运行程序后，在文本框中输入"Visual Basic 2011"，并单击命令按钮，则文本框中显示的是______。
A) VISUAL BASIC
B) ISUAL BASIC 2011
C) CISAB LAUSIV 2011
D) 1102 CISAB LAUSIV
答案
参考答案：D
解析： 题目中程序是将ss字符串进行反向排列，并放到m中去。其中Visual Basic空格后的2011被当成字符串来处理，最后结果是将"Visual Basic 2011"反向排列，并通过UCase()函数将所有字母转换成大写，得到1102 CISABLAUSIV。