问答题 考生文件夹下的工程文件sjt2.vbp中有一个由直线Line1、Line2和Line3组成的三角形,直线Line1、Line2和Line3的坐标值如下所示:
名称  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控件并设置其属性,如图所示。
[*]

步骤2:按照步骤1建立其他控件并设置相关属性,程序中涉及的控件及属性见表。
控件 线条 命令按钮1 命令按钮2
属性 Name X1 X2 Y1 Y2 Visible Name Caption Name Caption
设置值 Line4 1600 1600 300 1200 False Cmd1 显示高 Cmd2 隐藏高
步骤3:打开代码编辑窗口,在指定位置编写如下代码。
Private Sub Cmd1_Click()
Line4.Visible=True '将Line4显示
End Sub
Private Sub Cmd2_Click()
Line4.Visible=False '将Line4隐藏
End Sub
步骤4:调试并运行程序,关闭程序后按题目要求存盘。
【答案解析】[考点] 本题考点有:线条的Name、X1、X2、Y1、Y2和Visible属性以及命令按钮的Name和Caption属性。 [解析] 通过对直线Line1、Line2和Line3的坐标值的计算,确定线条的X1、X2、Y1和Y2属性的值,画出线段Line4,并将其Visible属性设置为False,使得在初始状态下为不可见。再通过命令按钮的Name和Caption属性设置命令按钮的名称和标题。在Cmd1_Click事件过程中将Line4的Visible属性设置True,则可以显示高,在Cmd2_Click事件过程中把Line4的Visible属性设置False,则可以隐藏高。