首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Forml的窗体上画一个图像框,名称为Imagel,其高、宽分别为1900、1700,通过属性窗口把考生文件夹下的图像文件picl.bmp装入图像框;再画两个命令按钮,名称分别为Cl、C2,标题分别为”放大”、”缩小”,如图2-167所示。 要求:
在名称为Forml的窗体上画一个图像框,名称为Imagel,其高、宽分别为1900、1700,通过属性窗口把考生文件夹下的图像文件picl.bmp装入图像框;再画两个命令按钮,名称分别为Cl、C2,标题分别为”放大”、”缩小”,如图2-167所示。 要求:
admin
2019-05-28
27
问题
在名称为Forml的窗体上画一个图像框,名称为Imagel,其高、宽分别为1900、1700,通过属性窗口把考生文件夹下的图像文件picl.bmp装入图像框;再画两个命令按钮,名称分别为Cl、C2,标题分别为”放大”、”缩小”,如图2-167所示。
要求:
①请编写适当的事件过程,程序运行后,如果单击”放大”按钮,则把图像框的高度、宽度均增加100;单击”缩小”按钮,则把图像框的高度、宽度均减少100。要求程序中不得使用任何变量。
②通过属性窗口设置图像框的适当属性,使得在放大、缩小图像框时,其中的图像也自动放大、缩小。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
步骤1:新建一个”标准EXE”工程,如表3-95在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写两个命令按钮的Click事件过程。 参考代码: Private Sub Cl_Click( ) Imagel.Width=Imagel.Width+100 Imagel.Height=Imagel.Height+100 End Sub Private Sub C2_Click( ) Image1.Width=Imagel.Width-100 Image1.Height=Imagel.Height-100 End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/HWUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设程序中有以下语句:MsgBox"Visual","Basic","等级考试",2执行该语句后,显示一个信息框,以下关于该信息框的叙述中,正确的是
在窗体模块的声明部分声明变量时,不能使用的关键字是
编写如下程序:PrivateSubCommand1_Click()Dimstr1AsString,str2AsStringstr1=InputBox("输入一个字符串")subfstr1,str2Printstr2EndSub
在名称为Form1的窗体上添加一个名称为Shape1的形状控件,通过设置参数使其形状为圆形;添加一个名称为Label1的标签,标题为“形状”,标签的大小能够根据标签内容的字数、大小而定;添加一个名称为Text1的文本框,文本框最多能够显示5个字符,文本框中
以下关于控件数组的叙述中,错误的是
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和lahel1,然后编写如下事件过程:PrivateSubCommand1_Click()Dimarr(10)Fori=6To10arr(i)=i-5NextiLabe
编写如下程序:PrivateSubCommand1_Click()Dima(3,3)AsIntegerDimb(3,3)AsIntegerFori=1To3Forj=1To3a(i,j)=i+jb(i,j)=a(i,j
已知列表框控件List1中已放入若干表项,下列关于List1的叙述中错误的是
如果把文本框的Enabled属性设置为False并运行程序,则以下叙述中正确的是
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是
随机试题
常用的剖视图有:_______、_______、_______和剖面图。
夏日高热无汗,宜用哪味中药煎汤熏洗躯体( )
一个估价项目完成后,应保存的档案资料包括()。
监理单位的产品是( )。
按照上海证券交易所配股规则,拥有某种股票配股权证的投资者,可委托买入不超过可配股数的股票,具体方式为向场内申报( )。
詹森是一名运动员,平时训练有素,实力雄厚,但在体育赛场上却连连失利,让自己和他人失望,不难看出这主要是压力过大,过度紧张所致。由此人们把这种平时表现良好,但由于缺乏应有的心理素质而导致正式比赛失败的现象称为詹森效应。下列各项,没有体现詹森效应的一项是(
多项式f(x)=x3+a2x2+ax-1被x+1除余-2,则实数a等于().
以下叙述中正确的是
掩码“LLL000”对应的正确输入数据是
Inlastweek’sTribune,therewasaninterestingletterfromMr.J.StewartCook,inwhichhesuggestedthatthebestwayofavo
最新回复
(
0
)