您所在位置：主题：请教VB的一个问题
llxx
[专家分：0] 发布于 2008-09-25 09:14:00
我做的程序sum=1+2+3+……+n的值用VB做的：代码如下：
Private Sub Command2_Click()
n = Val(Text1.Text)
m = 1
Sum = 0
Do While m <= n
Sum = Sum + m
m = m + 1
Loop
Print Sum
End Sub
这样做结果出在窗体上，我想让它出在文本框中，怎么改呀，请教各位了！感谢
[em1]
Private Sub Command2_Click()
n = Val(Text1.Text)
m = 1
Sum = 0
Do While m <= n
Sum = Sum + m
m = m + 1
Loop
Print Sum
End Sub
这样做结果出在窗体上，我想让它出在文本框中，怎么改呀，请教各位了！感谢
[em1]
