首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体上有一个列表框和一个标题为“选择”的命令按钮,且列表框中已有若干列表项。程序的功能是:当单击”选择”按钮时,如果列表框中没有列表项,则程序不做任何操作。否则,判断列表框中是否有列表项被选中,如果没有
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体上有一个列表框和一个标题为“选择”的命令按钮,且列表框中已有若干列表项。程序的功能是:当单击”选择”按钮时,如果列表框中没有列表项,则程序不做任何操作。否则,判断列表框中是否有列表项被选中,如果没有
admin
2020-02-27
32
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体上有一个列表框和一个标题为“选择”的命令按钮,且列表框中已有若干列表项。程序的功能是:当单击”选择”按钮时,如果列表框中没有列表项,则程序不做任何操作。否则,判断列表框中是否有列表项被选中,如果没有,则自动选中首个列表项(呈蓝色光条显示);如果有,且不是最后一个列表项,则自动选中后一个列表项,如果选中的是最末一项,则自动选中首个列表项。运行时窗体界面如图所示。程序已经给出,但不完整,请将其中的注释符去掉,把?改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序代码,最后程序按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,其窗体上有4个标签、1个文本框、1个计时器和1个标题为“开始”的命令按钮。程序的功能是:用户在文本框中输入一个计时时间(单位:分),并单击“开始”按钮后,系统将开始倒计时,每隔1秒显示1次剩余时间,当到达计时长度时,系统倒计时结束,并弹出信息框显示“时间到!”,程序运行界面如图所示。程序已经给出,但不完整,请将其中的注释符去掉,把?改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序代码,最后程序按原文件名存盘。
选项
答案
(1)步骤1:打开本题项目工程。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考答案 Private Sub Command1_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 If End If End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)步骤1:打开本题项目工程。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考答案 Dim t As Integer Prirate Sub Command1_Click() t=60*Val(Text1.Text) End Sub Private Sub Timerl_Timer() Dim m.s As Integer If t <=0 Then Timerl.Enabled=False MsgBox"时间到!" Else t=t-1 m=Int(t/60) s=t Mod 60 Label4.Caption="剩余"&m&"分"&s&"秒" End If End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
(1)本题考查List控件的属性使用,ListCount为列表框中列表的项数;ListIndex为被选中的列表项的索引号,ListIndex值为一1表示没有列表项被选中;ListCount为列表项的总个数,最后一项表示为List1.ListCount一1。程序中使用三个if语句,判断三种不同情况。
(2)本题考查计时器控件的使用,窗体上计时器控件的Enabled属性初始值被设置为False,所以需要在单击按钮时,将Enabled属性设置为True,全局变量t是输入的时间(单位为:分)转换为秒数,在Timer事件代码中,判断t是否小于等于0,如果小于等于0,则弹出提示框,否则将t减1,将剩余秒数t换算成剩余分钟数m和剩余秒数s。
转载请注明原文地址:https://kaotiyun.com/show/TjTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
文件d:\city.txt的内容如下:BeiJingTianJinShangHaiChongQing编写如下事件过程:PrirateSubForm_Click()DimInDOpen"d:\city.txt"ForInputAs
命令按钮Command1的MouseUp事件过程结构如下:PrivateSubCommand1_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)EndSub则
在考生目录下有工程文件sjt5.vbp和文本文件:in5.txt,in5.txt中有不超过100个4位正整数。窗体上有2个命令按钮,其功能是:单击“读入数据”按钮,可以读入in5.txt文件中的所有数,并显示在文本框中。单击“计算并保存”按钮,能够把满足下
(1)在考生文件夹下有一个工程文件sjt3.vbp,其功能是:①单击“读数据”按钮.则将考生文件夹下in3.dat文件中的100个正整数读入数组a中。②单击“计算”按钮,则找出这100个正整数中的所有完全平方数(一个整数若是另一个整数的
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1_Click() d=0 c=10 x=Array(10,12,21,32,24) Fori=
在下列关系运算中,不改变关系表中的属性个数但能减少元组个数的是()。
某系统结构图如下图所示该系统结构图的宽度是()。
某二叉树共有12个结点,其中叶子结点只有1个。则该二叉树的深度为(根结点在第1层)
窗体上有一个名称为HScroll1的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是
8.6787E+8写成普通的十进制数是()。
随机试题
2005年我国进行的股权分置改革,是将国有股、法人股分期分批转化成()
某水电大坝长约500m、坝高约85m。在大坝相应位置安置了相关仪器设备,主要包括引张线、正垂线/倒垂线、静力水准仪和测量机器人等四类设备,以便对大坝进行变形监测,保证大坝运行安全。设备的安置情况如下:(1)在大坝不同高程的廊道内布设了若干条引张线;
机关团体保卫工作是为确保党和国家领导人,来访的重要外宾,中央和省、自治区、直辖市党政领导机关以及重大活动的安全所进行的警戒、保卫工作。()
A、 B、 C、 D、 D
宪法规定了国家的根本制度,是国家的根本大法,所以宪法是不容改变的。()
简述教育学的发展阶段。
ThelivesoftheAncientGreeksrevolvedarounderis,aconceptbywhichtheydefinedtheuniverse.Theybelievedthattheworld
Attitudesofrespect,modestyandfairplaycangrowonlyoutofslowlyacquiredskillsthatparentsteachtheirchildrenoverm
【S1】【S10】
WhenmenreturnedfromWorldWarIIandthepostwar"babyboom"began,Americansbegantomoveingreatnumberstothe【B1】______
最新回复
(
0
)