相关疑难解决方法(0)

我正在使用VBA的基本编码来创建一个模板,从Windows中的其他屏幕中提取数据.当它拉出数字时,它们被格式化为字符串.我现在需要将字符串转换为双精度数,以便加/减它们.我一直在尝试一切,但似乎无法弄明白.

Me.salesprice = Trim(scrn.GetString(11, 65, 10))
'This would be formatted as 25,000.00
Me.salestax = Trim(scrn.GetString(12, 66, 10))
Me.pastdue = Trim(scrn.GetString(14, 65, 10))
Me.assessedppt = Trim(scrn.GetString(18, 66, 10))
Me.secdep = Trim(scrn.GetString(17, 65, 10))

assessedppt = Convert.ToDouble(Me.assessedppt)
uappt = Convert.ToDouble(Me.uappt)
salesprice = Convert.ToDouble(Me.salesprice)
salestax = Convert.ToDouble(Me.salestax)
pastdue = Convert.ToDouble(Me.pastdue)
lc = Convert.ToDouble(frmDetails.lc)

totalfinance = salesprice + salestax + pastdue - secdep + assessedppt + uappt + lc
totalsalesprice = salesprice + pastdue
ppt = assessedppt + uappt

当我这样做时,我收到以下错误:

编译错误:未定义变量,它突出显示第一个Convert函数.

我将TextBox放入我的表单中,用户可以在其中输入值.在VBA中,我需要将值从string转换为double.

我这样做:

Private Sub UserForm_Initialize()

    '....some code
    Dim new_value As Double
    new_value = CDbl(TextBox6.Value)

End sub

但我收到以下错误: