下载
加入VIP
  • 专属下载特权
  • 现金文档折扣购买
  • VIP免费专区
  • 千万文档免费下载

上传资料

关闭

关闭

关闭

封号提示

内容

首页 vb程序代码

vb程序代码.doc

vb程序代码

Verna萌萌
2017-09-27 0人阅读 举报 0 0 暂无简介

简介:本文档为《vb程序代码doc》,可适用于高等教育领域

vb程序代码求自然数对的vb程序代码:PrivateSubCommandClick()DimiAsInteger,jAsInteger,aAsInteger,bAsInteger,numAsIntegernum=Fori=ToForj=iToa=ijIfi>jThenb=ijElseb=jiEndIfIfSqr(a)=Int(Sqr(a))AndSqr(b)=Int(Sqr(b))ThenPicturePrintFormat(i,"!")Spc()Format(j,"!")num=numEndIfNextjNextiPicturePrint"共计"num"对"EndSubPrivateSubCommandClick()EndEndSub描述:求水仙花数的两种vb程序代码:试验五(求水仙花数)方法:PrivateSubFormLoad()DimiAsInteger,aAsInteger,bAsInteger,cAsInteger,hAsIntegerFori=Toa=ib=i*ac=i*a*bh=a^b^c^Ifh=iThenPrintiNextiEndSub方法:PrivateSubFormClick()DimiAsInteger,jAsInteger,kAsInteger,hAsIntegerFori=ToForj=ToFork=Toh=*i*jkIfh=i^j^k^ThenPrintijkEndIfNextkNextjNextiEndSub

用户评价(0)

关闭

新课改视野下建构高中语文教学实验成果报告(32KB)

抱歉,积分不足下载失败,请稍后再试!

提示

试读已结束,如需要继续阅读或者下载,敬请购买!

文档小程序码

使用微信“扫一扫”扫码寻找文档

1

打开微信

2

扫描小程序码

3

发布寻找信息

4

等待寻找结果

我知道了
评分:

/3

vb程序代码

VIP

在线
客服

免费
邮箱

爱问共享资料服务号

扫描关注领取更多福利