主题：金额分拆

EXCEL模板如何将金额分拆成十、万、千、百、十、元、角、分

在EXCEL模板公式里面设公式不行吗？

Dim gdt As String = "金额_分,金额_角,金额_元,金额_拾,金额_百,金额_千,金额_万,金额_十"

    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

 

可以将各位数金额由字符型转为数据型吗？

1235.07金额分拆成1   2   3   5    0   7每个数字只是字符型吗？不可以分拆成数据型吗？

拆分字符型数字如何合计？

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.

还出现上述错误？

cumoney[@缴款书,金额]

为什么不能用？