首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设窗体上有一个名称为Text1的文本框,要求在文本框中输入的字母都变成大写,下面可以实现这一功能的事件过程是( )。
设窗体上有一个名称为Text1的文本框,要求在文本框中输入的字母都变成大写,下面可以实现这一功能的事件过程是( )。
admin
2015-09-23
54
问题
设窗体上有一个名称为Text1的文本框,要求在文本框中输入的字母都变成大写,下面可以实现这一功能的事件过程是( )。
选项
A、Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Sub
B、Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = UCase(KeyAscii)
End Sub
C、Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = KeyAscii + 1
End Sub
D、Private Sub Text1_Change()
KeyAscii = UCase(KeyAscii)
End Sub
答案
A
解析
KeyPress英文意按键。当按下某个键,所触发的是KeyPress事件。其中"KeyAscii"是一个预定义变量,执行KeyPress过程时,该变量是指所按键的ASCII码。类型转换函数Chr(n):把n转换成相应的字符,其中表达式n的值是合法的ASCII码值。字符串大写转换函数Ucase(s)将字符串s中的小写字母转换成大写字母。Asc(c)将返回该字符的ASCII码值。Asc(Ucase(Chr(KeyAscii)))是先将输入的ASCII码转换成字符再将其转换成大写字母,然后获取该大写字母的ASCII值,故A选项正确。其他选项均不能实现大写转换的功能。
转载请注明原文地址:https://kaotiyun.com/show/qQLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要对顺序文件进行写操作,下列打开文件语句中正确的是______。
把窗体的KeyPreview属性设置为True,然后编写如下事件过程:PrivateSubForm_KeyPress(KeyAsciiAsInteger)DimChAsStringCh=Chr(KeyA
下面对对象概念描述错误的是______。
一棵二叉树有10个度为1的结点,7个度为2的结点,则该二叉树共有_______个结点。
下列叙述中正确的是()。
表达式(2+8*3)/2的值是______。
有下面一个程序段,从文本框中输人数据,如果该数据满足条件“除以4余1,除以5余2”,则输出,否则,将焦点定位在文本框中,并清除文本框的内容。PrivateSubCommandl_Click()x=Val(Text1.Text)
设A$="北京",B$="Shanghai",则表达式LEFTS(A$,2)+STRINGS(3,"-")+LEFTS(BS,8)构成的字符串是
下列程序段的功能是:从文本框中输入一个数值,如果该数值满足“除以4余1,除以5余2”条件,则在窗体上输山文本框中的数值,否则,将焦点定位在文本框中,并清除文本框的内容。请填空。PrivateSubCommand1_Click()x=Val(Text
软件工程研究的内容主要包括:软件开发技术和______________。
随机试题
用柴胡疏肝理气,兼引诸药入肝经的方剂是
苏轼《卜算子》:“谁见幽人独往来,缥缈孤鸿影。”“幽人”的典故出自()
慢性呼吸衰竭最常并发的酸碱失衡是
为了反映收到股票股利的情况,企业应在( )中登记所增加的股数,以表明每股投资成本的减少。
微型计算机上的Shift键称为()。
支付相当于员工岗位价值的薪酬,体现了()原则。
关于通配符的使用,下列说法中不正确的是()。
Languageisthemeansbywhichthethoughtsandfeelingsofonepersonarecarriedtoanotherpersonsothattheyareunderstood
A、Shefoundshewasn’tregisteredinChemistry302A.B、ShefoundshewasregisteredinChemistry302B.C、Shewasunsurewhichcl
Ifyou’rethinkingaboutrelocatingforanewjob.there’sagoodchanceyoumayhavetocoveryourownmovingcosts,evenifyo
最新回复
(
0
)