我的dll中有兩個function，編譯時我都放在了main file里面，不知道對不對，主函式是jieguo(),主函式中會呼叫一個子函式。
在vb中運行后會提示自動化錯誤
Private N As Integer
Private K As Integer
Private leixing As Integer
Private ts As Double
Private tx1 As Double
Private tx2 As Double
Private tx3 As Double
Private re As chengxu.cChengxu
Private Sub Command1_Click()
Dim result As Double
Set re = New chengxu.cChengxu‘自動化錯誤
N = 3
K = 1
leixing = 1
ts = 100
tx1 = 0.01
tx2 = 0
tx3 = 0
Call re.jieguo(1, result, N, K, ts, leixing, tx1, tx2, tx3)
MsgBox (result)
End Sub
Private Sub Form_Unload(Cancel As Integer)
Set re = Nothing
End Sub
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/120550.html