在名称为FormI的窗体上添加一个名称为Imagel的图像框,其高、宽分别为1900、1700,通过属性窗口把考生文件夹下的图像文件picl.bmp载入图像框;再画两个命令按钮控件,名称分别为C1、C2,标题分别为“放大”、“缩小”,如图所示。

admin2020-04-08  20

问题   在名称为FormI的窗体上添加一个名称为Imagel的图像框,其高、宽分别为1900、1700,通过属性窗口把考生文件夹下的图像文件picl.bmp载入图像框;再画两个命令按钮控件,名称分别为C1、C2,标题分别为“放大”、“缩小”,如图所示。

    要求:
    ①请编写适当的事件过程,程序运行后,如果单击“放大”按钮,则将图像框的高度、宽度均增加100;单击“缩小”按钮,则将图像框的高度、宽度均减少100,要求程序中不得使用任何变量。
    ②通过属性窗口设置图像框的适当属性,使得在放大、缩小图像框时,其中的图像也自动放大、缩小。
    注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.fm。

选项

答案【操作步骤】 步骤1:新建一个窗体,按照题目要求建立控件并设置图像框相应属性,如图4.17所示。 [*] 步骤2:按照步骤l设置其他控件相关属性,程序中涉及的控件及属性见表4.10。 [*] 步骤3:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 Private Sub C1 C1iCk()′当单击"放大"按钮时.依次将Imagel的高与宽分别加100 Imagel.Height=Imagel.Height+i00 Imagel.Width:Imagel.Width+100 End Sub Private Sub C2 C1iCk()’当单击"缩小"按钮,则依次将Imagel的高与宽分别减100 Imagel.Height=Imagel.Height—i00 Imagel.Width=Imagel.Width一100 End Sub 步骤4:调试并运行程序,关闭程序后按题目要求存盘。

解析 图像框(Image)控件的Picture属性用于在设计阶段时装载在图像框中显示的图片,它的Stretch(自动伸缩)属性用来设定载入其中的图片是否需要自动调整,以适应图像框的大小。图像框的宽和高分别由其Width属性和Height属性设置。
转载请注明原文地址:https://kaotiyun.com/show/uATp777K
0

最新回复(0)