[问答题] 在名称为Form1的窗体上添加一个名称为Sha1的形状控件,然后建立一个菜单,名称为shape0,标题为“形状”,该菜单有两个子菜单,其名称分别为shape1和shape2,其标题分别为“正方形”和“圆形”,如图所示。然后编写与适当的程序。程序运行后,如果选择“正方形”菜单项,则形状控件显示为正方形;如果选择“圆形”菜单项,则窗体上的形状控件显示为圆形。
注意:程序中不能使用变量,每个事件过程中只能写一条语句。保存时必须存放在考生文件夹下,工程文件名保存为sjt2. vbp,窗体文件名保存为sjt2. frm。
![[问答题] 在名称为Form1的窗体上添加一个名称为Sha1的形状控件,然后建立一个菜单,名称为shape0,标题为“形状”,该菜单有两个子菜单,其名称分别为shape1和shape2,其标题分别为“ [问答题] 在名称为Form1的窗体上添加一个名称为Sha1的形状控件,然后建立一个菜单,名称为shape0,标题为“形状”,该菜单有两个子菜单,其名称分别为shape1和shape2,其标题分别为“](/uploadfile/member/20180926/1537962701.jpg)
参考答案:
[解题思路] 根据题意,选择“正方形”菜单项,则将形状控件Shape属性设置为1,显示为正方形;如果选择“圆形”菜单项,则将形状控件Shape属性设置为3,窗体上的形状控件显示为圆形。[操作步骤] 步骤1:建立界面,并添加一个名称为Sha1的形状控件,建立菜单的属性见表1。 表1 标题控件 形状 正方形 圆形 名称 shape0 shape1 shape2 内缩符号 0 1 1 步骤2:编写程序代码。 Private Sub shape1_Click() Sha1. Shape = 1 End Sub Private Sub shape2_Click() Sha1. Shape = 3 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。问题解析:
解析无

![[问答题] 在名称为Form1的窗体上添加一个名称为Sha1的形状控件,然后建立一个菜单,名称为shape0,标题为“形状”,该菜单有两个子菜单,其名称分别为shape1和shape2,其标题分别为“ [问答题] 在名称为Form1的窗体上添加一个名称为Sha1的形状控件,然后建立一个菜单,名称为shape0,标题为“形状”,该菜单有两个子菜单,其名称分别为shape1和shape2,其标题分别为“](http://www.mshxw.com/aiimages/31/259799.png)
