首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。 (1)在Form1的窗体上画一个名称为Text1的文本框,然后建立一个主菜单,标题为“操作”,名称为Op,该菜单有两个子菜单,其标题分别为“显示”和“清除”,名称分别
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。 (1)在Form1的窗体上画一个名称为Text1的文本框,然后建立一个主菜单,标题为“操作”,名称为Op,该菜单有两个子菜单,其标题分别为“显示”和“清除”,名称分别
admin
2018-10-29
50
问题
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。
(1)在Form1的窗体上画一个名称为Text1的文本框,然后建立一个主菜单,标题为“操作”,名称为Op,该菜单有两个子菜单,其标题分别为“显示”和“清除”,名称分别为Dis和Clear,编写适当的事件过程。程序运行后,如果单击“操作”菜单中的“显示”令,则在文本框显示“等级考试”;如果单击“清除”命令,则清除文本框中显示的内容。程序的运行情况如图1-121所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在Form1的窗体上画一个文本框,名称为Text1,Text 属性为空白。再画一个列表框,名称为L1,通过属性窗口向列表框中添加4个项目,分别为“AAAA”、“BBBB”、“CCCC”和“DDDD”,编写适当的事件过程。程序运行后,在文本框中输入一个字符串,如果双击列表框中的任一项,则把文本框中的字符串添加到列表框中。程序的运行情况如图1-122所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm
选项
答案
第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,在窗体Form1中画一个文本框,在属性设置窗口中将其Name属性值设置为Text1。 步骤2:选择【工具】→【菜单编辑器】命令,打开菜单设计器,如表2-43中的设置建立菜单项。 [*] 步骤3:打开代码编辑窗口,编写以下事件过程: 参考代码: Private Sub Dis_Click() Text1.Text = "等级考试" End Sub Private Sub Clea_Click() Text1.Text = "" End Sub 步骤4:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,在窗体Form1中加入一个列表框,在属性设置窗口中将其Name属性设置为L1,在其List 属性中添加四个项目,依次为“AAAA”、“BBBB”、“CCCC”和“DDDD”。注意:每输入完一项后按<Ctrl+Enter>键换行再输入下一项。在窗体上再画出一个文本框,名称为 Text1,Text属性为空白。 步骤2:打开代码编辑窗口,编写列表框的DblClick事件过程: Private Sub L1_DblClick() L1.AddItem Text1.Text End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/rCFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体的左右两端各有1条直线,名称分别为Line1、Line2;名称为Shape1的圆靠在左边的Line1直线上(见图);另有1个名称为Timer1的计时器控件,其Enabled属性值是True。要求程序运行后,圆每秒向右移动100,当圆遇到Line2时则停
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是( )。
设a=10,b=5,c=1,执行语句Printa>b>c后,窗体上显示的是( )。
设有如下Command1的单击事件过程及fun过程:PrivateSubCommand1_Click() DimxAsInteger x=Val(InputBox("请输入一个整数")) fun(x)EndSubPrivate
某人编写了下面的程序:PrivateSubCommand1_Click() DimaAsInteger,bAsInteger a=InputBox("请输入整数") b=InputBox("请输入整数") pro
若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是( )。
窗体上有一个名称为HScroll1的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是( )。
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:DimSaveAllAsStringPrivateSubForm_Load() Show
设有如下通用过程:PublicFunctionFun(xStrAsString)AsString DimtStrAsString,strLAsInteger tStr="" strL=Len(xStr) i=strL
随机试题
子宫内膜异位症好发部位最常见的是
留置导尿病人的护理错误的是( )。
A.阴道炎B.胎衣不下C.子宫捻转D.子宫脱出E.子宫颈炎对母牛进行阴道检查时,发现子宫颈外口充血、肿胀,子宫颈外褶凸出,有黏脓性恶臭分泌物。该病的诊断是()
某工程,建设单位与施工单位按照《建设工程施工合同(示范文本)》签订了施工承包合同。合同约定:工期6个月;A、B工作所用的材料由建设单位采购:合同价款采用以直接费为计算基础的全费用综合单价计价;施工期间若遇物价上涨,只对钢材、水泥和骨料的价格进行调整,调整依
水利工程施工项目的开标中,对投标人出席人员的要求是()。
调节货币市场资金供求的杠杆的是()。
甲公司(增值税一般纳税人)2013年12月31日A库存商品的账而余额为220万元,已计提存货跌价准备30万元。2014年1月20日,甲公司将上述商品全部对外Ⅲ售,售价为200万元,增值税销项税额为34万元,收到款项存入银行。2014年1月20日甲公司出售A
以下微量元素中具有潜在毒性,但低剂量时可能具有人体必需功能的是()。
高新技术也叫尖端技术,它体现了人类的智慧集中度,是当代人类社会的最新科学成就。高新技术发展的特点与趋势有()。
文件系统中,设立打开文件(Open)系统功能调用的基本操作是(30)。
最新回复
(
0
)