作业帮 > 综合 > 作业

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

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/04/30 17:12:27
谁能给我写一个vb小程序,编写一个函数,求1-N(正整数)的所有正整数之和,
用按钮和编辑框形式表达出来,
Private Sub Command1_Click()
n = Val(Text1.Text)
For i = 1 To n
s = s + i
Next i
Text2.Text = s
End Su