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

2024-12-04 23:58:29
推荐回答(2个)
回答(1):

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

回答(2):

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