vb编写勾股定理的应用满足条件一

vb大题_百度文库
两大类热门资源免费畅读
续费一年阅读会员,立省24元!
上传于||文档简介
&&V​B
阅读已结束,如果下载本文需要使用0下载券
想免费下载更多文档?
定制HR最喜欢的简历
下载文档到电脑,查找使用更方便
还剩4页未读,继续阅读
定制HR最喜欢的简历
你可能喜欢VB高手用VB编写下面所有素数-学网-中国IT综合门户网站-提供健康,养生,留学,移民,创业,汽车等信息
> 信息中心 >
VB高手用VB编写下面所有素数
来源:互联网 发表时间: 17:41:08 责任编辑:李志喜字体:
为了帮助网友解决“VB高手用VB编写下面所有素数”相关的问题,学网通过互联网对“VB高手用VB编写下面所有素数”相关的解决方案进行了整理,用户详细问题包括:RT,我想知道:VB高手用VB编写下面所有素数,具体解决方案如下:解决方案1:
Private Sub Command1_Click() total = 0 For i = 100 To 300 flag = 0 For j = 2 To Sqr(i) If i Mod j = 0 Then flag = 1 Exit For End If Next j If flag = 0 Then total = total + 1 P If total Mod 6 = 0 Then Print End If Next iEnd Sub
解决方案2:
Private Sub Command1_Click()Dim i As IntegerDim j As IntegerDim k As Integerk = 0For i = 100 To 300For j = 2 To i - 1If i Mod j = 0 Then GoTo NOSUSHUNextk = k + 1If k Mod 15 = 0 ThenPrint vbCrLfElsePEnd IfNOSUSHU:NextEnd Sub
相关文章:
最新添加资讯
24小时热门资讯
Copyright © 2004- All Rights Reserved. 学网 版权所有
京ICP备号-1 京公网安备02号VB编程题答案_百度文库
两大类热门资源免费畅读
续费一年阅读会员,立省24元!
VB编程题答案
上传于||文档简介
&&答​案​很​详​细​,​希​望​学​V​B​的​同​学​们​期​末​加​油​!
阅读已结束,如果下载本文需要使用0下载券
想免费下载更多文档?
定制HR最喜欢的简历
下载文档到电脑,查找使用更方便
还剩16页未读,继续阅读
定制HR最喜欢的简历
你可能喜欢推荐这篇日记的豆列
······

我要回帖

更多关于 勾股定理的证明方法 的文章

 

随机推荐