首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在窗体上画出2个名称分别为Shape1、Shape2的形状控件,在属性窗口设置控件的属性,使得Shape1为圆角矩形,并填充红色(&H000000FF&);Sha
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在窗体上画出2个名称分别为Shape1、Shape2的形状控件,在属性窗口设置控件的属性,使得Shape1为圆角矩形,并填充红色(&H000000FF&);Sha
admin
2017-11-27
32
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在窗体上画出2个名称分别为Shape1、Shape2的形状控件,在属性窗口设置控件的属性,使得Shape1为圆角矩形,并填充红色(&H000000FF&);Shape2为圆形,并填充网格线,如图3—24所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在窗体上画1个名称为Picture1的图片框,其Picture属性为pic1.bmp(在考生文件夹中)。画2个名称分别为Command1、Command2的命令按钮,Caption属性分别为“左移”“右移”。请编写适当的程序,使得运行程序时,单击“左移”按钮,图片框移至窗体左侧(如图3—25(a)所示);单击“右移”按钮,图片框移至窗体右侧(如图3—25(b)所示,注:可以不考虑窗体边框的影响)。
注意:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
(1)【操作步骤】 步骤1:新建一个“标准EXE”工程,在窗体Form1中加入两个Shape控件。按表4—15设置其相关属性。 [*] 步骤2:按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤1:新建一个“标准EXE”工程,在窗体Form1中加入一个图片框和两个命令按钮。按表4—16设置其相关属性。 [*] 步骤2:在打开的代码编辑窗口中,编写命令按钮的Click事件代码。参考代码: Private Sub Command1_CliCk() Picture1.Left=0 End Sub Private Sub Command2_Click() Picture1.Left=Form1.Width- Picture1.Width End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/wwGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
定时器的Interval属性以什么为单位指定Timer事件之前的时间间隔
在设计阶段,双击窗体Form1的空白处,打开代码窗口,显示()事件过程模板。
测试的目的是暴露错误,评价程序的可靠性;而【】的目的是发现错误的位置并改正错误。
软件设计模块化的目的是______。
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsInteger
如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是______。
刚建立一个新的标准EXE工程后,不在工具箱中出现的控件是()。
以下叙述中错误的是______。
下列叙述中,不属于软件需求规格说明书的作用的是
在设计阶段,假定在图片框:Picturel中装入了一个图形,为了删除该图片框控件,应采用的正确操作是
随机试题
近端小管的重吸收率始终为肾小球滤过率的
放松预应力筋时,混凝土抗压强度不得低于混凝土强度设计标准值的()。
按照现金保管制度的要求,出纳人员应该()。
会计违法行为中,情节严重,造成了严重后果,有可能被迫究刑事责任的行为是()。
按照规定不需要在工商行政管理机关办理注销登记的,应当自有关机关批准或者宣告终止之日起()内,办理注销税务登记。
下列关于商业银行信用贷款特征的表述,正确的是()。
按每完成100元销售额需要多少广告费来计算和决定广告预算的方法是()。
影响我国植被分布经度地带性的主要因子是______。
设二叉树的后序序列与中序序列均为ABCDEFGH,则该二叉树的前序序列为
OfalltheemployedworkersintheUnitedStates,12.5millionarepartofatemporaryworkforce.TheUnitedStatesBureauofLa
最新回复
(
0
)