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

admin2018-10-29  19

问题 请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。
    (1)在名称为Form1、标题为“框架练习”的窗体上画一个名称为Frame1、标题为“字体”的框架控件;在框架中画两个单选按钮,名称分别为Option1、ption2,标题分别为“宋体”、“黑体”,标题在单选按钮的左边。运行后的窗体如图1-36所示。

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

    注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。要求程序中的两个变量必须是length、high,此外不能再使用其他变量,除Form_Load 事件过程外,其他每个事件过程中只能写一条语句。

选项

答案第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,按要求画 出控件并设置其相关属性。 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,按要求画出控件并设置属性。 步骤2:打开代码编辑窗口,分别编写滚动条的Change事件过程和窗体的Load 事件过程。 参考代码: Dim length, high Private Sub Form_Load() length = Image1.Width high = Image1.Height End Sub Private Sub HScroll1_Change() Image1.Width = HScroll1.Value * length End Sub Private Sub VScroll1_Change() Image1.Height = VScroll1.Value * high End Sub 步骤3:按要求将文件保存至考生文件夹中。

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

最新回复(0)