首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form_Load()
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form_Load()
admin
2015-08-13
56
问题
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:
Dim SaveAll As String
Private Sub Form_Load()
Show
Text1.Text=""
Text1.SetFocus
End Sub
Private Sub C.ammand1_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://www.kaotiyun.com/show/ZSQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在显示字体对话框之前必须设置【】属性,否则,将发生字体不存在的错误。
设在工程中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString*10TelNumAsString*20EndType在窗体中添加一个名为Commandl的命令按钮,要求
在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下两个事件过程:PrivateSubCommandlClick()a=
在C:\Pic文件夹中有一个图形文件,名为Welcome.gif。为了将该图形装入窗体Form1,应使用的语句为()
在窗体上画一个命令按钮,然后编写如下程序(假定变量x是—个窗体级变量)DimxAsIntegerSubinc(aASInteger)X=K+aEndSubPrivateSubCommand1
使用目录列表框的______属性可以返回或设置当前工作目录的完整路径(包括驱动器盘符)。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在Forml的窗体上建立一个主菜单,标题为“命令”,名称为Com,该菜单有3个子菜单,其标题分别为“输出”、“删除”和“关闭”,其名称分别为Prin、Del和Clos
与数学表达式COS2(a+B)/5x+8对应的VisualBasic表达式是【】。
下列关于文件的叙述中,说法不正确的是()。
在面向对象程序设计中,从外面看只能看到对象有外部特征,而不知道也无须知道数据的具体结构以及实现操作的算法,这称为对象的______。
随机试题
脾的胸腺依赖区是()
一把长25cm的无菌镊子浸泡在消毒液中,消毒液面需浸没镊子的长度是()。
下列哪项肾结核手术的治疗原则是不正确的()
王某在申请初始注册时应具备的条件的描述中正确的是()。王某有()的情形,则注册机关不予注册。
账户没有固定的格式和结构。()
BP曲线用以考察国际收支平衡时()两个宏观经济变量之间的关系。
证券服务机构从事证券服务业务必须得到()和有关主管部门批准。
(2014.·内蒙古)闭卷考试时,学生主要的记忆活动是()
下列各句中,没有语病的一句为()。
Themedievalchurchcondemnedman’spartakingin______pleasures.
最新回复
(
0
)