vb.net調用matlab

Matlab產生的M文件不能直接在VB中調用,可利用mcc將M文件直接編譯成.EXE文件，然后在VB中聲明下面三個API函數，最后使用Shell命令即可實現VB與Matlab的無縫集成。

創新互聯公司專注為客戶提供全方位的互聯網綜合服務，包含不限于網站建設、成都網站制作、大冶網絡推廣、微信小程序開發、大冶網絡營銷、大冶企業策劃、大冶品牌公關、搜索引擎seo、人物專訪、企業宣傳片、企業代運營等，從售前售中售后，我們都將竭誠為您服務，您的肯定，是我們最大的嘉獎；創新互聯公司為所有大學生創業者提供大冶建站搭建服務，24小時服務熱線：13518219792，官方網址：m.newbst.com

1. 用mcc生成獨立的外部應用程序。可使用如下兩種命令：

mcc -p file.m 或 mcc -m file.m

2. 在VB中聲明調用的三個API函數:

● Declare Function WaitForSingleObject Lib “kernel32”(ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long

● Declare Function CloseHandle Lib “kernel32”(ByVal hObject As Long) As Long

● Declare Function OpenProcess Lib “kernel32”(ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long,ByVal dwProcessId As Long) As Long

3. 示例代碼:

Dim lTask As Long, lret As Long, lHandle As Long

’執行file.exe文件

lTask = Shell(“file.exe”, vbNormalFocus)

lHandle = OpenProcess(SYNCHRONIZE, False, lTask)

’等待進程執行完畢

lret = WaitForSingleObject(lHandle, INFINITE)

lret = CloseHandle(lHandle)

’ file.exe文件執行完畢后，繼續執行應用程序

……

通過以上編碼，應用程序可以在執行過程中調用.EXE完成特定的計算或圖形功能后，再繼續其執行過程，從而實現與Matlab的集成。

如何正確理解VB.NET函數調用

1. Shared Function System.Runtime.

InteropServices.DLLimport("user32.dll")

2. MessageBoxA(ByVal hwnd As Integer,

ByVal text As String, ByVal

lpcaption As String, ByVal

wtype As Integer) As Integer

3. End Function

首先integer被作為32位數據替代了long(long是64位)

System是Net語言中的一個族，System.Runtime.InteropServices是system中的一個類。System.Runtime.InteropServices.DLLimpor是其中的一個方法。調用DLL的API

接口，這個的意思就是vb6的lib"user32", share是共享的意思，例如：

1. Public Class classA

2. Shared Function System.Runtime.

InteropServices.DLLimport("user32.dll")

MessageBoxA(ByVal h As Integer,

ByVal m As String, ByVal c As

String, ByVal type As Integer) As Integer

3. End Function

4. End Class

你可以這樣調用 classA.MessageboxA 但是如果沒有這個share 在class后打點就沒有MessageboxA的成員出現了 ，現在你就象以前一樣的使用他吧。

其實上面這個VB.NET函數調用方法并不正確，我們仍舊要使用API聲明，只是換了一各形式

如果你認為這就是VB.NET就錯了，看看這個：

system.WinForms.MessageBox.Show("對話內容寫在這里", "標題寫在這里", messagebox.OK BitOr messagebox.IconAsterisk)

這就是面向對象，你已經完成了所有的任務。不需要任何的API聲明。不需要寫多余的代碼。

1. messagebox.IconAsterisk=驚嘆號圖標

2. messagebox.IconError=錯誤圖標

3. messagebox.IconExclamation=警告圖標

4. messagebox.IconHand=錯誤圖標

5. messagebox.IconInformation=提示圖標

所經點NET就是打點到達，在族后面打點，在類后面打點，在對象后面打點。第二個問題就是類與類之間相互的關系，Net在網上處理人與人的關系，在程序語言中處理類與類的關系。倒底是加不加share,倒底是類后面打點,還是Dim成一個對象（把他當一個變量吧）再說，是等于class,還是New class.是dim xxx as class=new class 還是dim xxx as new class

就是這樣VB.NET函數調用將更簡單，不須要研究一些很難的東西。

VB.NET EXE怎么調用指定的DLL

一般VB.NET調用DLL可以通過Declare 語句在模塊級用于聲明對動態鏈接庫 (DLL) 中的外部過程的引用。

Private Declare Sub

myFunc1 Lib "mylib.dll"

(ByVal strName As String)

但是，VB.NET,C#.NET創建的DLL是個類庫，不能生成標準的 DLL 文件，不能采用declare ()的方式。應該在解決方案資源管理器下的需要引用的項目的引用欄點擊鼠標右鍵--添加對這個類庫[mylib.dll]的引用即可。

以下為VB.NET調用DLL代碼示例：

DllImport("kcomm.dll", CharSetCharSet:

=CharSet.Ansi, SetlastError:=True)

Private Shared Function gettxt(ByVal

port As Integer, ByVal wait As

Integer, ByVal _date As Long,

ByVal _time As Long, ByVal

filename As String) As Integer

End Function

根據實際情況更改你的DLL名稱、函數名、參數名和類型。

VB.NET調用DLL的只是COM組件，無法作為輸出函數的DLL，其實這只是個錯誤的說法。其實MS非常狡猾，如果你是個VB瘋狂發燒友的話，應該早就狂試出這種可以創建輸出函數的DLL的方法。

VB編譯文件實際上采取了兩次編譯的方法，首先是調用C2.exe產生*.OBJ文件，然后調用Link.EXE連接。如果在LINK的時候添加EXPORT選項，實際上是可以輸出函數的。但是，在VB的工程選項中將這些屏蔽了。而且過分的是：VB在Build完成后會將OBJ文件刪除，這樣就無法手動通過Link來創建我們需要的DLL了。不過我找到一個比較齷鹺的變通的方法，就是先創建一個Exe工程，在Form_Load事件里面寫下面的語句:

Sub Main

If MsgBox("哈哈",

vbOKCancel) = vbOK Then

Shell "link2.exe "

Command$

End If

End Sub

然后編譯為LinkTemp.EXE，接下來將LINK.EXE改名為Link2.exe，將LinkTemp.EXE改名為Link.EXE。這樣在VB調用Link.EXE時會彈出對話框，處理就會中斷。這時就可以有機會將OBJ文件拷貝出來了。

然后我創建了一個ActiveX DLL工程，在這個工程里面添加一個Module并創建一個Public函數mathadd：

Public Function mathadd

(ByVal a As Long, ByVal

b As Long) As Long

mathadd = a + b

End Function

編譯這個工程，在Link的時候就會中斷。然后把創建的Class1.obj、Module1.obj、Project1.obj備份出來。然后就可以調用Link2.exe連接OBJ到DLL了，我的連接代碼是：

Link2.exe "e:\\vbdll\\Class1.obj"

"e:\\vbdll\\Module1.obj"

"e:\\vbdll\\Project1.obj"

"E:\\Program Files\\Microsoft

Visual Studio\\VB98\\VBAEXE6.LIB"

/ENTRY:__vbaS /EXPORT:mathadd /OUT:

"e:\\vbdll\\ProjectOK.dll"

/BASE:0x11000000 /SUBSYSTEM:

WINDOWS,4.0 /VERS

注意里面的/ENTRY和/EXPORT開關，/EXPORT開關聲明了輸出函數mathadd。這樣就大功告成了，可以被其他語言引入，例如在VB中，只需要：

Private Declare Function mathadd

Lib "e:\\vbdll\\ProjectOK.dll"

(ByVal a As Long, ByVal b As

Long) As Long

當前名稱：vb.net調用lib VBNET教程
文章源于：http://m.newbst.com/article6/doojiog.html

成都網站建設公司_創新互聯，為您提供網站設計公司、電子商務、全網營銷推廣、品牌網站設計、軟件開發、網站策劃

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯