在VB6（Visual Basic 6.0）中，使用`For`循环可以轻松实现对一系列数值的遍历和操作。本文将通过一个具体的例子，展示如何利用`For`循环来计算从1到100的累加总和。

示例代码：

```vb

Private Sub Command1_Click()

Dim i As Integer ' 定义计数器变量

Dim sum As Long ' 定义用于存储累加结果的变量

sum = 0 ' 初始化累加值为0

' 使用For循环从1遍历到100

For i = 1 To 100

sum = sum + i ' 每次循环将当前值加到sum上

Next i

' 输出累加结果

MsgBox "1到100的累加总和是: " & sum

End Sub

```

代码解析：

1. 变量定义：首先声明了两个变量，`i`作为循环计数器，`sum`用来存储累加的结果。

2. 初始化：将`sum`初始化为0，确保每次运行程序时都能得到正确的初始状态。

3. For循环：通过`For i = 1 To 100`语句开始循环，从1迭代到100。在每次循环中，当前值`i`会被加到`sum`变量上。

4. 输出结果：最后使用`MsgBox`函数弹出一个消息框，显示最终的累加结果。

注意事项：

- `Dim`关键字用于声明变量类型，这里选择了`Integer`和`Long`分别表示计数器和累加器。

- 确保循环结束条件正确设置，避免逻辑错误导致无限循环或数据溢出问题。

此方法简单直观，非常适合初学者理解和实践。希望这个示例能够帮助您更好地掌握VB6中的`For`循环应用！