主题：帮忙看下哪里错了

Dim r As Row = Tables("产品资料库_产品资料子表").Current
Dim r1 As Row =  Tables("产品资料库_产品资料主表").Current
Dim bz As Integer = r1("包装规格")
Dim jj As Decimal = r("单价_件价")
If r("单价_件价") <> "" AndAlso r1("包装规格")<> "" AndAlso r1("包装规格")<> 0
    r("单价_瓶价") =Format(jj/bz,"###,##")
End If

单价的类型都是高精度小叔，包装规格的是整数，老是出错，用messagebox测出来的JJ/BZ也没问题，奇怪了

.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2014.11.11.1
错误所在事件：窗口,产品资料库,供瓶价自动,Click
详细错误信息：
从字符串“”到类型“Double”的转换无效。
输入字符串的格式不正确。

我仔细检查了数据类型，没发现哪里有错误啊