首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。 (1)在Form1的窗体上画一个名称为Text1的文本框,然后建立一个主菜单,标题为“操作”,名称为Op,该菜单有两个子菜单,其标题分别为“显示”和“清除”,名称分别
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。 (1)在Form1的窗体上画一个名称为Text1的文本框,然后建立一个主菜单,标题为“操作”,名称为Op,该菜单有两个子菜单,其标题分别为“显示”和“清除”,名称分别
admin
2018-10-29
32
问题
请根据以下各小题的要求设计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://kaotiyun.com/show/rCFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据库设计中反映用户对数据要求的模式是( )。
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下:OptionBase1PrivateSubCommand1_Click() DimsumAsInt
假定有以下通用过程:FunctionFun(nAsInteger)AsInteger x=n*n Fun=x-11EndFunction在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:PrivateS
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBlue,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。程序代码如下:Dimcolor(3)AsIntege
现有如下一段程序:PrivateSubCommand1_Click() x=UCase(InputBox("输入:")) SelectCasex Case"A"To"C" Print"考核通过!"
当文本框中的内容发生改变时所触发的事件是( )。
设有窗体的Form_MouseMove事件过程如下:PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle) If(Button
下列打开"代码窗口"的操作中错误的是( )。
窗体上已有1个名称为Picture1的图片框,要求实现下面2个功能之一:(1)在窗体上移动鼠标时,立即将Picture1显示在鼠标位置(2)在窗体上单击鼠标时,立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是
随机试题
A、Theyencouragemorehomelesspeople.B、Theyareasafetyhazard.C、Theytakeupparkingspaces.D、Theydestroytheneighborhoo
(共用备选答案)A.格列齐特B.苯海索C.丙咪嗪D.氯苯那敏E.甲基多巴抗抑郁的药是
中国甲公司与法国乙公司签订了向中国进口服装的合同,价格条件CIF。货到目的港时,甲公司发现有两箱货物因包装不当途中受损,因此拒收,该货物在目的港码头又被雨淋受损。依1980年《联合国国际货物销售合同公约》及相关规则,下列哪一选项是正确的?(2015年卷一4
利用安全检查表对生产系统进行评价时,检查表应将系统可能导致事故发生的()全部列出。
提出实施规划的措施和有关建议,明确规划强制性内容的是()
到付运费支付时间是()。
下列关于固定资产会计处理的表述,正确的有()。
太阳直射南回归线,下列说法正确的是()。
国家垄断资本主义产生和发展表明资本主义生产关系发生了局部质变,它产生和发展的根本原因是
TheFrugalGourmetCooksAmericanbyJeffSmithOurrealAmericanfoodshavecomefromoursoil
最新回复
(
0
)