在VB编程中，计算奇数和的方法有多种。以下是一些常见的方法：
使用For-Next循环
通过设置循环变量的初值为1，终值为100，步长为2，可以直接遍历1到100之间的所有奇数，并将它们相加。
```vb
Dim sum As Integer
sum = 0
For i = 1 To 100 Step 2
sum = sum + i
Next i
Print "奇数和为： " & sum
```
使用数学公式
1到100之间的奇数和可以通过数学公式计算：`sum = n * （n + 1） / 2`，其中n为奇数的个数。对于1到100之间的奇数，n为50。
```vb
Dim sum As Integer
sum = 50 * （50 + 1） / 2
Print "奇数和为： " & sum
```
使用条件判断
在循环中通过判断循环变量是否为奇数来累加奇数和。
```vb
Dim sum As Integer
sum = 0
For i = 1 To 100
If i Mod 2 = 1 Then
sum = sum + i
End If
Next i
Print "奇数和为： " & sum
```
使用数组和输入
可以通过输入n个数，然后判断每个数是否为奇数，如果是则累加到奇数和中。
```vb
Dim sum As Integer
sum = 0
Dim i As Integer
Dim n As Integer
n = InputBox（"请输入一个整数"）
For i = 1 To n
If InputBox（"输入第" & i & "个数"） Mod 2 = 1 Then
sum = sum + InputBox（"输入第" & i & "个数"）
End If
Next i
Print "奇数和为： " & sum
```
这些方法都可以有效地计算1到100之间的奇数和，你可以根据具体需求选择合适的方法。