首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。程序运行后,单击命令按钮,即可计算出0~1000范围内不能被7整除的整数的个数,并在文本框中显示出来。在窗体的代码窗口中,已给出了部分程序,
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。程序运行后,单击命令按钮,即可计算出0~1000范围内不能被7整除的整数的个数,并在文本框中显示出来。在窗体的代码窗口中,已给出了部分程序,
admin
2019-06-11
54
问题
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。程序运行后,单击命令按钮,即可计算出0~1000范围内不能被7整除的整数的个数,并在文本框中显示出来。在窗体的代码窗口中,已给出了部分程序,其中计算不能被7整除的整数的个数的操作在通用过程Fun中实现,请编写该过程的代码。
要求:请勿改动程序中的任何内容,只在FunctionFun()和End Function之间填入你编写的若干语句。最后将修改后的文件按原文件名存盘。
选项
答案
[操作步骤] 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。 参考代码 Function Fun() Dim s As Integer,i As Integer For i=0 To 1000’求0~1000中满足条件的数 If i Nod7<>0Then s=s+1’将满足条件的数的个数累加 End If Next i Fun=s’返回结果 End Function 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/kRUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了使窗体的大小可以改变,必须把它的BorderStyle属性设置为()。
对于循环队列,下列叙述中正确的是()。
窗体上有一个名称为Picturel的图片框和一个名称为Timer1的计时器控件,并有下面程序代码:Dimx%,V%PrivateSubForm_Load()x=Picturel.Width*2y=Picture
为了使文本框Text1中的文本不能被编辑,但能滚动和选择,下列正确的设置为()。
设有以下程序代码:PrivateSubCommand1_Click()a=Array(1,2,7,10,6)b=Array(5,4,7,8,2)i=0j=0DoIfi
编写如下程序代码:PrivateSubCommand1_Click()DimtAsIntegerDimnAsInteger,xAsIntegert=0F0rn=1To12
VisualBasic根据计算机访问文件的方式将文件分成3类,其中不包括()。
在下列模式中,能够给出数据库物理存储结构与物理存取方法的是
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为()。
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
随机试题
前斜角肌内侧的结构有()
对肝硬化诊断有确诊价值的检查是
下列各项中,在进行会计处理时应计入管理费用的是()。
下列属于建设工程合同无效原因的有()
在生产过程中,除()等有形物质会造成对眼的伤害之外,强光或有害光也会造成对眼的伤害。
加强2~3岁幼儿的口语训练是遵循个体身心发展的
据世界卫生组织1995年的调查报告显示,70%的肺癌患者有吸烟史,其中有80%的人吸烟的历史多于10年。这说明吸烟会增加人们患肺癌的危险。以下哪项最能支持上述论断?()
Allparentspushtheirkidsatleastalittle.Wepressureourkidstobepolite,learntoeat【C1】______andbeobedient.So,pre
Asoccerreferee(36)______forscoringagoalwhiletakingchargeforagamehas(37)______afterbeingfoundguiltyofbringi
A、Itwasimpossibleforhimtocometotheparty.B、Hestayedhometostudyforhisexam.C、Everybodywassurprisedbyhisatten
最新回复
(
0
)