首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual.Basic应用程序(包括界面和代码)。 (1)在名称为Forml、标题为“框架练习”的窗体上画一个名称为Framel、标题为“字体”的框架控件;在框架中画两个单选按钮,名称分别为Optionl、Option2,标题分
请根据以下各小题的要求设计Visual.Basic应用程序(包括界面和代码)。 (1)在名称为Forml、标题为“框架练习”的窗体上画一个名称为Framel、标题为“字体”的框架控件;在框架中画两个单选按钮,名称分别为Optionl、Option2,标题分
admin
2016-03-22
68
问题
请根据以下各小题的要求设计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)所示。要求如下:
①定义两个窗体级变量:length、high,并编写窗体的FormLoad事件过程,使length、high分别等于图像框的宽、高;
②编写适当的事件过程,使得移动两个滚动条上的滚动块时,以刻度值作为图像框初始尺寸的倍数改变图像框相应方向的尺寸。例如:HScrolll的滚动块在刻度值为2的位置时,图像框的宽为初始宽度的2倍。如图3.159(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=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:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/WMLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的执行结果为______。N=0ForI=1To3ForJ=5To1Step-1N=N+1NextJNextIPrintN;J;I
在命令按钮上释放鼠标按钮时,所触发的事件称为______。
3下面程序的运行结果是()。OptionBase1PrivateSubCommandl_Crick()Dimx,y(3,3)x=Array(1,2,3,4,5,6,7,8,9)Fori=1To3
如果要向工具箱加入控件和部件,可以利用“工程”菜单中的()命令。
以下关于函数过程的叙述中,正确的是()。
有如下SUB过程:Subs(xAsSingle,yAsSingle)t=xx=t/yy=tModyEndSub在窗体上添加一个命令按钮,然后编写如下事件过程:PrivateSubF
长度为n的顺序存储线性表中,当在任何位置上插入一个元素概率都相等时,插入一个元素所需移动元素的平均个数为【】。
在窗体上有一个命令按钮,然后编写如下事件过程。PrivateSubCommand1_Click()Dima(5)AsStringFORi=1To5a(i)=Chr(Asc("A")+(i-1))
函数过程Fun1的功能是:如果参数b为奇数,则返回值为1,否则返回值为0。FunctionFun1(bAsInteger)if_____ThenFun1=0ElseFun1=
随机试题
考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、宏对象“mEmp”和报表对象“rEmp”。同时,给出窗体对象“fEmp”的“加载”事件和“预览”及“打印”两个命令按钮的单击事件代码,试按以下功能
有关有效应力原理,下列说法正确的是()。[2013年真题]
计算机的性能指标包括( )。
企业审核信用证项下单据的标准是()。
个人贷款的对象是()。
逆境可以成才,“同流而不合污”“出淤泥而不染”“威武不能屈”等典故反映出()在个体发展中的作用。
1+2+3+4+5+…+2003的和的最后一位是多少?
“三孔”是指()、()和()。
农村贫困人口脱贫是全面建成小康社会最艰巨的任务。必须充分发挥政治优势和制度优势,坚决打赢脱贫攻坚战。因此,我们必须实施精准扶贫、精准脱贫,这就要
Jacklosthisjoblastweek.Itwasdifficultforhimtofindanother【C1】______.【C2】______toldhimthatitwaspossibletoget
最新回复
(
0
)