首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个名称为Shape1 的圆角矩形,高、宽分别为1000、2000。请利用属性窗口设置适当的属性满足以下要求: ①圆角矩形中
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个名称为Shape1 的圆角矩形,高、宽分别为1000、2000。请利用属性窗口设置适当的属性满足以下要求: ①圆角矩形中
admin
2018-10-29
90
问题
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称为Shape1 的圆角矩形,高、宽分别为1000、2000。请利用属性窗口设置适当的属性满足以下要求:
①圆角矩形中填满绿色(颜色值为&H0000FF00&或&HFF00&);
②窗体的标题为“圆角矩形”。
运行后的窗体如图1-41 所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在考生文件夹下有一个工程文件sjt2.vbp。窗体中已含有除计时器外的其他控件,还有一个过程sub1,其功能是按照Text1 中的通话时间计算通话费,并将其显示在Text2 中。程序运行时,单击“通话开始”按钮,则在Text1 中累加通话时间(每秒加1),单击“通话结束”按钮,则停止通话时间的累加;单击“计算通话费”按钮,则调用过程sub1。
要求:
①在窗体上画一个计时器(如图1-42 所示),并通过属性窗口设置适当属性。
②编写三个按钮的Click事件过程。
③编写计时器的事件过程。
注意:要求程序中不得使用变量,每个事件过程中只能写一条语句,“计算通话费”按钮的事件过程中只允许调用过程sub1。不得修改已经存在的内容和控件属性,最后把文件按原文件名存盘。
选项
答案
第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,按要求画 出控件并设置属性。 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开本题工程文件sjt2.vbp,在窗体中画一个名为Timer1,Interval 属性为1000,Enabled属性为False的计时器。 步骤2:打开代码编辑窗口,编写三个命令按钮的Click事件过程以及计时器的Timer事件过程。 参考代码: Private Sub Command1_Click() Timer1.Enabled = True End Sub Private Sub Command2_Click() Timer1.Enabled = False End Sub Private Sub Command3_Click() sub1 EndSub Private Sub Timer1_Timer() Text1 = Text1 + 1 End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/qCFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若要把窗体上命令按钮Command1的状态设置为不可用,应该执行的命令是( )。
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是( )。
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为( )。
设有如下通用过程:PublicFunctionFun(xStrAsString)AsString DimtStrAsString,strLAsInteger tStr="" strL=Len(xStr) i=strL
窗体上有一个名称为Text1的文本框;一个名称为Timer1的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下:PrivateSubTimer1_Timer() StaticflagA
命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片,但需事先设置某一属性,该属性为
窗体上已有1个名称为Picture1的图片框,要求实现下面2个功能之一:(1)在窗体上移动鼠标时,立即将Picture1显示在鼠标位置(2)在窗体上单击鼠标时,立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是
随机试题
继发性肺结核与原发性肺结核的主要不同点是
自动平衡式电子电位差计是基于电压平衡原理工作的。 ()
患者,女性,32岁。停经48天,阴道淋漓出血7天,今日突发下腹痛,并伴恶心,呕吐而就诊。检查体温36.7℃,脉搏120次/分,血压11/7kPa(80/50mmHg),尿绒毛膜促性腺激素(HCG)测定(+),内诊后穹窿饱满,宫颈举痛明显,子宫未检清,右侧宫
某施工单位承包了一外资工程,报价中现场管理费率为10%,企业管理费率为8%,利润率为5%;A、B两分项工程的综合单价分Slj为80元/m2和460元/m3。该工程施工合同规定:合同工期1年,预付款为合同价的10%,开工前1个月支付,基础工程(工期
证券过户登记按照引发变更登记需求的不同可以分为证券交易所集中交易过户登记和非集中交易过户登记。()
个人汽车贷款每笔最多展期()次。
北京时间下午4点时,某人从镜子里看到挂在身后的4个钟的走时如选项所示,误差最小的钟是()。
“慢性肝炎”里的“慢性”是一个区别词。()
YardSalesYardsales【T1】________________.Onefamily,【T2】________________,canholdayardsale.People【T3】____________
HowtoMakePeacewithYourWorkloadA)Swamped(忙碌的),underthegun,juststrugglingtostayabovewater:whateverofficecliche
最新回复
(
0
)