首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1的窗体上添加一个名称为List1的列表框,在属性窗口中为列表框添加三个选项:北京、上海、天津。同时建立一个下拉菜单,其名称为File,标题为“文件”,此菜单含有一个子菜单项,标题为“显示列表框”,名称为Show,初始状态为被选中,运
(1)在名称为Form1的窗体上添加一个名称为List1的列表框,在属性窗口中为列表框添加三个选项:北京、上海、天津。同时建立一个下拉菜单,其名称为File,标题为“文件”,此菜单含有一个子菜单项,标题为“显示列表框”,名称为Show,初始状态为被选中,运
admin
2017-09-20
48
问题
(1)在名称为Form1的窗体上添加一个名称为List1的列表框,在属性窗口中为列表框添加三个选项:北京、上海、天津。同时建立一个下拉菜单,其名称为File,标题为“文件”,此菜单含有一个子菜单项,标题为“显示列表框”,名称为Show,初始状态为被选中,运行时的效果如图所示。
注意:存盘时,将文件保存至考生文件夹下,且窗体文件名保存为sjt1.frm,工程文件名保存为sjt1.vbp。
(2)新建一个名称为Form1,标题为“使用输入对话框”的窗体,该窗体上无任何控件。请编写适当的事件过程,使得运行程序并单击窗体时,出现输入对话框,其标题为“等级考试”,提示信息为“请输入”,默认值为“Basic”,如图所示。
注意:存盘时,将文件保存至考生文件夹下,且窗体文件名保存为sjt2.frm,工程文件名保存为Sjt2.vbp。要求程序中不得使用变量,每个事件过程中只能写一条语句。
选项
答案
(1) 【操作步骤】 步骤1:建立界面,添加相应的控件并设置控件的属性。程序中涉及的控件及属性见表3.61,菜单编辑属性见表3.62,菜单项的Checked属性设置为True。 [*] 步骤2:调试并运行程序,关闭程序后按题目要求存盘。 (2) 【操作步骤】 步骤1:建立界面,并设置窗体的Caption属性为“使用输入对话框”。 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 Private Sub Form_Click() InputBox”请输入”,”等级考试”,”Basic” End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/4tGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若要添加CommonDialog控件,则应从“工程”菜单中选择“部件”命令,在弹出的“部件”对话框的“控件”选项卡中选择______,将控件添加到工具箱中。
在鼠标事件过程MouseDown和MouseUp中,参数Button的值为1、2、4时,分别代表按下鼠标的______、______和______按钮。
下面程序的功能是统计字符串中"i"的个数,请填空。SubCOU()DimnAsInteger a$="BeijingUniversityofTechnology" n=Len(a$) Fori=
下列不能打开属性窗口的操作是______。
下列程序段的执行结果为_______。X=5Y=-20IfNotX>0ThenX=Y-3ElseY=X+3PrintX-Y;Y-X
下面的4个数组中,语句语法正确的是______。
下列数组声明正确的是()。
如果要通过程序代码来一次性删除列表框中所有项目,则应使用的方法是______。
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1_Click()DimcAsIn
随机试题
主张个人本身就是目的,具有最高价值,社会和他人只是达到个人目的的手段的是()人生观
A.甲型肝炎B.乙型肝炎C.乙型和丙型肝炎D.戊型肝炎E.甲型和戊型肝炎主要经粪~口传播的肝炎是
促进胆汁分泌的利胆药物是促进胆囊排空的利胆药物是
女性,50岁,餐后突发上腹痛8小时,伴寒战、高热。查体:体温40%:,脉搏120次/分,呼吸26次/分,血压90/60mmHg。精神萎靡,烦躁不安,皮肤巩膜黄染,右上腹肌紧张,可扪及胀大的胆囊,触痛明显,肝区明显叩击痛。白细胞计数21×109/L。首选
下列关于证据保全的说法错误的是?
下列情况中,一般不会使注册会计师对是否存在重大错报提出质疑的是()。
我国逐步健全的宏观调控体系应该是()。
A、 B、 C、 D、 C应该仔细观察图片中没有人以及桌子上物品的状态和位置。
Australia’sNationalDayfallson______,thedateofthefirstEuropeansettlementinAustralia.
EarnYourParent’sTrust1.【T1】ofprivilegesthatyouwant【T1】______Thereasonwhyparentsdon’tgiveyouprivilegesKidsmayu
最新回复
(
0
)