某焊接钢管及镀锌钢管的外径D均为114mm，壁厚δ为4mm。请根据已知条件，回答下列问题。

在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl_Click()
Do Until b a＝In put Box("输入a的值")
a＝Val(a)
b＝Input Box("输入b的值")
b=Val(b)
a=a＋b
Loop
Print a
End Sub
程序运行后，依次输入5，4，3，2，1，0，-1，-2，则输出结果是【14】。