后天考vb,有道题求指教,计算1+2+3+……+n当和大于1000时停止计算,并输出此时的和数

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/14 15:28:27
后天考vb,有道题求指教,计算1+2+3+……+n当和大于1000时停止计算,并输出此时的和数

后天考vb,有道题求指教,计算1+2+3+……+n当和大于1000时停止计算,并输出此时的和数
后天考vb,有道题求指教,计算1+2+3+……+n当和大于1000时停止计算,并输出此时的和数

后天考vb,有道题求指教,计算1+2+3+……+n当和大于1000时停止计算,并输出此时的和数
Private Sub Command1_Click()
Dim i As Integer
Dim Sum As Integer
i = 1
Sum = 0
Do While (Sum