兩種方法
勉縣網(wǎng)站建設(shè)公司創(chuàng)新互聯(lián),勉縣網(wǎng)站設(shè)計(jì)制作,有大型網(wǎng)站制作公司豐富經(jīng)驗(yàn)。已為勉縣上1000家提供企業(yè)網(wǎng)站建設(shè)服務(wù)。企業(yè)網(wǎng)站搭建\外貿(mào)網(wǎng)站制作要多少錢,請找那個(gè)售后服務(wù)好的勉縣做網(wǎng)站的公司定做!
1.
Shell(""Explorer.exe", AppWinStyle.NormalFocus")
2.
Dim proc As New Process
proc.StartInfo.FileName="Explorer.exe"
proc.Start
方法2給予更多的控制,如結(jié)束進(jìn)程的方法Kill
Matlab產(chǎn)生的M文件不能直接在VB中調(diào)用,可利用mcc將M文件直接編譯成.EXE文件,然后在VB中聲明下面三個(gè)API函數(shù),最后使用Shell命令即可實(shí)現(xiàn)VB與Matlab的無縫集成。
1. 用mcc生成獨(dú)立的外部應(yīng)用程序??墒褂萌缦聝煞N命令:
mcc -p file.m 或 mcc -m file.m
2. 在VB中聲明調(diào)用的三個(gè)API函數(shù):
● 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
’執(zhí)行file.exe文件
lTask = Shell(“file.exe”, vbNormalFocus)
lHandle = OpenProcess(SYNCHRONIZE, False, lTask)
’等待進(jìn)程執(zhí)行完畢
lret = WaitForSingleObject(lHandle, INFINITE)
lret = CloseHandle(lHandle)
’ file.exe文件執(zhí)行完畢后,繼續(xù)執(zhí)行應(yīng)用程序
……
通過以上編碼,應(yīng)用程序可以在執(zhí)行過程中調(diào)用.EXE完成特定的計(jì)算或圖形功能后,再繼續(xù)其執(zhí)行過程,從而實(shí)現(xiàn)與Matlab的集成。
Shell "notepad.exe c:\1.txt", vbNormalFocus
或
i=Shell( "notepad.exe c:\1.txt", vbNormalFocus)得到返回值
網(wǎng)站名稱:vb.net調(diào)用mts vbnet imports
文章出自:http://jinyejixie.com/article30/ddoggpo.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供關(guān)鍵詞優(yōu)化、網(wǎng)頁設(shè)計(jì)公司、外貿(mào)網(wǎng)站建設(shè)、App開發(fā)、網(wǎng)站導(dǎo)航、網(wǎng)站建設(shè)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)