首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘输入正整数到文本框中。在“除数”框架中选择一个单选按钮,然后单击“处理数据”命令按钮,将大于文本框中的正整数,并且能够被所选除数整除的5个数添加到列表框List1中,如图所示。在窗体文件中已
在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘输入正整数到文本框中。在“除数”框架中选择一个单选按钮,然后单击“处理数据”命令按钮,将大于文本框中的正整数,并且能够被所选除数整除的5个数添加到列表框List1中,如图所示。在窗体文件中已
admin
2019-06-11
67
问题
在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘输入正整数到文本框中。在“除数”框架中选择一个单选按钮,然后单击“处理数据”命令按钮,将大于文本框中的正整数,并且能够被所选除数整除的5个数添加到列表框List1中,如图所示。在窗体文件中已经给出了全部控件,但程序不完整。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序的其他部分和控件属性,最后将修改后的文件按原文件名进行存盘。
选项
答案
[操作步骤] 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口中,去掉程序中的注释符“’”,将问号改为正确的内容。 参考代码(画下划线部分是需填入的内容) Private Sub Command1_Click() Dim y As Integer For i=0 To 2’循环三个单选按钮 If
Option1(i).Value
=True Then’当某个按钮被选 y=Val(Optionl(i).
Captiion
)’提取按钮名并转换为数值 End If Next Call.calc(y)’调用子函数 End Sub Private Sub calc(y As Integer) ClearList’执行子函数 i=1 X=Val(Text1.Text)+1 Do While i<=
5
’只需要显示5个数 If x Mod y=0 Then’判断x是否能被y整除 List1.AddItem
x
’添加满足条件的数至表 i=i+1’统计 End If x=Xx+1’自加,判断下次循环 Loop End Sub Private Sub ClearList()’清空列表框的项目 For k=List1.ListCount-1 To 0 Step-1 LiSt1.RemoveItem k Next k End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/xtUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个Text1文本框,一个Command1命令按钮,并有以下程序:PrivateSubcommandl_Click()DimnIfText1.Text"123456"Thenn=n+1Pri
窗体如图1所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:PrivateSubCommand1_Click()
窗体上有一个名称为VScroll1的滚动条,当用鼠标拖动滚动条中的滚动块时,触发的事件是()。
使用语句DimA(1To10)AsInteger声明数组A后,以下叙述正确的是()。
下列选项中不属于软件生命周期开发阶段任务的是()。
以下不能输出“Program”的语句是
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下事件过程:PrivateSubCommand1_Click()Dimarr(10)Fori=6To10arr(i)=i-5NextiLabel1
下列关于利用通用对话框产生的文件对话框的相关属性的描述中,错误的是
计算下面分段函数的正确语句是
VisualBasic源程序的续行符为
随机试题
函数z=x3-y3+3x2+3y2-9x的极小值点为()
肺炎支原体肺炎最突出的症状是
A.1年B.2年C.3年D.4年E.5年按照《药品生产质量管理规范》规定
通过证券交易所的证券交易,投资者持有一个上市公司已发行的股份的()时,继续进行收购时,应当依法向该上市公司所有股东发出收购要约。
请以“平衡”为话题,自拟题目,写一篇不少于800字的文章,除诗歌外,文体不限。
下列各种行为哪项实行数罪并罚?
在人口最稠密的城市中,警察人数占总人口的比例也最大。这些城市中的“无目击证人犯罪”的犯罪率也最低。看来,维持高比例的警察至少可达到有效地阻止此类犯罪的效果。下列哪项如果为真,最能有效地削弱上述推论?()
Attheendofhistwoyearsinthehospital,Johnwaspronouncedincurablyblind.
A、Thefieldworkisnotrecognizedonthecomputer.B、Thetwocoursesarestillshownasofbasic-levels.C、Thefieldworkarrange
Let’scongratulateonyourdecisiontostartyourownbusiness.Butwheredoyougofromhere?Paperclips,memopad,phoneand
最新回复
(
0
)