中易网

VB6.0 用For循环语句写 1+1/2+1/3+1/4........1/50 怎么写

答案:2  悬赏:40  
解决时间 2021-01-22 03:53
VB6.0 用For循环语句写 1+1/2+1/3+1/4........1/50 怎么写
最佳答案

如图所示,望采纳。。。。。

全部回答
Private Sub Command1_Click()
Dim s As Double
s = 0
For i = 1 To 50
    s = s + 1 / i
Next i
Print s
End Sub
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
如何调节男友的心理如果女友不是处女
法人私募的法人需要承担什么连带责任?
海水鱼观赏鱼都有什么品种
哪,充气娃娃盒子里上会不会写明明星的名字,
DNF东一收几个徒弟一起玩 男女不限 等级30以
肌无力能去割双眼皮吗割完会不会合眼
光子嫩肤祛斑费用想知道最有效的祛斑方法
nero 11的序列号,注册机也行
女嫁有才干而顽强之夫,婚后不甚美满是什么意
我昨天在五八同城的招聘打字员被骗了,他们用
快过情人节咯!连他的一条信息都没收到,,看
海尔挂式空调清洗
从兴仁到贵阳一个人可以买两张汽车票吗
我想借酒,很难啊,有没有什么好的办法,各位
手机中的照片被手贱删除了怎么办如何恢复啊
推荐资讯
默默地词语有哪些
国安机动车性能检测有限公司地址在什么地方,
西华北路到欣宴1903坐几路公交
女人掉头发是什么我每天原因
江西华兴律师事务所地址在哪,我要去那里办事
天山国家地质公园崩塌奇观地质遗迹保护区地址
某工厂有工人60名,生产某种由一个螺栓套两个
求きみをつれていく 罗马音歌词+日文歌词~~O(
沈阳到铁岭有公交车吗?
工作后空闲时间学什么比较好?
红米手机电池识别异常 无法充电!
装修敲墙导致一个耳朵嗡嗡响是怎么回事
手机登qq时,显示手机磁盘不足,清理后重新登
刺客的套装怎么选啊?