怎么用Vb计算1到N的和 只需要“计算”就够了
展开全部
Dim I As Integer, N As Integer
Dim Sum As Integer
N = Val(Text1.Text)
For I = 1 To N Step 1
Sum = Sum + I
Next I
Print Sum
追问
那怎么让sum出现在“计算结果”的方框里？
追答
你的计算结果应该是Text2吧？你只要把我代码最后一句
Print Sum
改成
Text2.Text=Str(Sum)
就可以了
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
|
广告 您可能关注的内容 |
