vb语言编写程序，计算S= 1*1/2*1/3*1/4*……*1/25
展开全部
Private Sub Command1_Click()
Dim i%, s!
s = 1
For i = 1 To 25
s = s / i
Next i
Print s
End Sub
Dim i%, s!
s = 1
For i = 1 To 25
s = s / i
Next i
Print s
End Sub
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
Private Sub Form_Activate()
Dim i%, s!
s = 1
For i = 1 To 25
s = s / i
Next i
Print s
End Sub
Dim i%, s!
s = 1
For i = 1 To 25
s = s / i
Next i
Print s
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
for 语句或者do while 语句
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（1）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
