主题：金额分拆

GetDigit(Value,Position,Symbol)
返回数值Value中指定位置的数字，参数Symbol指定货币符号。
参数Position指定位置，0表示个位,1表示十位,2表示百位,-1表示小数点后第一位,-2表示小数点后第二位,其余类推。
例如：
GetDigit(123,0,"￥") '等于"3"
GetDigit(123,1,"￥") '等于"2"
GetDigit(123,2,"￥") '等于"1"
GetDigit(123,3,"￥") '等于"￥"
GetDigit(123,3,"$") '等于"$"
GetDigit(1972.63,-1,"￥") '等于"6"
GetDigit(1972.63,-2,"￥") '等于"3"

转为大写：

<CUNum(GetDigit([金额],1,"￥"))>

http://www.foxtable.com/help/topics/1415.htm

Dim gdt As String = "金额8,金额7,金额6,金额5,金额4,金额3,金额2,金额1"

Dim  je As Double = e.DataRow("金额")
For i As Integer = -2 To gdt.split(",").length-3
    e.DataRow(gdt.split(",")(i+2)) = GetDigit(je,i)
    If i+5 > format(je,"0.00").length
        e.DataRow(gdt.split(",")(i+2+1)) = GetDigit(je,i+1)
        Exit For
    End If
Next
For Each dr As Row In Tables("缴款书")
    dr("金额_十") = cint(dr("金额1"))
    dr("金额_万") = cint(dr("金额2"))
    dr("金额_千") = cint(dr("金额3"))
    dr("金额_百") = cint(dr("金额4"))
    dr("金额_拾") = cint(dr("金额5"))
    dr("金额_元") = cint(dr("金额6"))
    dr("金额_角") = cint(dr("金额7"))
    dr("金额_分") = cint(dr("金额8"))
Next

.NET Framework 版本：2.0.50727.3649
Foxtable 版本：2013.10.14.1
错误所在事件：表，缴款书，DataColChanged
详细错误信息：
Exception has been thrown by the target of an invocation.
Conversion from string "" to type 'Integer' is not valid.
Input string was not in a correct format.

请问上述出现什么问题？

Exception has been thrown by the target of an invocation.
Conversion from string "￥" to type 'Integer' is not valid.
Input string was not in a correct format.

还出现上述错误？