VB和Matlab/Simulink的接口方法:Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Dim result As String
Dim Matlab As Object
Set Matlab = CreateObject("Matlab.Application")

Private Sub Command1_Click()
Matlab.execute (save "Text1")
End Sub

Private Sub Command2_Click()
Text2.Text = Matlab.execute("Test1")
result = Matlab.execute("print-dbitmap")
Imagel.Picture = Clipboard.GetData
End Sub