请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个名称为C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFF&

admin2017-03-27  16

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

选项

答案第1小题 步骤1:新建一个“标准EXE”工程,在窗体Form1中画一个命令按钮,设置相关属性,其属性及值如表4—49所示。 [*] 步骤2:打开代码编辑窗口,编写按钮的Click事件过程中。 参考代码: Private Sub C1_Click() Form1.BackColor=&HFF& End Sub 步骤3:按要求将文件保存至考生文件夹中。 第2小题 步骤1:新建一个“标准EXE”工程。 步骤2:在窗体Form1中加入一个列表框和一个形状控件,并分别如表4—50设置它们的相关属性。 [*] 步骤3:打开代码编辑窗口,编写列表框的Click事件过程。 参考代码: Private Sub List1_Click() Shape1.FillStyle=List1.Text End Sub 步骤4:按要求将文件保存至考生文件夹中。

解析 第1小题:本题需在命令按钮的单击事件过程中,通过语句设置窗体的BackColor属性值为“&HFF&”。
第2小题:当形状控件的Shape属性值是3时显示为圆:形状控件的填充色样式通过FillStyle属性设置,其中0为实线、1为透明、2为水平线、3为垂直线、4为向上对角线、5为向下对角线、6为交义线、7为对角交叉线,缺省值为1。要通过单击列表框中的项目,来改变形状控件的填充样式,需在列表框的Click事件过程中,用语句将列表框中所选的值(通过其Text属性返回)作为形状控件的填充参数。
转载请注明原文地址:https://jikaoti.com/ti/KOy0FFFM
0

最新回复(0)