![]() |
#2
不说也罢2011-06-04 15:44
|
Dim StrTest(50)
Dim mc(50)
Dim j As Integer
For j = 0 To Val(Zds) - 1
StrTest(j) = oIni.INIRead(Application.StartupPath & "\config.ini", "信息", j + 1)
mc(j) = Split(StrTest(j), ",")
MsgBox(mc(j)) '错误提示:参数“Prompt”无法转换为类型“String”。
Next j