主题：求帮助

如下代码请教如何修改？

Dim bl As Integer = Vars("_NewTaoci")
Dim bl1 As Integer = Vars("_NewYamin")
Dim t As Table = Tables("销售填写表")
   If t.("cpmc") = "ABC" Then
      t.("xuhao") = bl + 1
   Else
      t.("xuhao") = bl1 + 1
   End If

Vars("_NewTaoci")-----是全局变量
Vars("_NewYamin") -----是全局变量