在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，再编写如下程序： Dim ss As String Private Sub Text1_KeyPress(KeyAscii As Integer) 　　If Chr(KeyAsc

admin2019-06-20 27

问题在窗体上画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
程序运行后，在文本框中输入"Number 100"，并单击命令按钮，则文本框中显示的是(　　)。

选项 A、NUMBER 100
B、REBMUN
C、REBMUN 100
D、001 REBMUN

答案D

解析题目中程序是将ss字符串进行反向排列，并放到m中去。其中Number空格后的100被当成字符串来处理，最后结果是将"Number 100"反向排列，并通过UCase()函数将所有字母转换成大写，得到001 REBMUN。

转载请注明原文地址:https://kaotiyun.com/show/PcUp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，再编写如下程序： Dim ss As String Private Sub Text1_KeyPress(KeyAscii As Integer) 　　If Chr(KeyAsc

二级VB

NCRE全国计算机二级

清根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在标题为“文本框”、名称为Forml的窗体上面一个名称为Text1的文本框，无初始内容，其高、宽分别为2000、1800，可显示多行，有水平滚动条，并通过属性窗口

Fibonacci数列的规律是：前2个数为1，从第3个数开始，每个数是它前2个数之和，即：1，1，2，3，5，8，13，21，34，55，89，…。某人编写了下面的函数，判断大于1的整数x是否是Fibonacci数列中的某个数，若是，则返回True，否则返

以下程序在文本框Text1中输入任一字符串，并按相反的次序显示在文本框Text2中，在横线处应填写()。DimNAsString，CAsString，DAsStringN=Text1．TextM=______________F

以下能对正实数d的第3位小数四舍五入的表达式是

表达式4+5＼6*7／8Mod9的值是()。

软件调试的目的是()。

软件测试用例包括()。

水泥包装袋两侧应根据水泥的品种采用不同的颜色印刷水泥名称和强度等级，代表硅酸盐水泥的是()。

什么叫抗拉强度？

注入水中含油量高会提高油井产油量。()

胆囊中有限量胆汁酸之所以能发挥最大限度乳化食物中脂肪的作用原因是：

A、Volkmann缺血挛缩B、创伤性关节炎C、关节僵硬D、脂肪栓塞E、骨化性肌炎(损伤性骨化)石膏或夹板过紧会引起

(2006年)某项目的净年值小于零，则()。

在投资者只关注(　　)的假设前提下，马柯威茨的理论是完全准确的。

下列属于“周转材料一包装物”科目核算范围的是()。

股份有限公司欲收购本公司的股份，下列表述正确的有()。

下列对于决策目标确定要求的说法有误的是()。

在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，再编写如下程序： Dim ss As String Private Sub Text1_KeyPress(KeyAscii As Integer) If Chr(KeyAsc

二级VB

NCRE全国计算机二级

清根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在标题为“文本框”、名称为Forml的窗体上面一个名称为Text1的文本框，无初始内容，其高、宽分别为2000、1800，可显示多行，有水平滚动条，并通过属性窗口

Fibonacci数列的规律是：前2个数为1，从第3个数开始，每个数是它前2个数之和，即：1，1，2，3，5，8，13，21，34，55，89，…。某人编写了下面的函数，判断大于1的整数x是否是Fibonacci数列中的某个数，若是，则返回True，否则返

以下程序在文本框Text1中输入任一字符串，并按相反的次序显示在文本框Text2中，在横线处应填写()。DimNAsString，CAsString，DAsStringN=Text1．TextM=______________F

以下能对正实数d的第3位小数四舍五入的表达式是

表达式4+5＼6*7／8Mod9的值是()。

软件调试的目的是()。

软件测试用例包括()。

水泥包装袋两侧应根据水泥的品种采用不同的颜色印刷水泥名称和强度等级，代表硅酸盐水泥的是()。

什么叫抗拉强度？

注入水中含油量高会提高油井产油量。()

胆囊中有限量胆汁酸之所以能发挥最大限度乳化食物中脂肪的作用原因是：

A、Volkmann缺血挛缩B、创伤性关节炎C、关节僵硬D、脂肪栓塞E、骨化性肌炎(损伤性骨化)石膏或夹板过紧会引起

(2006年)某项目的净年值小于零，则()。

在投资者只关注( )的假设前提下，马柯威茨的理论是完全准确的。

下列属于“周转材料一包装物”科目核算范围的是()。

股份有限公司欲收购本公司的股份，下列表述正确的有()。

下列对于决策目标确定要求的说法有误的是()。

在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，再编写如下程序： Dim ss As String Private Sub Text1_KeyPress(KeyAscii As Integer) 　　If Chr(KeyAsc

在投资者只关注(　　)的假设前提下，马柯威茨的理论是完全准确的。