[求助]vb和matlab接口有关matlab程序调用vb数组的问题

[xuexizhe]

程序如下：
Private Sub cmdTest_Click()
Dim Data3(1 To 200, 1 To 5001) As Double
Dim Data4(1 To 200, 1 To 5001) As Double
Dim data(1 To 100, 1 To 1000) As Double
Dim sng0 As Double
Dim i As Integer
Dim j As Integer

'从文件中读取数据
'Open App.Path & "\data1.dat" For Input As #1
CommonDialog1.ShowOpen
'dblData = openCommonDialog1.FileName
Open CommonDialog1.FileName For Input As #1


For i = 1 To 200
For j = 1 To 5001
Input #1, sng0
Data3(i, j) = sng0
Next j
Next i
Close #1
'Print Data3(1, 1)
'Open App.Path & "\data2.dat" For Input As #1
CommonDialog2.ShowOpen
'dblData = openCommonDialog1.FileName
Open CommonDialog2.FileName For Input As #1


For i = 1 To 200
For j = 1 To 5001
Input #1, sng0
Data4(i, j) = sng0
Next j
Next i
Close #1
For i = 1 To 100
For j = 1 To 1000
data(i, j) = Data4(i, j)
'Print data1(i, j)
Next j
Next i
For i = 1 To 10
For j = 1 To 10
Print data(i, j)
Next j
Next i
'调用接口函数
'Call theMatlab.tttt1(Data3, Data4)
Call theMatlab.ceshi5(data)

'txtPt.Text = Format(dblPt, "##,##0.000")
'txtQd.Text = Format(dblQd, "##,##0.000")

其中将Data3,Data4等数据传送到接口程序中时：提示：“类型不匹配”错误
就是说vb中导入的数据数组到matlab程序中时，数据类型不匹配：
请高手指点！