(1)在名称为Form1的窗体上添加一个名称为Shape1的形状控件,要求在属性窗口中将其形状设置为椭圆,其短轴(垂直方向)、长轴(水平方向)的长度分别为800、1600。把窗体的标题改为“Shape控件”,窗体上无最大化、最小化按钮。程序运行后的窗体如图

admin2017-07-28  64

问题 (1)在名称为Form1的窗体上添加一个名称为Shape1的形状控件,要求在属性窗口中将其形状设置为椭圆,其短轴(垂直方向)、长轴(水平方向)的长度分别为800、1600。把窗体的标题改为“Shape控件”,窗体上无最大化、最小化按钮。程序运行后的窗体如图所示。

    注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件名保存为sjt1.frm。
    (2)在名称为Form1的窗体上添加一个名称为HS的水平滚动条,最大值为100,最小值为1。再添加一个名称为List1的列表框,在属性窗口中输入列表项的值,分别是1000、1500、2000,如图所示。请编写适当的程序,使得运行程序时,将水平滚动条的长度改变为所选中列表框中的某一项的值。要求程序中不得使用变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt!.vbp,窗体文件名保存为sjt!.frm。

选项

答案(1)步骤1:按题目要求添加控件,并设置其属性。程序中用到的控件及属性见表1。 [*] 步骤2:调试并运行程序,关闭程序后按题目要求存盘。 (2)步骤1:程序中用到的控傣及属性见表2。 [*] 步骤2:编写程序代码。 参考答案 Private Sub List1_Click() HS.Width=List1.Text End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。

解析 (1)MaxButton属性:确定标题栏是否显示最大化按钮,MinButton属性:确定标题栏是否显示最小化按钮。
    (2)List1 Click事件过程中,使滚动条的Width属性值等于列表框的Text属性值,那么当选择列表框中的某一项,就将水平滚动条的长度改变为所选中的值。
转载请注明原文地址:https://jikaoti.com/ti/DGy0FFFM
0

最新回复(0)