首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Forml的窗体上画一个计时器,其名称为Timerl;再画一个图像框,其名称为Imagel,住该图像框中装入一个图形文件pic.ico;然后画一个水平滚动条,其名称为HScrolll,Min属性值为100,Max属性值为1200,LargeC
(1)在名称为Forml的窗体上画一个计时器,其名称为Timerl;再画一个图像框,其名称为Imagel,住该图像框中装入一个图形文件pic.ico;然后画一个水平滚动条,其名称为HScrolll,Min属性值为100,Max属性值为1200,LargeC
admin
2019-06-20
20
问题
(1)在名称为Forml的窗体上画一个计时器,其名称为Timerl;再画一个图像框,其名称为Imagel,住该图像框中装入一个图形文件pic.ico;然后画一个水平滚动条,其名称为HScrolll,Min属性值为100,Max属性值为1200,LargeChange属性值为100,SmallChange属性值为25,编写适当的事件过程。程序运行后,可以使图像框闪烁,其闪烁速度可以通过滚动条调节。
要求:图像框的闪烁可以通过图像框交替地显示和隐藏来实现。程序中不得使用变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt3.vbp,窗体文件名为sit3.frm。
(2)在考生目录下有一个工程文件sit4.vbp,包含了所有控件和部分程序,如图2.238所示。要求如下:
①利用属性窗口设置适当的属性:为Listl列表框添加三个项目:宋体、黑体、楷体GB2312;Text1文本框设置初始值为“计算机”;Hscrolll水平滚动条设置最小值和最大值分别为10、50。
②去掉程序中的沣释符,把程序中的?改为正确的内容,完成以下功能:如果在列表框中选择一种字体,然后移动滚动条中的滚动框,则可使文本框中的文字按所选择的宁体显示,并可随着滚动框的移动放火或缩小:如果不选择字体直接移动滚动框,则显示一个信息框,提示“请选择字体”。
注意:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
选项
答案
第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,如表3-127在窗体中画出控件并设置其相关属性。 步骤2:打开代码编辑窗口,分别编写计时器的Timer事件过程和滚动条的Change事件过程。 [*] 参考代码: Private Sub HScrolll Change() Timerl.IriteFval=HScrolli.ValLle End Sub Private Sub Timerl—Timer() Imagel.Visible=Not Imagel.Visible End Sub 步骤3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件中的奉题上程文件sjt4.vbp,如表3.128设置控制的相关属性。 [*] 步骤2:打开代码编辑窗口,在代码编辑窗口,去掉程序中的注释符“”’,将问号“?”改为正确的内容。 参考代码: Text1.FontSize=HScrolll.Value Text1.FontName=Listl.Text 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/rMUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体上有一个水平滚动条HScroll1和一个命令按钮Command1,及下面的事件过程:PrivateSubForm_Load()HScroll1.Min=0HScroll1.Max=100EndSubPrivateSubComman
设窗体上有名称为Option1的单选按钮,且程序中有语句:IfOption1.Value=TrueThen下面语句中与该语句不等价的是
下面关于命令按钮的叙述中错误的是
考生文件夹下有工程文件sjt5.vbp。程序运行时,外观如图2.187所示,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入到5行40列的:维数组a中,并按5行显示在Text1文本框内;单击“统计”按钮,则计算每行中小于50的数之和,及这
在考生文件夹下的“samp1.acedb”数据库文件中已建立了表对象“tEmployee”。请按以下操作要求,完成表的设计。(1)判断并设置“tEmployee”表的主键。(2)设置“性别”字段的默认值为“男”。(3)删除表中
以下关于局部变量的叙述中错误的是()。
设a="VisualBasic",下面语句中可使b="Basic"的是()。
设有语句Open"c:\Test.Dat"ForOutputAs#1则以下叙述中错误的是
下面是求最大公约数的函数的首部Functiongcd(ByValxAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是
以下数据结构中,属于非线性数据结构的是()。
随机试题
()是党和国家的生命线、人民的幸福线。
患者,男性,55岁。1小时前因右侧腰背部剧烈疼痛。难以忍受,出冷汗,服颠茄片不见好转,来院急诊。尿常规检查:可见红细胞。B型超声波检查:肾结石。对该患者给予输注利尿治疗,选用呋塞米利尿,该药的不良反应不包括()
A公司和甲签订货物买卖合同,A签发一张5万元的见票即付的汇票作为支付合同价款,但是甲迟迟拖延不履行合同。现持票人被拒绝付款后行使追索权时,关于A公司可以拒绝向持票人付款的情形,下列哪些选项是正确的?
移民安置问题属于对投资项目进行社会评价中的()。
实行施工总承包的,由()统一组织编制水利工程建设生产安全事故应急救援预案。
纳税检查的对象是( )。
甲公司系ABC会计师事务所的常年审计客户,主要从事电子产品的生产和销售。ABC会计师事务所委派X注册会计师担任甲公司2017年度财务报表审计项目合伙人。在审计存货时,x注册会计师编制了相关工作底稿,部分内容摘录如表11—3、表11一4、表11一5所示。资
张某因逆行驾驶被交通警察李某拦截,李某口头作出罚款200元的处罚决定,并要求当场缴纳。张某要求出具书面处罚决定和罚款收据,李某认为其要求属于强词夺理,拒绝听取其申辩。关于该处罚决定,下列哪个说法是正确的?()
尽管象牙交易已被国际协议宣布为非法行为,一些钢琴制造者仍使用象牙来覆盖钢琴键,这些象牙通常通过非法手段获得。最近,专家发明了一种合成象牙,不像早期的象牙替代物,这种合成象牙受到了全世界范围内音乐钢琴家的好评。但是因为钢琴制造者从来不是象牙的主要消费者,所以
A、 B、 C、 A
最新回复
(
0
)