用VB编个程序，计算从1加到100。

Question

如题所述

Answer 1

以下是一个使用 Visual Basic 编写的程序来计算从1加到100的求和结果：
下面是程序源码：
Module MainModule

Sub Main()
Dim sum As Integer = 0
For i As Integer = 1 To 100
sum += i
Next
Console.WriteLine("从1加到100的和为：" & sum)
Console.ReadLine()
End Sub
End Module
这个程序使用了一个 `For` 循环来进行累加求和，初始值为 1，终止值为 100。
在循环中，通过 `sum += i` 来将每个数字累加到 `sum` 变量上。
最后，打印出求和结果。
你可以将这段代码粘贴到 Visual Studio 或其他 VB 开发环境中进行编译和运行。
运行程序后，你将在控制台中看到输出结果："从1加到100的和为：5050"。