在名称为Forml的窗体上添加一个名称为Shapel的形状控件,在属性窗口中将其形状设置为圆形。添加一个名称为Listl的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。将窗体的标题设为“图形控件”。单击列表框中的某一项,则将其值作为形状控件

admin2020-04-08  27

问题  在名称为Forml的窗体上添加一个名称为Shapel的形状控件,在属性窗口中将其形状设置为圆形。添加一个名称为Listl的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。将窗体的标题设为“图形控件”。单击列表框中的某一项,则将其值作为形状控件的填充参数。例如,选择3,则形状控件中被竖线填充,如图所示。
    要求:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。

选项

答案【操作步骤】 步骤1:建立界面,将窗体FonM的Caption属性设置为“图形控制”,然后添加相应的控件并设置控件的属性。程序中用到的控件及属性见表4.60。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 Private Sub Listl_Click() Shapel.FillStyle=Listl.Text End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。

解析 通过形状控件的Name和Shape属性设置形状控件的名称和形状,通过列表框的Name和List属性设置列表框的名称和列表项,单击列表框中的某一项,通过List]的Text属性确定选中的值,并将其值作为形状控件的填充参数,FilIStvIe属性用于返回/设置一个形状控件的填充样式。
转载请注明原文地址:https://kaotiyun.com/show/nATp777K
0

最新回复(0)