首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画1个命令按钮和1个文本框,其名称分别为Command1和Text1,再编写如下程序: Dim ss As String Private Sub Textl_KeyPress(KeyAscii As Integer) If
在窗体上画1个命令按钮和1个文本框,其名称分别为Command1和Text1,再编写如下程序: Dim ss As String Private Sub Textl_KeyPress(KeyAscii As Integer) If
admin
2020-07-22
53
问题
在窗体上画1个命令按钮和1个文本框,其名称分别为Command1和Text1,再编写如下程序:
Dim ss As String
Private Sub Textl_KeyPress(KeyAscii As Integer)
If Chr(KeyAseii)<>””Then ss=fls+Chr(KeyAseii)
End Sub
Private Sub Commandl_Click()
Dim m As String,i As Integer
For i=Len(as)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/8wHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1_Click() d=0 c=10 x=Array(10,12,21,32,24) Fori=
设工程文件中包名称分别为Form1、Form2的两个窗体,且Form1的菜单属性设置如下:窗体Form1中的程序如下:DimFlagAsBooleanPrivateSubForm_Load() Flag=TrueEndSubPr
设有如下的程序段:s=0i=1Whilei
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是()。
设在工程文件中有一个标准模块,其中定义了如下记录类型:TypeBooks NameAsString*10 TelNumAsString*20EndType在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Co
已知:x=-6y=39则表达式"y\x*Sgn(x)"的值为( )。
为了使名称为Command1的命令按钮右移200,应使用的语句是()。
下列叙述中正确的是( )。
有三个关系R、S和T如下: 则由关系R和S得到关系T的操作是( )。
随机试题
Actingissuchanover-crowdedprofessionthattheonlyadvicethatshouldbegiventoayoungpersonthinkingofgoingonthes
某环境空气的干球温度为30℃,湿球温度为26℃,则空气的含湿量为()。
退休计划的筹资方法中,属于一次性的大额供款的是( )。
基金管理人在收到基金准予注册文件6个月之后才开始募集,原注册的事项未发生实质性变化的,应向国务院证券监督管理机构()。
关于应付股利,下列说法中错误的有()。
皮亚杰认为,7~12岁儿童,其认识发展处于()。
美国著名心理学家罗森塔尔等人指出:人的情感和观念会不同程度地受到别人下意识的影响。人们会不自觉地接受自己喜欢、钦佩、信任和崇拜的人的影响和暗示。管理学上把该效应称之为()。
甲是被告人乙的辩护律师,甲唆使证人丙作伪证,下列说法正确的是()。
U.S.healthofficialsareincreasingsurveillancemeasuresatdoctors’officesandinternationalborderstoguardagainstthes
Shellfishgivethedeceptiveappearanceofenjoyingapeacefulexistence,althoughinfactlifeisaconstantstruggleforthem.
最新回复
(
0
)