主题：如何文本相加[已解決]

列是文本

但內容是数字

想利用代码把內容相加 ,答案在 总数列显示

想了很久都沒头绪

求老師提供思路

此主题相关图片如下：e.jpg

 

想到这样写

If e.DataCol.Name = "客户" Then
    Dim Tot As String
    Dim nm1s() As String = { "手雕" ,"电雕" ,"蜡钉","倒模","银版","银钉","修版" ,"压模" ,"收发" }
    For Each nm1 As String In nm1s
        e.DataRow(nm1) = DataTables("进度").Compute( "Sum(行编码)"," 项目状态 <> '暂停' and 所在部门 = '" & nm1 & "' And 测未完 = 1 And 客戶 = '" & e.NewValue & "'"  )
        Tot = Tot + e.DataRow(nm1)
    Next
    e.DataRow("总数")= Tot
    Tot = 0
End If

 

如MI 客户  7+1 答案应是8

结果 是71  失败了