以下程序是我写了测试的,可是运行时却提示类型不匹配,但我已经转换了阿,请大家帮忙看看,谢谢Dim i As Integer
Dim j As Integer
Dim t As Integer
j = 0
t = 0
Dim buff1(10) As Integer
For i = 0 To 9
buff1(i) = CInt(buff(j, t)) * 1000 + CInt(buff(j, t + 1)) * 100 + CInt(buff(j, t + 2)) * 10 + CInt(buff(j, t + 3))  '错误 就是提示在这一句
j = j + 1
Next i
Text26.Text = Str(buff1(0))
Text27.Text = Str(buff1(1))因为我想把string类型的转换成integer类型的,方便数学计算(加减乘除)