单选题 在窗体上画1个命令按钮和1个文本框,其名称分别为Commandl和Text1,再编写
如下程序:
Dim ss As String
Private Sub Text1 KeyPress (KeyAscii As Integer)
If Chr (KeyAscii)<>""Then ss=ss+Chr (KeyAscii)
End Sub
Private Sub Commandl_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被当成字符串来处理,最后结果是将“Number 100”反向排列,并通过UCase()函数将所有字母转换成大写,得到001 REBMUN。