首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体上有一个列表框和一个标题为“选择”的命令按钮,且列表框中已有若干列表项。程序的功能是:当单击”选择”按钮时,如果列表框中没有列表项,则程序不做任何操作。否则,判断列表框中是否有列表项被选中,如果没有
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体上有一个列表框和一个标题为“选择”的命令按钮,且列表框中已有若干列表项。程序的功能是:当单击”选择”按钮时,如果列表框中没有列表项,则程序不做任何操作。否则,判断列表框中是否有列表项被选中,如果没有
admin
2020-07-22
64
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体上有一个列表框和一个标题为“选择”的命令按钮,且列表框中已有若干列表项。程序的功能是:当单击”选择”按钮时,如果列表框中没有列表项,则程序不做任何操作。否则,判断列表框中是否有列表项被选中,如果没有,则自动选中首个列表项(呈蓝色光条显示);如果有,且不是最后一个列表项,则自动选中后一个列表项,如果选中的是最末一项,则自动选中首个列表项。运行时窗体界面如图所示。程序已经给出,但不完整,请将其中的注释符去掉,把?改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序代码,最后程序按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,其窗体上有4个标签、1个文本框、1个计时器和1个标题为“开始”的命令按钮。程序的功能是:用户在文本框中输入一个计时时间(单位:分),并单击“开始”按钮后,系统将开始倒计时,每隔1秒显示1次剩余时间,当到达计时长度时,系统倒计时结束,并弹出信息框显示“时间到!”,程序运行界面如图所示。程序已经给出,但不完整,请将其中的注释符去掉,把?改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序代码,最后程序按原文件名存盘。
选项
答案
(1) 【操作步骤】 步骤1:打开本题项目工程。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 Private Sub Commandl_Click() If List1.ListCount=0 Then Exit Sub End If If List1.ListIndex=一1 Then List1.ListIndex=0 Else If List1.ListIndex<List1.ListCount-1 Then List1.ListIndex=List1.ListIndex+1 Else List1.ListIndex=0 End lf End If End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2) 【操作步骤】 步骤1:打开本题项目工程。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 Dim t As Integer Private Sub Command1_Click() t=60*Val(Text1.Text) Timer1.Enabled=True End Sub Private Sub Timed_Trimer() Dim m.s As Integer If t<=0 Then Timer1.Enabled=False MsgBox”时间到!” Else t=t-1 m=Int(t/60) s=t Mod 60 Label4.Caption=”剩余”&m&”分”&s&”秒” End If End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/ewHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个文本框,其名称为Text1,然后编写以下程序:PrivateSubForm_Load()ShowText1.Text=""Text1.SetFocusEndSubPrivateSubText1
己知数组Dima(1To10)AsInteger,则下面正确调用GetValue函数的是()。PrivateFunctionGetValue(a()AsInteger)AsIntegerFori=1To10
在窗体上画一个名称为Combol的组合框,名称为Text1的文本框,以及名称为Command1的命令按钮,如图所示。运行程序,单击命令按钮,将文本框中被选中的文本添加到组合框中,若文本框中没有选中的文本,则将文本框中的文本全部添加到组合框中。命
下面不属于软件设计阶段任务的是
以下关于VB的叙述中,错误的是
在设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框:PrivateSubCommand1_Click() CD1.DialogTitle="打开文件" CD1.InitDir="C:" CD1.Fil
对关系S和关系R进行集合运算,结果中既包含关系S中的所有元组也包含关系R中的所有元组,这样的集合运算称为()。
下面有关标准模块的叙述中,错误的是( )。
在软件开发中,需求分析阶段产生的主要文档是
随机试题
为使中碳结构钢获得较好的综合力学性能,可采用调质热处理方法。()
Toprepareforthespeechcontest,shehasbeenpracticingbytalkingtoherown______inthemirror.
A.膀胱充盈缺损,边缘光整,密度高B.膀胱缩小,轮廓毛糙即膀胱挛缩C.膀胱呈“宝塔”状,体积增大,壁增厚D.膀胱前上方见软组织肿块,在人体中轴线上E.膀胱内充盈缺损,有强化膀胱结核为
镇痛药起效迅速,但病人血药浓度波动大的给药方式是()
疼痛不剧,尚可忍耐,绵绵不休,此为()
下述哪项血清学检查对肝硬化的肝功能损害程度判断最有意义
下列说法错误的是()
A公司为支付货款,向B公司签发了一张金额为200万元的银行承兑汇票,某商业银行作为承兑人在票面上签章。B公司收到汇票后将其背书转让给C公司,以偿还所欠C公司的租金,但未在被背书人栏内记载C公司的名称。C公司欠D公司一笔应付账款,遂直接将D公司记载为B公司的
甲企业2013年实际占地面积为5000平方米,2013年4月30日该企业为扩大生产,根据有关部门的批准,新征用非耕地2500平方米,新征用耕地1500平方米。该企业所处地段适用城镇土地使用税年税额5元/平方米,耕地占用税20元/平方米。下列说法正确的
敬畏自然产春友人们常常把人与自然对立起来.宣称要征服自然。殊不知在大自然面前,人类永远只是一个天真幼稚的孩童.只是大自然机体上普通的一部分,正像一株小草只是她普通的一
最新回复
(
0
)