大师:讨教!
For n1 As Integer = sh To mh
Dim r As Row = Tables("数据表").AddNew()
For m As Integer = sl To ml
If IsNumeric(ws.cells(n1,m).value) Then
r(m) =val( ws.cells(n1,m).value)
End If
r(m) = trim(ws.cells(n1,m).value)
Next
Next
此行改成 r(m) = ws.cells(n1,m).value.replace(" ","") 为何就错误?
这样写也错误
dim a as string = ws.cells(n1,m).value
a = a .replace(" ","")
r(m) = a