发布时间:2019-02-04 19:08:23
求1 2 3 …… 100累加和(单击窗体执行程序)。
Private sub form_click()
Dim i%,s! (2’)
S=0 (2’)
For i=1 to 100 (2’)
S=s I (2’)
Next
Print “s=”;s (2’)
End Sub
该内容由生活日记网提供.