考生文件夹下的工程文件sjt2.vbp中有一个由直线Line1、Line2和Line3组成的三角形,直线Line1、Line2和IJne3的坐标值如下所示: 名称 X1 Y1 X2 Y2 Line1 600 1200 1600 300 Line2 600

admin2016-06-23  39

问题 考生文件夹下的工程文件sjt2.vbp中有一个由直线Line1、Line2和Line3组成的三角形,直线Line1、Line2和IJne3的坐标值如下所示:
名称 X1 Y1
X2 Y2
Line1 600 1200 1600 300
Line2 600 1200 2600 1200
Line3 1600 300 2600 1200
要求添加一条直线Line4以构成三角形的高,且该直线的初始状态为不可见。再添加两个命令按钮,名称分别为Cmd1、Cmd2,标题分别为“显示高”、“隐藏高”,如图所示。

请编写适当的事件过程使得在程序运行时,单击“显示高”按钮,则显示三角形的高;单击“隐藏高”按钮,则隐藏三角形的高。
注意:要求程序中不得使用变量,每个事件过程只能写一条语句。不得修改已经存在的控件,最后将修改后的文件按原文件名存盘。

选项

答案[操作步骤] 步骤1:打开sjt2工程,按照题目要求建立Line控件并设置其属性,如图3.33所示。 [*] 步骤2:按照步骤1建立其他控件并设置相关属性,程序中涉及的控件及属性见表3.57。 [*] 步骤3:打开代码编辑窗口,在指定位置编写如下代码。 参考代码 Private sub Cmd1_Click() Line4.Visible=True’将Line4显示 End Sub Private sub Cmd2_Click() Line4.Visible=False’将Line4隐藏 End Sub 步骤4:调试并运行程序,关闭程序后按题目要求存盘。

解析
转载请注明原文地址:https://kaotiyun.com/show/HcLp777K
0

最新回复(0)