( 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

( 32 )在窗体上画 1 个命令按钮和 1 个文本框,其名称分别为 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

程序运行后,在文本框中输入 “ Number100 ” ,并单击命令按钮,则文本框中显示的是

A ) NUMBER 100

B ) REBMUN

C ) REBMUN 100

D ) 001 REBMUN


相关考题:

在窗体上画1个名称为Command1的命令按钮和2个名称分别为Text1、Text2的文本框,如图所示,然后编写如下程序:Function Fun(x As Integer,ByVal y As Integer)As Integerx=x+yIf x0 ThenFun=xElseFun=yEnd IfEnd FunctionPrivate Sub Command1_Click()Dim a As Integer,b As Integera=-10:b=5Text1.Text=Fun(a,b)Text2.Text=Fun(a,b)End Sub程序运行后,单击命令按钮,Text1和Text2文本框显示的内容分别是______和______。

在窗体上画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

在窗体上画1个名称为Command1和命令按钮和2个名称分别为Text1、Text2的文本框,如图所示,然后编写如下程序:Function Fun(X As Integer,ByVal y As Integer)As Integerx=x+yIf X<0 ThenFun=xElseFun=yEnd IfEnd FunctionPrivate Sub Command1 Click()Dim a As Integer,b As Integera=-10:b=5Text1.Text=Fun(a,B)Text2.Text=Fun(a, B)End Sub程序运行后,单击命令按钮,Text1和Text2文本框显示的内容分别是【 】和【 】。

在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为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的命令按钮,然后编写如下事件过程:程序运行后,单击命令按钮,在文本框中显示的值是A.2B.3C.4D.5

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的是A. VisualB.BasicC.ProgramD.出错

在窗体上画两个文本框(其Name属性分别为Text1和Tex12)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程: 程序运行后,单击命令按钮,在两个文本框中显示的值分别为()。A10和0B2和100C3和50D4和168

在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入“同学们,”和“你们好”,然后单击命令按钮,则输出结果为多少?