首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。 (1)在名称为Form1、标题为“框架练习”的窗体上画一个名称为Frame1、标题为“字体”的框架控件;在框架中画两个单选按钮,名称分别为Option1、ption2
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。 (1)在名称为Form1、标题为“框架练习”的窗体上画一个名称为Frame1、标题为“字体”的框架控件;在框架中画两个单选按钮,名称分别为Option1、ption2
admin
2018-10-29
17
问题
请根据以下各小题的要求设计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
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
输入VisualBasic源程序时,若一个命令行中包含两个语句,则两个语句之间的分隔符应使用
命令按钮Command1的事件过程如下:PrivateSubCommand1_Click() Dimarr(5,5)AsInteger DimiAsInteger,jAsInteger Fori=1To4
如果一个菜单项的Enabled属性被设置为False,则程序运行时,该菜单项( )。
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明:PrivateTypePerson nameAsString*8 majorAsSt
在窗体上画一个名称为Command1的命令按钮,并编写如下事件过程:PrivateSubCommand1_Click() x=1 s=0 Fori=1To5 x=x/i s=s+x Next Print
运行如下程序PrivateSubCommand1_Click() Dima(5,5)AsInteger Fori=1To5 Forj=1To4 a(i,j)=i*2+j Ifa(i,
VB中有这样一类文件:该文件不属于任何一个窗体,而且仅包含程序代码,这类文件的扩展名是( )。
如果把命令按钮的Cancel属性设置为True,则程序运行后( )。
窗体上有1个Timerl计时器,1个Shape1形状控件,还有下面程序代码:DimflagAsBooleanPrivateSubForm_Load()flag=TrueTimer1.Enab
下面关于VB数据文件的叙述中错误的是()。
随机试题
从复杂的环境中将一些感觉分离出来加以组织,并根据过去经验做出解释的一系列心理活动,被称为
A.实热证B.实寒证C.虚寒证D.虚热证E.寒热错杂证“壮水之主,以制阳光”的适应证是
涎腺炎最主要的感染途径是()
女性,28岁,妊28周,1周来腰痛伴尿频,两天来低热,体温37℃。有时排尿后尿道口疼痛,检查尿结果为pH6.0,SG1.015,Pro0.3S/L,WBC22/μl,RBC8/μl,偶见白细胞管型/LM;尿培养为克雷伯杆菌最先考虑的诊断是
项目管理主体主要涉及()、政府等。
关于设计概算编制应考虑的因素,下列选项错误的是()。
企业的经营杠杆系数高于行业的平均值意味着
某公司成立于2×19年1月1日。2×19年度实现的净利润为1000万元,分配现金股利550万元,提取盈余公积450万元(所提盈余公积均已指定用途)。2×20年度实现的净利润为900万元(不考虑计提法定盈余公积的因素)。2×21年计划增加投资,所需资金为70
2020年1月1日,A公司购入乙公司于2019年1月1日发行的面值为1000万元的3年期公司债券作为交易性金融资产核算,该债券票面年利率为5%,每年年末计提利息,于次年1月5日支付。该债券购买价款为1050万元(包含已到付息期但尚未领取的债券利息50
搜索考生文件夹下的BOOK.com文件,然后将其删除。
最新回复
(
0
)