请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 在名称为Form1的窗体上画一个名称Shape1的形状控件,在属性窗口中将其设置为圆形。画一个名称为List1的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。

admin2016-01-31  42

问题 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
在名称为Form1的窗体上画一个名称Shape1的形状控件,在属性窗口中将其设置为圆形。画一个名称为List1的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。将窗体的标题设为“图形控件”。单击列表框中的某一项,则将所选的值作为形状控件的填充参数。例如,选择3,则形状控件中被竖线填充。如图3-22所示。
   
    要求:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。

选项

答案审题分析 当形状控件的Shape属性值是3时显示为圆;形状控件的填充色样式通过FillStyle属性设置,其中0为实线、1为透明、2为水平线、3为垂直线、4为向上对角线、5为向下对角线、6为交叉线、7为对角交叉线,缺省值为1。要通过单击列表框中的项目,来改变形状控件的填充样式,需在列表框的Click事件过程中,用语句将列表框中所选的值(通过其Text属性返回)作为形状控件的填充参数。 操作步骤 步骤1:新建一个“标准EXE”工程。 步骤2:在窗体Form1中加入一个列表框和一个形状控件,并分别如表4-15设置它们的相关属性。 [*] 步骤3:打开代码编辑窗口,编写列表框的Click事件过程: 参考代码: Private Sub List1 Click() Shape1.FillStyle=List1.Text End Sub 步骤4:按要求将文件保存至考生文件夹中。 考点链接 图形控件、选择控件

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

最新回复(0)