请根据以下各小题的要求设计Visual。Basic应用程序(包括界面和代码)。 (1)在名称为Forml、标题为“框架练习”的窗体上画一个名称为Framel、标题为“字体”的框架控件;在框架中画两个单选按钮,名称分别为Optionl、Option2,标题分

admin2010-09-02  40

问题 请根据以下各小题的要求设计Visual。Basic应用程序(包括界面和代码)。
(1)在名称为Forml、标题为“框架练习”的窗体上画一个名称为Framel、标题为“字体”的框架控件;在框架中画两个单选按钮,名称分别为Optionl、Option2,标题分别为“宋体”、“黑体”,标题在单选按钮的左边。运行后的窗体如图1-211所示。
注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为sjtl.frm,工程文件名为sjtl.vbp。

(2)在名称为Forml窗体上,画一个名称为Imagel的图像框,在其中显示考生文件夹下的图片“pic2.jpg”,并设置适当属性使得图像框尺寸变化时图片尺寸可随之变化。再画一个水平滚动条和一个垂直滚动条,名称分别为HScrolll、VScrolll,它们的刻度范围都是l~3。如图1-212
(a)所示。要求如下:
①定义两个窗体级变量:length、high,并编写窗体的FormLoad事件过程,使length、high分别等于图像框的宽、高;
②编写适当的事件过程,使得移动两个滚动条上的滚动块时,以刻度值作为图像框初始尺寸的倍数改变图像框相应方向的尺寸。例如:HScrolll的滚动块在刻度值为2的位置时,图像框的宽为初始宽度的2倍。如图1-212(b)所示。对于垂直滚动条也相同。
注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。要求程序中的两个变量必须是length、high,此外不能再使用其他变量,除FormLoad事件过程外,其他每个事件过程中只能写一条语句。

选项

答案第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,如表2-124在窗体中画出控件并设置其相关属性。 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1;新建一个“标准EXE”工程,在窗体Forml中画一个图像框、一个水平滚动条和一个水平滚动条,在属性设置窗口中设置其相关属性,其属性及值如表2-125所示。 [*] [*] 步骤2:打开代码编辑窗口,分别编写滚动条的Change事件过程和窗体的Load事件过程。 参考代码: Dim length, high PriVate Sub Form_Load() length=Image1.Width high=Imagel.Height End Sub PriVate Sub HScrolll_Change() Imagel.Width=HScrolll.Value*length End Sub PriVate Sub VScroll1_Change() Imagel.Hei.ght=VScroll1.Value*high End Sub 步骤3:按要求将文件保存至考生文件夹中。

解析 第1小题
     复选框和单选按钮的Alignment属性用于设置复选框中标题的对齐方式,0-Left Justify为控件居左标题居右(默认),1-Right Justify为控件居右标题居左。
     本题只需按题目在窗体中画出控件,并设置相关属性即可。

    第2小题
    根据题意,本题需在滚动条的Change事件中改变图像框的宽度和高度,在窗体的Load事件中初始化全局变量。
转载请注明原文地址:https://kaotiyun.com/show/OGmp777K
0

最新回复(0)