首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。程序运行后,单击命令按钮,即可计算出0~1000范围内不能被7整除的整数的个数,并在文本框中显示出来。在窗体的代码窗口中,已给出了部分程序,
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。程序运行后,单击命令按钮,即可计算出0~1000范围内不能被7整除的整数的个数,并在文本框中显示出来。在窗体的代码窗口中,已给出了部分程序,
admin
2020-04-08
57
问题
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。程序运行后,单击命令按钮,即可计算出0~1000范围内不能被7整除的整数的个数,并在文本框中显示出来。在窗体的代码窗口中,已给出了部分程序,其中计算不能被7整除的整数的个数的操作在通用过程Fun中实现,请编写该过程的代码。
要求:请勿改动程序中的任何内容,只在Function Fun()和End Function之间填入你编写的若干语句。最后将修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤l:打开本题工程文件。 步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。 参考答案 Function Fun() Dim s As Integer,i AsInteger For i=0 To 1000′求0~1000中满足条件的数 If i Mod 7<>0 Then s=s+1 ′将满足务件的数的个数累加 End If Next i Fun=s’返回结果 End Function 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
可通过求余运算符Mod来计算某数M能否被7整除,如果M Mod 7=0,那么M能被7整除;如果M Mod 7<>0,那么M不能被7整除。可利用For。循环语句来逐个判断0~1000范围内的整数能否被7整除,然后用一个变量来统计不能被7整除的整数个数。
转载请注明原文地址:https://kaotiyun.com/show/cATp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:PrivateSubCommand1_Click() s=0 Fori=1To15 x=2*i-1 IfxMod
数据库设计过程不包括
表达式Sgn(0.25)的值是( )。
对关系S和R进行集合运算,结果中既包含S中的所有元组也包含R中的所有元组,这样的集合运算称为()。
在窗体上画一个Text1文本框和一个CD1通用对话框控件,并编写下面程序:PrivateSubCommand1_Click()CD1.Flags=1Or256CD1.Action=4IfCD1.Color
以下不合法的VB变量名是
设“A="87654321"”,则表达式Val(Left(A,4)+Mid(A,4,2))的值为()。
以下关于菜单的叙述中,错误的是( )。
在属性窗口中把窗体的KeyPreview属性设置为True,然后编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)End
现有表示患者和医疗的关系如下:P(P#,Pn,Pg,By),其中P#为患者编号,Pn为患者姓名,Pg为性别,By为出生日期,Tr(P#,D#,Date,Rt),其中D#为医生编号,Date为就诊日期,Rt为诊断结果。检索在1号医生处就诊的病人姓名的表达式是
随机试题
为什么说审美是艺术最核心的功能?
Iusuallylikeeggsandham,butIdon’t______eatingthemtoday.
某市检察院张某在办理一起受贿案件时,发现犯罪嫌疑人之一系其堂妹,故申请回避并经检察长同意。下列关于张某在申请回避前所取得的证据和进行的诉讼行为效力问题的表述,哪一项是正确的?(2005年试卷2第24题)
如图B8.2所示为城市道路无障碍设计的盲道铺砌块,关于它的下列说法哪个正确?[2011一053]
湿式报警阀组调试时,从试水装置处放水,当湿式报警阀进水压力大于0.14MPa、放水流量大于1L/s时,报警阀启动,带延迟器的水力警铃在5~90s内发出报警铃声,不带延迟器的水力警铃应在()s内发出报警铃声,压力开关动作,并反馈信号。
社会工作者在协助妇女重新界定问题时的具体方法和技巧包括()。
“宽着期限,紧着课程。为学要刚毅果决,悠悠不济事。”体现的是“朱子读书法”中的
甲有遗嘱,将其两幅字画留给好友乙。甲死后次日,乙表示接受遗嘱。后乙在遗产分割前死亡。对此,下列表述正确的是()(2016年一专一第37题)
下列各选项中,不属于Internet应用的是()。
Shewanteddesperatelytoturntheflower-paintedchina______ontheapple-greendoor,andgothrough,butsomehowshecouldnot.
最新回复
(
0
)