首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上添加一个名称为Shal的形状控件,然后建立一个菜单,名称为shape0,标题为“形状”,该菜单有两个子菜单,其名称分别为shape1和shape2,其标题分别为“正方形”和“圆形”,如图所示。然后编写适当的程序。程序运行后,如果选
在名称为Form1的窗体上添加一个名称为Shal的形状控件,然后建立一个菜单,名称为shape0,标题为“形状”,该菜单有两个子菜单,其名称分别为shape1和shape2,其标题分别为“正方形”和“圆形”,如图所示。然后编写适当的程序。程序运行后,如果选
admin
2016-06-30
41
问题
在名称为Form1的窗体上添加一个名称为Shal的形状控件,然后建立一个菜单,名称为shape0,标题为“形状”,该菜单有两个子菜单,其名称分别为shape1和shape2,其标题分别为“正方形”和“圆形”,如图所示。然后编写适当的程序。程序运行后,如果选择“正方形”菜单项,则形状控件显示为正方形;如果选择“圆形”菜单项,则窗体上的形状控件显示为圆形。
注意:程序中不能使用变量,每个事件过程中只能写一条语句。保存时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为8jt2.frm。
选项
答案
步骤1:建立界面,并添加一个名称为Shal的形状控件,建立菜单的属性见表4。 [*] 步骤2:编写程序代码。 Private Sub shape1_Click() Sha1.Shape=1 End Sub Private Sub shape2_Crick() Shal.Shape=3 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
根据题意,选择“正方形”菜单项,则将形状控件Shape属性设置为1,显示为正方形;如果选择“圆形”菜单项,则将形状控件Shape属性设置为3,窗体上的形状控件显示为圆形。
转载请注明原文地址:https://www.kaotiyun.com/show/NlLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下:SubCommand1_Click()DimstudentAsstudtypeDimrecord_noAsInteger
在VB6.0中,要显示程序代码,必须在______窗口。
相对于数据库系统,文件系统的主要缺陷有数据关联差、数据不一致性和
下列语句都是在Form中定义的,其中,错误的是
软件维护活动包括:改正性维护、适应性维护、______维护和预防性维护。
在以下程序中,变量S为()。DefDblA-HO-ZDefIntI-NS=1ForI=1To20 S=S*INextIPrintf"S=",S
下列语句中,获得列表框List1中项目个数的语句是
以下关于KeyPress事件过程中参数KeyAscii的叙述中正确的是()
下面程序的功能是将一个一维数组中的元素循环向右移动,每次移位次数由文本框Text中的输入决定。例如,数组各元素的值依次为0,1,2,3,4,5,6,7,8,9,10;移动3次后,各元素的值依次为8,9,10,0,1,2,3,4,5,6,7。请将程序补充完整
常用的软件结构设计工具是结构图(SC),也称程序结构图。其中,用矩形表示________,用带空心圆的箭头表示传递的是数据。
随机试题
高新技术在医疗卫生应用中的伦理问题是()
病人先见高热口渴,汗出,后出现消瘦,面色淡白,气短乏力,脉细无力,证属
子宫迟缓时不能使用下列哪种方法?()
能敛肺,涩肠,止痛的药是能敛肺,涩肠,安蛔的药是
具有文明的语言习惯,该目标属于《3—6岁儿童学习与发展指南》语言子领域中的()。
2018年3月5日中华人民共和国第()届全国人民代表大会第一次会议在北京召开,听取国务院总理李克强关于政府工作的报告。
金融危机从发生到蔓延,经济学家先后用英文字母V、U、L、W的形状来为世界经济走势画像。这传达一个信息:金融危机现象复杂、形势严峻,即使是受过专门训练的经济学家也难以做到“一叶知秋”,这说明()。
将党在抗日战争时期实行的减租减息政策改变为实行“耕者有其田”政策的是()
Thereseemsnevertohavebeenacivilizationwithouttoys,butwhenandhowtheydevelopedisunknown.Theyprobablycameabout
InatotalofsixstatesinthemiddleofAmerica,15,000assembly-lineworkersare【C1】______Japanesecarstogether.Theseautow
最新回复
(
0
)