首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在Forml窗体上绘制一个名称为Textl的文本框,然后建立一个主菜单,标题为“操作”,名称为Op。并为该菜单建两个子菜单,其标题分别为“显示”和“清除”,名称分别为Dis和Clea。编写适当的事件过程,要求程序运行后,如果单击“操作”菜单中的“显示
(1)在Forml窗体上绘制一个名称为Textl的文本框,然后建立一个主菜单,标题为“操作”,名称为Op。并为该菜单建两个子菜单,其标题分别为“显示”和“清除”,名称分别为Dis和Clea。编写适当的事件过程,要求程序运行后,如果单击“操作”菜单中的“显示
admin
2010-07-13
69
问题
(1)在Forml窗体上绘制一个名称为Textl的文本框,然后建立一个主菜单,标题为“操作”,名称为Op。并为该菜单建两个子菜单,其标题分别为“显示”和“清除”,名称分别为Dis和Clea。编写适当的事件过程,要求程序运行后,如果单击“操作”菜单中的“显示”命令,则在文本框中显示“计算机考试”;如果单击“清除”命令,则清除文本框中显示的内容。程序的运行情况如图66—1和图66—2所示。
注意:保存时必须存放在考生文件夹下,工程文件名为sjl.vbp,窗体文件名为sjl.frm。
(2)在名称为Forml的窗体上绘制一个名称为P1的图片框,请编写适当的事件过程,使得程序在运行时,每单击一次图片框,就在图片框中输出“单击图片框”,每单击图片框外的窗体一次,就在窗体中输出“单击窗体”,运行时的窗体如图66—3所示。要求在程序中不得使用变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sj2.vbp,窗体文件名保存为sj2.frm。
选项
答案
(1)通过“菜单编辑器”来创建菜单,文本框的内容通过Text属性设置,Text=“”语句可将文本框中的内容清空。 ①建立界面并设置控件属性。程序中用到的控件及其属性见下表: [*] ②编写程序代码,参考代码如下: Private Sub Clea_Click() Textl.Text="" End Sub Private Sub Dis Click() Textl.Text="计算机考试" End Sub ③调试并运行程序。 ④按题目要求存盘。 (2)根据题意,新建”标准EXE”工程,将一个图片框控件添加到窗体中,名称为P1.双击进入代码窗口,编写如下代码: Private Sub Form Click() Forml.Print"单击窗体" End Sub Private Sub P1_Click() P1.Print"单击图片框" End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/uLmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序段的输出结果是()。classBase{inti;Base(){add(1);}voidadd(intV){i+=v;}Voidphnt()
下面代码段的输出是()。if(5&7)0&&5|2)system.out.println("true");
MouseEvent事件可以实现监听器接口的是MouseListener和【】。
在数据管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是【】。
在先左后右的原则下,根据访问根结点的次序,二叉树的遍历可以分为三种:先序遍历、【】遍历和后序遍历。
对如下二叉树进行后序遍历的结果为( )。
Applet是能够嵌入到【】页面中,并能够在浏览器中运行的Java类。
Java的简单性首先体现在自身系统的精炼上,它的基本解释程序和【】占内存40KB,附加的基本标准类库和支持线程程序占175KB。
数据管理技术发展过程经过人工管理、文件系统和数据库系统三个阶段,其中数据独立性最高的阶段是【】。
软件设计模块化的目的是【】。
随机试题
下列关于恶性肿瘤特点的叙述,正确的有()
膀胱结石的典型症状是
下列属于主观资料的是()
将经营决策划分为经营战略决策和经营战术决策,这是根据经营决策的()不同划分的。
各国划分货币层次的标准是()。
与酵母菌相比,大肠杆菌细胞中不具有的结构是()。
北半球的信风带气流的流向是()。
讨论f(χ,y)=在点(0,0)处的连续性、可偏导性及可微性.
如果用户希望在网上聊天,可以使用Internet提供的()。
Manyartistslateinthelastcenturywereinsearchofameanstoexpresstheirindividuality.Moderndancewasoneoftheways
最新回复
(
0
)