( 32 )在窗体上画 1 个命令按和 1 个文本框,其名称分别为 Command1 和 Text1 ,再编写如下程序 : Dim ss As String Private Sub Text1_KeyPress(KeyAscii As integer) If chr(KeyAscii)$amp 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 ” ,并单击命令按,则文本框中显示的是