注意:下面出现的“考生文件夹”均为%USER%
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1、标题为“菜单”的窗体上,设计满足如下要求的菜单。
运行后的窗体如图所示。存盘时,将文件保存至考生文件夹下,且工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
解题思路:
启动Visual Basic系统,创建一个Form1窗体。
在该窗体上通过菜单编辑器建立二个主菜单,在菜单编辑器的标题处分别输入“文件”和“退出”,名称处分别输入file和exit。在“文件”菜单下有二个子菜单,在菜单编辑器的标题处分别输入“新建”和“保存”,名称处分别输入new和save。
参考文件:c:/wexam/26990001/hlpsys/参考答案/sjt1.vbp、sjt1.frm、sjt1.vbw
请把这些文件复制到c:/wexam/26990001中,然后打开sjt1.vbp文件并运行。
(2)在名称为Form1的窗体上,画1个名称为Image1的图像框,左界为360,且图像框中显示考生文件夹下的图片文件“Duck.bmp”。再画2个名称分别为“Command1”、“Command2”,标题分别为“移动”、“复位”的命令按钮。如图所示。
要求:
编写适当的事件过程,使得每单击“移动” 按钮一次,图像框向右移动10;单击“复位”按钮,图像框自动回位到左界为360的位置。
*注意:
要求程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
解题思路:
启动Visual Basic系统,创建一个Form1窗体。
在该窗体上画一个图像框控件,通过其属性窗口将名称设为Image1,左边界(Left属性)设为360,点击Picture属性在弹出的加载图片对话框中将Duck.bmp图片文件打开即实现加载功能。画二个命令按钮控件,通过其属性窗口将名称分别设为“Command1”、“Command2”,标题(Caption属性)分别设为“移动”、“复位”。
单击“移动”按钮(即运行Click事件过程),在该Click事件过程中加入语句:
Private Sub Command1_Click()
Image1.Left = Image1.Left + 10
End Sub
单击“复位”按钮(即运行Click事件过程),在该Click事件过程中加入语句:
Private Sub Command2_Click()
Image1.Left = 360
End Sub
参考文件:c:/wexam/26990001/hlpsys/参考答案/sjt2.vbp、sjt2.frm、sjt2.frx、sjt2.vbw
请把这些文件复制到c:/wexam/26990001中,然后打开sjt2.vbp文件并运行。
① 凡本网注明稿件来源为"原创"的所有文字、图片和音视频稿件,版权均属本网所有。任何媒体、网站或个人转载、链接转贴或以其他方式复制发表时必须注明"稿件来源:我考网",违者本网将依法追究责任;
② 本网部分稿件来源于网络,任何单位或个人认为我考网发布的内容可能涉嫌侵犯其合法权益,应该及时向我考网书面反馈,并提供身份证明、权属证明及详细侵权情况证明,我考网在收到上述法律文件后,将会尽快移除被控侵权内容。