想请教下你是怎么解决的,我现在也遇到类似的问题。还有一个想请教下,有的m函数生成dll是成功的但是调用时说是自动化错误光标就停在Set thematlab = New setting.setting
这一句上面
Private Sub Form_Load()
Dim Data As Double
Dim i, j As Variant
Set thematlab = New setting.setting
Open "E:\2.txt" For Input As #1
n = 0
Do While Not EOF(1)
n = n + 1
Input #1, Data
Loop
Close #1
End Sub