首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上建立一个如下表所示的下拉菜单,其中“设置”菜单项为灰色(不可用),如图3—137所示。 注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上建立一个如下表所示的下拉菜单,其中“设置”菜单项为灰色(不可用),如图3—137所示。 注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1
admin
2019-05-28
47
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上建立一个如下表所示的下拉菜单,其中“设置”菜单项为灰色(不可用),如图3—137所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Form1的窗体上画一个名称为Hscroll1的水平滚动条,其最大刻度为100,最小刻度为0;再画两个单选按钮,名称分别为Option1、Option2,标题分别为“最大值”、“最小值”,且都未选中。再通过属性窗口设置适当属性使得程序刚运行时,焦点在滚动条上(如图3—138所示)。
请编写适当的事件过程,使得程序运行时,单击“最大值”单选按钮,则滚动条上的滚动框移到最右端;单击“最小值”单选按钮,则滚动框移到最左端。
注意:程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sji2.frm。
选项
答案
第1小题 步骤1:新建一个“标准EXE”工程,利用菜单设计器按表4—81在窗体上建立一个二级菜单。 [*] 步骤2:按要求将文件保存至考生文件夹中。 第2小题 步骤1:新建一个“标准:EXE”工程,按表4—82在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写两个单选按钮的单击事件过程。 参考代码: Private Sub Option1_Click() HScroll1.Value=100 End Sub Private Sub Option2_Click() HScroll1.Value=0 End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
第1小题:本题只需按题目要求利用VB菜单设计器建立一个二级菜单。
第2小题:本题需要在窗体上二画出水平滚动条,并设置Tablndex属性为0;然后在单选按钮的单击事件中改变滚动条的Value属性值就能使滑块处于指定位置。
转载请注明原文地址:https://kaotiyun.com/show/LPUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个组合框,其名称为Combo1,然后编写如下事件过程:PrivateSubForm_Load()Combo1.Text="1"Fori=1》To10Sum=Sum+iNextiC0mbo1.Text=SumEndSu
在名称为Form1的窗体上添加一个名称为Label1的标签,标签的宽和高分别为2000、300,有边框,并利用属性窗口设置适当的属性,使其标题“等级考试”居中显示,并使标签的外观如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vb
数据库设计过程不包括
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是
窗体上有一个名称为Shape1并显示为圆的形状控件(其Width和Hei出属性值相等),一个名称为Timed的计时器,并有下面程序代码:DimrAsSingle,flagAsIntegerPrivateSubForm_Load()r=S
在窗体上画一个水平滚动条,其属性值满足Min<Max。程序运行后,如果单击滚动条右端的箭头。则Value属性值
以下关于命令按钮的叙述中正确的是
为使文本框具有初始值“VB”,在设计阶段正确的操作是
随机试题
在乙炔气割中,切割面平面度指________。
气血两虚可导致的异常舌象有
酒蒸后可减少副作用的药材是
患者,男,18岁。发热恶寒,鼻塞头痛,咽部红肿,口干溲黄,舌苔薄黄,脉数有力。用药宜首选
患者,男,70岁。家属代述:患者于今晨起床后半小时,突然昏仆,不省人事,目合口张,遗溺,手撒,四肢厥冷,脉细弱。治疗用隔盐灸,应首选
冷轧带肋钢筋代号为LL,如LL550中数值表示钢筋的()。
下列原始凭证中,属于累计凭证的是()。
回族在饮食方面的禁忌主要包括()。
《上海新报》
Pollution,overfishingandthe(36)______ofcoastalprojectshavepushedmanyfishtothebrinkof(37)______.InEastChina’s
最新回复
(
0
)