首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画1名为Commandl的命令按钮和1名Textl的文本框,再编写如下程序: Dim ss As String Private Sub Text l_KeyPress(KeyAscii As Integer) If Chr(KeyAscii)<
在窗体上画1名为Commandl的命令按钮和1名Textl的文本框,再编写如下程序: Dim ss As String Private Sub Text l_KeyPress(KeyAscii As Integer) If Chr(KeyAscii)<
admin
2019-04-29
20
问题
在窗体上画1名为Commandl的命令按钮和1名Textl的文本框,再编写如下程序:
Dim ss As String
Private Sub Text l_KeyPress(KeyAscii As Integer)
If Chr(KeyAscii)<>””Then
ss=ss+Chr(KeyAscii)
End Sub
Private Sub Command l Click()
Dim m As String,i As Integer
For i=Len(ss)To 1 Step-1
m=m+Mid(ss,i,1)
Next
Text 1.Text=UCase(m)
End Sub
程序运行后,在文本框中输入“Number 100”,并单击命令按钮,则文本框中显示的是
选项
A、NUMBER 100
B、REBMUN
C、REBMUN 100
D、001 REBMUN
答案
D
解析
KeyPress(KeyAscii As Integer)事件是在对象具有焦点时,按下键盘上的键触发的,KeyPress(KeyAseii As Integer)事件中KeyAscii参数是所按键的ASCⅡ代码,该参数不显示键盘的物理状态,而只是传递一个字符代码。KeyPress将每个字符的大、小写形式作为不同的键代码解释,即作为两种不同的字符。Chr()可返回ASCⅡ码对应的字符。
本题程序运行后,在文本框中每输入一个字符,将执行Textl_KeyPress事件过程,变量ss的值也随即变化,当输入“Number100”后,变量ss=”Number100"。单击命令按钮后,执行Commandl_Click事件过程,将字符串“Numberl00”中的字符逆序排列并以大写形式显示在文本框中,即“001 REBMUN”。
转载请注明原文地址:https://jikaoti.com/ti/jgN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
通过一个属性可以获得文件列表框中当前被选中文件的文件名,这个属性是
若看到程序中有以下事件过程,则可以肯定的是,当程序运行时PrivateSubClick_MouseDown(ButtonAsInteger,——ShiftAsInteger,XAsSingle,YAsSingle)Print“VBP
产生100以内(不含100)2位随机整数的VisualBasic表达式是
以下能对正实数d的第3位小数四舍五入的表达式是
表达式Sgn(0.25)的值是
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
下面是求最大公约数的函数的首部()。Functionfun(ByValxAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是
以下描述中,不是线性表顺序存储结构特征的是()。
下列叙述中,不属于软件需求规格说明书的作用的是()。
随机试题
目前信息安全传送的标准模式是()
历代医籍中把哪些病称为积聚
国际法基本原则的特征之一是各国公认,这意味着()。
()负责期货投资者保障基金业务监管,对保障基金的筹集、管理和使用等情况进行定期核查。
下面有关证券交易所总经理的表述错误的是()。
企业向银行借入长期借款,若预测市场利率将上升,企业应与银行签订()。
非公有制经济作为促进经济社会发展的重要力量,是我国社会主义市场经济的重要组成部分,是为社会主义服务的。非公有制经济在促进经济社会发展过程中的作用,具体体现在
A、 B、 C、 B
ManagementinCyberspaceVirtualrealityisoftenusedtomimichazardousenvironments—cockpitsofcombataircraft,burning
TheFrenchgovernmentistobanstudentsfromusingmobilephonesinthecountry’sprimary,juniorandmiddleschools.Children
最新回复
(
0
)