首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画1个名称为Label1的标签数组,含3个标签控件,下标从0开始,标签上的内容(按下标顺序)分别是:“等级考试”,“程序设计”,“VB程
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画1个名称为Label1的标签数组,含3个标签控件,下标从0开始,标签上的内容(按下标顺序)分别是:“等级考试”,“程序设计”,“VB程
admin
2018-10-29
43
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画1个名称为Label1的标签数组,含3个标签控件,下标从0开始,标签上的内容(按下标顺序)分别是:“等级考试”,“程序设计”,“VB程序”。运行后的窗体如图3-1所示。
注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为sjt1.frm,工程文件名为sjt1.vbp。
(2)在名称为Form1,标题为“显示鼠标的横坐标”窗体上,画1个名称为Label1的标签。请编写适当事件过程,使得在运行程序时,不按下任何鼠标键,只在窗体上移动鼠标,就可在标签上显示鼠标光标位置的横坐标。如图3-2所示。要求程序中不得使用变量,事件过程中只能写一条语句。
注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。
选项
答案
第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,在窗体Form1中加入一个标签控件; 步骤2:然后选中该标签,点击右键选择“复制”或者直接按ctrl键和c键,然后在窗体空白处点右键选择“粘贴”或者直接按ctrl和v键粘贴,这个时候会提示“已经有一个控件为Label1。创建一个控件数组吗”,选择按钮“是”完成控件数组的创建。 步骤3:重复步骤2,得到第三个标签。 步骤4:分别设置3个标签的Caption属性。三个标签的相关属性设置如表4-1所示。 [*] 步骤5:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,在窗体上画一个标签,按 表4-2设置其相关属性。 [*] 步骤2:在打开的代码编辑窗口中,编写窗体的MouseMove事件代码。参考代码: Private Sub Form_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single) Label1.Caption=X End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/l3Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
求1!+2!+……+10!的程序如下:PrivateFunctions(xAsInteger) f=1 Fori=1Toxf=f*i Next s=fEndFunctionPrivateSubCommand1
假定有如下程序:PrivateSubForm_Click()DimNAsInteger,JAsIntegerN=0J=1DoUntilN>2N=N+1
要使标签中的文本靠右显示,应将其Aligment属性设置为
如果要将一个窗体从内存中清除,应使用的语句是
设运行程序时弹出的菜单如图所示.关于该菜单,以下叙述中错误的是( )。
工程中有Form1、Form2两个窗体(Forml中有文本框Text1,Form2中有Text1文本框和command1命令按钮)。Form1是启动窗体。在这些模块中编写下面的程序代码:Form1中的代码如下:PrivateS
能够产生1到50之间(含1和50)随机整数的表达式是( )。
用语句Open"C:\teac.txt"ForInputAs#1打开文件后,就可以编程序
随机试题
公务员福利制度主要包括________、________、________、________、________、________等。
属于特异性免疫治疗的方法包括
后尿道损伤其尿外渗常出现在
下列哪种情形构成诬告陷害罪?()(2007/2/13)
法律规定,抵押人以土地使用权、城市房地产权等财产作为抵押物时,当事人应到有关主管登记部门办理抵押物登记手续,抵押合同自()起生效。
以下不属于合同法的基本原则是()。
路基土质边坡的常见病害是土质边坡()。
会计规章的制定依据是会计法律和会计行政法规。()
合伙人在合伙企业清算前私自转移或者处分合伙企业财产的,合伙企业不得以此对抗善意第三人。()
OnNovember19,1863,AbrahamLincolnwenttoGettysburginPennsylvaniatospeakattheNationalSoldiersCemetery.TheCivil
最新回复
(
0
)