首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
新建一个工程,在窗体中创建两个文本框,其名称分别为Text1和Text2。编写一个事件过程,实现在程序运行后,当文本框Text1获得焦点时,其前景颜色与背景颜色交换显示。如图13所示。程序中不得使用任何变量。 注意:存盘时必须存放在考生文件夹下,工程
新建一个工程,在窗体中创建两个文本框,其名称分别为Text1和Text2。编写一个事件过程,实现在程序运行后,当文本框Text1获得焦点时,其前景颜色与背景颜色交换显示。如图13所示。程序中不得使用任何变量。 注意:存盘时必须存放在考生文件夹下,工程
admin
2009-03-17
44
问题
新建一个工程,在窗体中创建两个文本框,其名称分别为Text1和Text2。编写一个事件过程,实现在程序运行后,当文本框Text1获得焦点时,其前景颜色与背景颜色交换显示。如图13所示。程序中不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名为ylcl.vbp,窗体文件名为ylcl.frm。
选项
答案
(1)Visual Basic集成环境中,执行“文件”→“新建工程”命令,选择“标准Exe”。创建窗体Form1。 (2)在工具箱中选择文本框控件,在窗体上创建两个文本框。双击文本框Text1,弹出代码窗口,添加如下代码: Private Sub Text1_Gotfocus() Dim a As Long a=Text1. ForeColor Text1.ForeCotor=Text1.BackColor Text1.BackColor=a End Sub (3)按F5键运行程序。如图13所示。 (4)执行“文件”→“保存工程”命令,将工程文件命名为ylcl.vbp,窗体文件命名为 ylcl.tim。
解析
(1)第1小题中使用了临时变量a,在事件中,利用这个[临时变量将Text1的前景色与背景色进行交换。
转载请注明原文地址:https://kaotiyun.com/show/sj1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面ButtonFrame类创建了一个容器,包含有3个按键。importjavax.swing.*;publicclassButtonFrameextendsJFrame{JButtonButton1=ne
下面对形参的说法,正确的是()。
在一个长度为n的线性表中插入一个元素,以下说法不正确的是()。
Swing组件中可以通过拖动控件来设置数值的是()。
下列关于队列的叙述中正确的是()。
下面程序执行后的输出结果为()。publicclassfun{publicstaticvoidmain(Stringargs[]){Stringgreets="Ho
关于集合,下列叙述错误的是______。
某二叉树有5个度为2的结点,则该二叉树中的叶子结点数是()。
若有以下定义inta[]={1,2,3,4,5,6,7};charc1=’b’,c2=’2’;则数值不为2的表达式是()。
具有3个结点的二叉树有()。
随机试题
对单纯关节受累的风湿热患者,首选
隧道、人防工程,有高温、导电灰尘或灯具离地面高度低于2.4m等场所,电源电压应不大于()V。
下列关于发行人聘任保荐人和主承销商的说法正确的有()。[2008年真题]Ⅰ.发行人发行证券时,可以聘任2个主承销商Ⅱ.同次发行的证券,保荐人必须是主承销商Ⅲ.证券发行规模达到一定数量的,可以采用2个以上保荐机构联合保荐的方式Ⅳ.
A公司为一运输公司,经营国内、国际货物运输业务。A公司发现其拥有的货轮出现了减值迹象.于是A公司于2012年12月31日对其进行减值测试。相关资料如下:(1)A公司以人民币为记账本位币,国内货物运输采用人民币结算,国际货物运输采用美元结算。(2)货轮采
以个人财产出资设立的个人独资企业解散后,其财产不足清偿所负债务,对尚未清偿的债务,下列哪种处理方式不违反《个人独资企业法》的规定?()
美国实用主义教育家杜威关于学生在教育中的地位的主张,称为()。
A.keentoB.soakupC.amajorfactorD.bringaboutPhrases:A.children【T13】___________A-characteristicsissc
新民主主义社会的主要矛盾是()
请在“考试项目”菜单上选择相应的菜单项,完成以下内容:某体育网站的主页地址是:http://www.343.com,打开此主页,浏览“中国足球”页面,将“足球联赛”页面内容以文本文件的格式保存到指定的目录下,命名为“zqls,txt”。
WhatdoestheprofessorsayweretwoimportantfactorsinthedeclineinsilvermininginParkCity,Utah?Clickon2answers.
最新回复
(
0
)