首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设窗体上有2个文本框Text1和Text2,并有下面的事件过程: Dim n Private Sub Text1_KeyPress(KeyAscii As Integer) If"A"<=Chr(KeyAscii)And Chr(KeyAscii)<="Z
设窗体上有2个文本框Text1和Text2,并有下面的事件过程: Dim n Private Sub Text1_KeyPress(KeyAscii As Integer) If"A"<=Chr(KeyAscii)And Chr(KeyAscii)<="Z
admin
2016-09-19
44
问题
设窗体上有2个文本框Text1和Text2,并有下面的事件过程:
Dim n
Private Sub Text1_KeyPress(KeyAscii As Integer)
If"A"<=Chr(KeyAscii)And Chr(KeyAscii)<="Z"Then
n=n+1
End If
If KeyAscii=13Then Text2.Text=n
End Sub
程序运行时,在文本框Text1中输入“Visual Basic6.0”并按回车键后,在文本框Text2中显示的是
选项
A、2
B、9
C、13
D、16
答案
A
解析
KeyPress(KeyAscii As Integer)事件是在对象具有焦点时,按下键盘上的键触发的,KcyPress(KLeyAscii As Integer)事件中KeyAscii参数是所按键的ASCII代码,该参数不显示键盘的物理状态,而只是传递一个字符代码。KeyPress将每个字符的大、小写形式作为不同的键代码解释,即作为两种不同的字符。在本题中n的值是文本框中大写字母的个数。
转载请注明原文地址:https://kaotiyun.com/show/yOLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮Command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:DimStr1AsString,str2AsStringPrivateSubform_load() Text1
以下关于选项按钮的说法,正确的是()。
用于获得字符串S最左边4个字符的函数是()。
假定建立了一个名为Command1的命令按钮数组,则以下说法中错误的是()。
假定有如下事件过程:PrivteSubForm_Click0 DimxAsInteger,nAsInteger x=1 n=0 DoWhilex<28 x=x*3
使用驱动器列表框Drivel?目录列表框Dirl?文件列表框Filel时,需要设置控件的同步。以下能够正确设置两个控件同步的命令是
关于菜单设计,下列叙述中错误的是()。
在表达式2+3*4^5-Sin(x+1)/2中,首先进行的运算是()。
下列叙述中,不属于软件需求规格说明书的作用的是()。
表达式"12345"<>"12345"&"ABC"的值是______。
随机试题
已知某企业生产销售甲乙两种产品,2018年销售量分别为20万件和30万件,单价分别为40元和60元,单位变动成本分别为24元和30元,单位变动销售费用和管理费用分别为20元和25元,固定成本总额为200万元,则下列说法正确的有()。
三相正弦交流电路中,对称三相正弦量具有()。
Severalrecentstudieshavefoundthatbeingrandomly(随机地)assignedtoaroommateofanotherracecanleadtoincreasedtolerance
道德与法律都属于社会规范的范畴,都具有规范性、强制性和有效性,道德与法律既有区别又有联系。下列有关法与道德的几种表述中,哪种说法是错误的?()
企业在进行资本预算时需要对债务成本进行估计。如果不考虑所得税的影响,下列关于债务成本的说法中,错误的是()。
旅游服务
下列关于文学常识的表述,正确的有()。
Signslike"Pleaseratemefivestars"pointtoagrowingproblemwithbusinessesintheon-demandeconomyofapp-basedservices
Itseemsthatoursocietyfavorsakindofritualizedaggression.Everywhereyoulook,innewspapersandontelevision,issuesa
Mannersaredifferentineverycountry;buttruepolitenessiseverywherethesame.Mannersareonly【C1】______helpswhichignor
最新回复
(
0
)