问答题
请根据以下各小题的要求设计Visual．Basic应用程序(包括界面和代码)。(1)在名称为Forml、标题为“框架练习”的窗体上画一个名称为Framel、标题为“字体”的框架控件；在框架中画两个单选按钮，名称分别为Optionl、Option2，标题分别为“宋体”、“黑体”，标题在单选按钮的左边。运行后的窗体如图3．158所示。注意：存盘时，将文件保存至考生文件夹下，且窗体文件名为sjtl．frm，工程文件名为sitl．vbp。
(2)在名称为Forml窗体上，画一个名称为Imagel的图像框，在其中显示考生文件夹下的图片“pic2．jpg”，并设置适当属性使得图像框尺寸变化时图片尺寸可随之变化。再画一个水平滚动条和一个垂直滚动条，名称分别为HScrolll、VScrolll，它们的刻度范围都是1～3。如图3一159(a)所示。要求如下：
(2)在名称为Forml窗体上，画一个名称为Imagel的图像框，在其中显示考生文件夹下的图片“pic2．jpg”，并设置适当属性使得图像框尺寸变化时图片尺寸可随之变化。再画一个水平滚动条和一个垂直滚动条，名称分别为HScrolll、VScrolll，它们的刻度范围都是1～3。如图3一159(a)所示。要求如下：
【正确答案】正确答案：第1小题 【操作步骤】 步骤1：新建一个“标准EXE”工程，按要求画出控件并设置其相关属性。 步骤2：按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性。 步骤2：打开代码编辑窗口，分别编写滚动条的Change事件过程和窗体的Load事件过程。 参考代码： Dim length，high Private Sub Form Load() length=Image 1．Width high=Imagel．Height End Sub Private Sub HScrolll Change() Imagel．Width=HScro111．Value*length End Sub Private Sub VScro111 Change() Imagel．Height=VScro111．Value*high End Sub 步骤3：按要求将文件保存至考生文件夹中。
【答案解析】