问题:[问答题]
[解题思路]根据题意,选择“正方形”菜单项,则将形状控件Shape属性设置为1,显示为正方形;如果选择“圆形”菜单项,则将形状控件Shape属性设置为3,窗体上的形状控件显示为圆形。
[操作步骤]
步骤1:建立界面,并添加一个名称为Sha1的形状控件,建立菜单的属性见表1。标题控件 形状 正方形 名称 shape0 shape1 步骤2:编写程序代码。内缩符号 0 1
PrivateSubshape1_Click()
Sha1.Shape=1
EndSub
PrivateSubshape2_Click()
Sha1.Shape=3
EndSub
步骤3:调试并运行程序,关闭程序后按题目要求存盘。
● 参考解析