谁能给我写一个vb小程序,编写一个函数,求1-N(正整数)的所有正整数之和,

谁能给我写一个vb小程序,编写一个函数,求1-N(正整数)的所有正整数之和,
用按钮和编辑框形式表达出来,
gjjlove 1年前 已收到1个回答 举报

rabaqvb 幼苗

共回答了14个问题采纳率:78.6% 举报

Private Sub Command1_Click()
n = Val(Text1.Text)
For i = 1 To n
s = s + i
Next i
Text2.Text = s
End Su

1年前

6
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 16 q. 1.742 s. - webmaster@yulucn.com