在窗体上画l个命令按钮和l个文本框，其名称为Command1和Text1，再编写如下程序：Dim ss As StringPrivate Sub Text1 KeyPress(KeyAscii As Integer)If Chr(KeyAscii)Then ss=ss+Chr(KeyAscii)End SubPrivate Sub Command1 Click（ ）Dim m As String，i As IntegerFor i=Len(ss)To 1 Step-1m=m+Mid(SS，i，1)NextText1．Text=UCase(m)End Sub程序运行后，在文本框中输入“Number 100”，并单击命令按钮，则文本框中显示的就是（ ）。A.NUMtBER l00B.REBMUNC.REBM UN l00D.001 REBMUN
在窗体上画l个命令按钮和l个文本框，其名称为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
程序运行后，在文本框中输入“Number 100”，并单击命令按钮，则文本框中显示的就是（ ）。
A.NUMtBER l00
B.REBMUN
C.REBM UN l00
D.001 REBMUN
相关考题：
在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，然后编写如下代码：Dim SaveAll As StringPrivate Sub Command1_Click（）Text1.Text=Left（UCase（SaveAll），4）End SubPrivate Sub Text1_KeyPress（KeyAscii As Integer）SaveAll=SaveAll+Chr（KeyAscii）End Sub程序运行后，在文本框中输入abcdefg，单击命令按钮，则文本框中显示的内容是______。
在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labell，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Labell.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是 ______。A．27B．28C．29D．30
（ 32 ）在窗体上画 1 个命令按钮和 1 个文本框，其名称分别为 Command1 和 Text1 ，再编写如下程序 ：Dim ss As StringPrivate Sub Text1_KeyPress(KeyAscii As integer)If chr(KeyAscii) ”” Then ss=ss+chr(KeyAscii)End SubPrivate Sub Command1_Click()Dim m As String,i As IntegerFor i=Len(ss) To 1 step -1m=m+Mid(ss,i,1)NextText1.Text=Ucase(m)End Sub程序运行后，在文本框中输入 “ Number100 ” ，并单击命令按钮，则文本框中显示的是A ） NUMBER 100B ） REBMUNC ） REBMUN 100D ） 001 REBMUN
在窗体上画1个命令按钮和1个文本框，其名称分别为Commandl和Textl，再编写如下程序：Dim 88 As StringPrivate Sub Textl—KeyPress(KeyAscii As Integer)If Chr(KeyAscii)””Then ss=ss+Chr(KeyAscii)End SubPrivate Sub Commandl_Click()Dim m As String，i As IntegerFor i=ten(ss)To 1 Step-1Ill=m+Mid(88,，i，1)NextTextl．Text=UCase(n1)End Sub运行程序后，在文本框中输入“Number 100”，并单击命令按钮，则文本框中最示的是A．NUMBER 100B．REBMUNC．REBMUN 100D．001 REBMUN
在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labe11，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(TextText)+0.5) LabeCaption=Str(x) End Sub 程序运行后，在文本框中输入653，单击命令按钮，标签中显示的内容是______。A．27B．28C．29D．30
设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。A. 30B. 25C. 20D. 15
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是A． VisualB．BasicC．ProgramD．出错
在窗体上画l个命令按钮和l个文本框，其名称为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 程序运行后，在文本框中输入“Number 100”，并单击命令按钮，则文本框中显示的就是（ ）。A.NUMtBER l00B.REBMUNC.REBM UN l00D.001 REBMUN