首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form_Load() Show
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form_Load() Show
admin
2015-10-23
42
问题
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:
Dim SaveAll As String
Private Sub Form_Load()
Show
Text1.Text=""
Text1.SetFocus
End Sub
Private Sub Command1_Click()
Text1.Text=LCase(SaveAll)+SaveAll
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
SaveAll=SaveAll+Chr(KeyAscii)
End Sub
程序运行后,直接用键盘输入:VB,再单击命令按钮,则文本框中显示的内容为( )。
选项
A、vbVB
B、不显示任何信息
C、VB
D、出错
答案
A
解析
窗体的KeyPreview属性用于设置或获取一个值,该值只是判断按键事件传递到具有焦点的控件前,窗体是否将接收此事件,该属性设为True时,窗体将会接收按键事件。因此在文本框中输入"VB"时,会先触发Form_KeyPress()事件,该事件将输入的字符保存到窗体模块变量SaveAll中,然后才会显示在文本框中。当单击命令按钮时,Lcase函数将变量SaveAll中的字符串"VB"转换为小写,为"vb",然后与原字符串连接,即"vb"+"VB",显示在文本框中则为"vbVB"。
转载请注明原文地址:https://jikaoti.com/ti/DnJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序运行时输出的结果是PrivateSubForm_Click()Dimxx=Array("天天向上","清华大学","天上人间","程序设计")Fori=LBound(a,1)toUBound(a,1)IfLeft(a
下面程序运行后,输出的结果是Dimarr(3,3)Forj=1To3Fork=1To3Arr(j,k)=(j-1)*3+kNextkNextjForj=2To3Forj=2To
在用通用对话框控件建立"打开"或"保存"文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是
在程序中添加一个命令按钮,并编写如下代码。己知程序的运行结果为如下矩阵,请在[]和[]处填上正确答案使程序完整。1000011001101001
以下关系表达式中,其值为假的是
在数据库设计中,将E-R图转换为关系模式的过程属于()。
语句DimArr(3To5,-2To2)定义的数组的元素个数是()。
相对于数据库系统,文件系统的主要缺陷有数据关联差、数据不一致性和
下述关于数据库系统的叙述中正确的是
随机试题
身热,微恶风寒,汗出,头痛,咳嗽,咽燥,口渴,治疗应选用
胃溃疡的并发症最常见的是()。
煤中( )可用物理方法去除。
尾矿工程的单位工程包括有()。
关于税款追征和补缴,下列表述正确的是( )。
Doyoufindgettingupinthemorningsodifficultthatit’spainful?Thismightbecalledlaziness,butDr.Kleitmanhasanewexp
社会主义承认社会价值,否认个人价值。()
提问是课堂教学中常用的教学策略,问题的认知水平与学生回答的认知水平之间存在正相关.请从下列问题归类到相应的认知水平栏目中(只需填写序号即可)。
设离散型二维随机变量(X,Y)的取值为(xi,yj)(i,j=1,2),且P{X=x2|=,P{y=y1|X=x2}=,p{X=x1|Y=y1}=,试求:(I)二维随机变量(X,Y)的联合概率分布;(II)条件概率P{Y=yj|X=x1},j=1,2.
Writingisnotexactlyateamsport.【C1】______awriteryouspendmostofyourtimechuggingawaybyyourlonesome,withonlyyo
最新回复
(
0
)