在VB编程中，计算下一题通常涉及到数学运算、逻辑判断和用户输入的处理。以下是一个简单的示例，展示如何编写一个VB程序来计算斐波那契数列的前20项。
```vb
Dim a As Long, b As Long, c As Long
Dim i As Integer
' 初始化前两项
a = 0
b = 1
' 弹出前两项
MsgBox a
MsgBox b
' 计算斐波那契数列的前20项
For i = 3 To 20
c = a + b ' 计算当前项
MsgBox c ' 弹出当前项
a = b ' 更新a为下一项
b = c ' 更新b为当前项
Next i
```
这个程序首先定义了三个长整型变量 `a`、`b` 和 `c`，分别用于存储斐波那契数列中的当前项、下一项以及临时计算结果。然后，程序初始化 `a` 为0，`b` 为1，并先弹出前两项。接着，程序进入一个 `For` 循环，从第三项开始计算，每次将前两项 `a` 和 `b` 相加得到当前项 `c`，弹出 `c`，然后更新 `a` 和 `b` 的值，为下一次循环做准备。如此循环18次即可得到前20项。
如果你需要计算其他类型的题目，可以根据具体需求调整变量和逻辑。例如，如果需要计算一个数的阶乘，可以使用类似的循环结构，但每次迭代时需要乘以当前的迭代数。
希望这个示例能帮助你理解如何在VB中编写程序来计算下一题。如果你有具体的题目要求，请提供更多细节，以便我能提供更准确的帮助。