将字符串转换为DataObject.GetText（）的正确格式

Question

我正在尝试为DataObject.GetText（）的参数循环一个字符串数组，但我一直在

  

运行时错误'13'：输入不匹配

以下是我到目前为止的相关内容：

Dim L as Integer, OldL as String
Dim Loc(1 to 19) as String
Loc(1) = “0, 5, 14”: Loc(2) = “31, 5, 7”: ...
.
.
.
For L = 1 to 19
    OldL = Trim([Object].GetText(Loc(L))) ‘This is where the problem is
.
.
.
Next L

谢谢。

Answer 1

我想到了一个有效的想法，但如果有人有这个想法，我仍然愿意接受建议。

以下是我的更改：

Dim L As Integer, OldL As String
Dim a(1 to 19) As Integer, b(1 to 19) As Integer, c(1 to 19) As Integer
.
.
.
For L = 1 to 19
    OldL = Trim([Object].GetText(a(L), b(L), c(L)))
.
.
.
Next L