首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮和一个文本框(名称分别为Commandl和Textl),并把窗体的KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form KeyPress(KeyAsc
在窗体上画一个命令按钮和一个文本框(名称分别为Commandl和Textl),并把窗体的KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form KeyPress(KeyAsc
admin
2019-03-08
95
问题
在窗体上画一个命令按钮和一个文本框(名称分别为Commandl和Textl),并把窗体的KeyPreview属性设置为True,然后编写如下代码:
Dim SaveAll As String Private Sub Form KeyPress(KeyAscii—
Private Sub Form Load()As Integer)
Textl.Text=Textl.SetFocusSaveAll=SaveAll+Chr(KeyAscii)
End SubEnd Sub
Private Sub Comman
选项
A、vbVB
B、不显示任何信息
C、VB
D、出错
答案
A
解析
本题考查的考点是有关键盘事件的。KevPreview属性用于设置是否在控件的键盘事件之前激活窗体的键盘事件。KeyPress(KeyAscii As Integer)事件是在对象具有焦点时,按下键盘上的键时触发的事件,KevAscii参数是所按键的ASCII的代码,将每个字符的大、小写形式作为不同的键代码解释。本题中输入“VB”的时候触发了窗体的KeyPress事件,将全局变量SaVeAll设置为了“VB”,所以单击命令按钮后,文本框中的值为“vbVB”。
转载请注明原文地址:https://kaotiyun.com/show/jaFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面程序代码:PrivateSubCommand1_Click()DimaAsIntegerFork=1To3x=fun(A)NextkPrintx,aEndS
命令按钮Command1的事件过程如下:PrivateSubCommand1_Click() Dimarr(5,5)AsInteger DimiAsInteger,jAsInteger Fori=1To4
在窗体上画一个名称为Command1的命令按钮,并编写如下程序:FunctionFun(x) y=0 Ifx
在考生文件央下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框
已知列表框控件List1中已放入若干表项,下列关于List1的叙述中错误的是
窗体上有1个名称为Text1、内容为空的文本框。编写如下事件过程:PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger) PrintText1.Text;EndSub运行程序,
已知:x=-6y=39则表达式"y\x*Sgn(x)"的值为( )。
设有表达式:A=IIf(x>y,"go","back")。以下与该表达式具有相同功能的语句是
随机试题
行吟泽畔,颜色憔悴,形容枯槁。(《渔父》)
纤维蛋白原变为纤维蛋白需要哪一种凝血因子参与
男性,40岁,例行正常体检时发现脾大达肋下5cm,化验血白细胞升高达60×109/L,临床疑诊为慢性粒细胞白血病下列对诊断最有帮助的是
某建设用地项目需征收基本农田以外的耕地25hm2和其他土地75hm2,根据《中华人民共和国土地管理法》,应分别报()审批。
下列关于融资方案的表述,错误的是( )。
按照承保方式划分,保险可以分为()。
2008年,包括中国在内的全球很多国家CPI上涨,则债券投资者承担的风险是()。
甲公司为增值税一般纳税人,适用的增值税税率为17%,商品销售价格不含增值税;确认销售收入时逐笔结转销售成本。2010年12月份,甲公司发生如下经济业务:(1)12月2日,向乙公司销售A产品,销售价格为600万元,实际成本为540万元。产品已发出,款项存
感受与欣赏是音乐学习的重要领域,其主要内容包括四个方面,下列不属于感受与欣赏的内容的是()
Ifyou______smoking,yourhealthwillimprovesoon.
最新回复
(
0
)