首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
新建一个工程,在窗体中创建两个文本框,其名称分别为Text1和Text2。编写一个事件过程,实现在程序运行后,当文本框Text1获得焦点时,其前景颜色与背景颜色交换显示。如图13所示。程序中不得使用任何变量。 注意:存盘时必须存放在考生文件夹下,工程
新建一个工程,在窗体中创建两个文本框,其名称分别为Text1和Text2。编写一个事件过程,实现在程序运行后,当文本框Text1获得焦点时,其前景颜色与背景颜色交换显示。如图13所示。程序中不得使用任何变量。 注意:存盘时必须存放在考生文件夹下,工程
admin
2009-03-17
40
问题
新建一个工程,在窗体中创建两个文本框,其名称分别为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全国计算机二级
相关试题推荐
为了使模块尽可能独立,要求()。
向Applet中画图、画图像、显示字符串,都要用的方法是()。
在JavaApplet程序用户自定义的Applet子类中,一般需要重载父类的()方法来完成主类实例的初始化工作。
如果抛出异常,则应用语句()。
下面OneFrame类创建了一个名为ThisisaFrame的窗口。importjava.awt.*;publicclassOneFrameextendsFrame{publicstaticvoid
下列安全控制命令中,属于现实证书缓存区和密钥表项命令的是()。
假设线性表的长度为n,则在最坏情况下,冒泡排序需要的比较次数为【】。
关于J2SDK的基本命令,下列叙述正确的是______。
对于构造方法,下列叙述正确的是______。
给出下面程序的代码:byte[]array1,array2[];bytearray3[][];byte[][]array4;下面数组操作语句中______是不正确。
随机试题
Theword"brick"didnotappearintheEnglishlanguagebeforethe15thcentury.Bricks_______【C1】havebeenknowninBritainbef
小儿初次感染结核菌至产生变态反应的时间是
设置固定资产类别。固定资产类别编码:7固定资产类别名称:电子设备折旧类型:正常计提折旧折1日方法:平均年限法预计使用年限:20年预计净残值率:5%
甲公司系增值税一般纳税人,购进货物及销售商品适用的增值税税率为17%,发生有关债务重组经济业务如下:(1)2013年1月1日与丙银行协商并达成协议,将丙银行于2012年1月1日贷给甲公司的3年期,年利率为9%,本金为500万元的贷款进行债务重组,丙银行对
交易/定价错误属于操作风险内部流程类的因素,它是指在交易的过程中,()。
某股份有限公司拟建造一条生产线,于2012年1月1日开工并支付第一笔工程款1500万元,至2012年12月31日尚未完工。2011年1月1日借入一般借款(为公司债券)10000万元,利率8%,期限为3年。2011年12月1日借入一般借款2000万元,
学前教育阶段美育的重点在于培养幼儿()。
设函数,则[].
“正当防卫超过必要限度的,都要承担刑事责任。”请结合我国正当防卫制度的有关规定对这句话进行辨析。
Botany,thestudyofplants,occupiesapeculiarpositioninthehistoryofhumanknowledge.Formanythousandsofyearsitwas
最新回复
(
0
)