首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1,标题为“矩形与直线”的窗体上画一个名称为Linel的直线,其X1、Y1属性分别为200、100,X2、Y2属性分别为2200,1600。再画一个名称为Shape1的矩形,并设置适当属性,使Linel成为它的对角线,如图3.19所示
(1)在名称为Form1,标题为“矩形与直线”的窗体上画一个名称为Linel的直线,其X1、Y1属性分别为200、100,X2、Y2属性分别为2200,1600。再画一个名称为Shape1的矩形,并设置适当属性,使Linel成为它的对角线,如图3.19所示
admin
2017-09-22
26
问题
(1)在名称为Form1,标题为“矩形与直线”的窗体上画一个名称为Linel的直线,其X1、Y1属性分别为200、100,X2、Y2属性分别为2200,1600。再画一个名称为Shape1的矩形,并设置适当属性,使Linel成为它的对角线,如图3.19所示。
注意:存盘时,将文件保存至考生文件夹下,窗体文件名为sjtl.frm,工程文件名为sjtl.vbp。
(2)在名称为Form1,标题为“列表框练习”的窗体上,画一个名称为List1的列表框,并输入若干列表项,再画一个标题为“删除”,名称为Command1的命令按钮,如图3-20所示。请编写适当的事件过程,使得单击“删除”按钮,就删除选中的列表项;双击某个列表项,则把该列表项内容添加到列表的最后。
注意:存盘时,将文件保存至考生文件夹下,窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。要求程序中不得使用变量,每个事件过程中只能写一条语句。
选项
答案
(1)步骤1:新建一个“标准EXE”工程,在窗体Form1中加入一个Shape形状和直线。按表4-13设置其相关属性。 [*] 步骤2:按要求将文件保存至考生文件夹中。 (2)步骤1:新建一个“标准EXE”工程,在窗体Form1中加入一个命令按钮和列表框。按表4.14设置其相关属性。 [*] 步骤2:在打开的代码编辑窗口中,编写命令按钮的Click事件和列表框的双击DblClick事件代码。 参考代码: Private Sub Command1_Click() List1.RemoveItem List1.ListIndex End Sub Private Sub List1_DblClick() List1.AddItem List1.Text End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
(1)根据题目要求,在窗体上放置一个Shape形状和一条直线,并将直线设置为Shape矩形的对角线,即矩形的Left、Top属性和直线的X1、Y1属性值相同,矩形的Width、Height分别是直线的X2.X1、Y2.Y1。
(2)根据题目要求在窗体上加入一个列表框,并设置属性。列表框控件(ListBox)用于显示可供单一或多个选择的列表项,给列表框添加列表项既可以在设计阶段通过其List属性设置加入(注意:每输入完一项后按
键换行再输入下一项),也可在程序运行时使用Addltem方法加入,删除列表框里面的项使用Removeltem方法。
单击命令按钮和双击命令按钮实现对列表框的删除和添加操作,因此需要编写命令按钮的Click和DblClick事件响应过程。
转载请注明原文地址:https://kaotiyun.com/show/CjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
事件驱动是一种适用于______的编程方式。
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsIntegerx=5y=7
在下图中,要在窗体的标签Label1上显示“二级VB等级考试”字样,标签属性应设置为______。
下列代码运行后输出结果是DefstrB-EPrivateSubCommand1_Click()B$="123"C="456"PrintB+C$EndSub
随机文件使用Put语句写数据,使用【】语句读数据。
一个完整的程序必须完成3个层次的过程,它们分别是编码、测试和【】。
要把一个命令按钮设置成无效,应设置属性______的值为False。
在窗体上画一个名称为Filel的文件列表框,并编写如下程序:PrivateSubFilel_DblClick()x=Shell(Filel.FileName,1)EndSub以下关于该程序的叙述中,错误的是__
决定一个窗体有无控制菜单的属性是______。
随机试题
结核病:血吸虫病:
1:5000地形图的比例尺精度是()。
某机电安装公司承包了北方干旱地区某厂的一项机电项目的技术改造工程,合同工期120天。工程内容包括:(1)新建设备(机械、容器)安装和2台1000m3常压钢制储槽现场制作、安装以及管道系统改造安装;(2)2台500m3旧钢制储槽和一座旧砖混结构操作间的拆除,
案例四[背景材料]某工程项目的施工招标文件中表明该工程采用综合单价计价方式,工期为15个月。承包单位投标所报工期为13个月。合同总价确定为8000万元。合同约定:实际完成工程量超过估计工程量25%以上时允许调整单价;拖延工期每天赔偿金为合同
某运输企业位于市区。系增值税一般纳税人,2013年10月发生如下业务:(1)为某企业运输一批原材料,取得货运收入20万元,另外向对方收取包装费2.2万元,给对方开具增值税普通发票。(2)与甲运输企业共同承接一项联运业务,收取全程不含税货运收入75万元.
质押贷款业务的主要风险因素可能包括()。[2015年10月真题]
甲公司是一家上市公司,截至2013年底,甲公司注册资本为8000万元,经审计的净资产额为12000万元。甲公司董事会由11名董事组成,其中董事A、董事B和董事C同时为控股股东乙公司董事;董事D同时为丙公司董事;董事E同时为丁公司董事。2014年1月20日甲
圆(x-1)2+y2=1的圆心到直线z+y-2=0的距离是().
下列关于违规制造、销售枪支罪的说法错误的是()。
如果在VisualBasic集成环境中没有打开属性窗口,下列可以打开属性窗口的操作是( )。
最新回复
(
0
)