【正确答案】[解题思路] 根据题意,选择“正方形”菜单项,则将形状控件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:调试并运行程序,关闭程序后按题目要求存盘。