設計了幾個按鈕，每個按鈕單擊時候啟動指定的程式
如何啟動Word空白檔案，InternetExplor、畫圖等
uj5u.com熱心網友回復：
直接用shell 然后跟程式路徑Shell(Application.StartupPath & "\abc.exe", vbNormalFocus)
uj5u.com熱心網友回復：
如果需要運行的exe所在目錄在環境變數PATH中，或者和你自己的程式在同一目錄，可以直接用exe的名字來啟動Process.Start("mspaint.exe")
Process.Start("notepad.exe")
否則，用全路徑來啟動
Process.Start("C:\Program Files\Microsoft Office\Office16\excel.exe")
uj5u.com熱心網友回復：
Shell("C:\Program Files (x86)\Internet Explorer\iexplore.exe http://www.baidu.com", Wait:=True)Dim tp As String = My.Application.Info.DirectoryPath & "\test.text"
IO.File.WriteAllBytes(tp, {48, 49, 51})
Process.Start("notepad.exe", tp)
uj5u.com熱心網友回復：
Shell("winword.exe")uj5u.com熱心網友回復：
正解！
uj5u.com熱心網友回復：
import windows.office.interopdim oWordApp as word.application
dim oWordDoc as word.document
privat sub button_click (........)....
oWordApp = new word.application
oWordDoc = oWordApp.add([readonly]:=false,visible = true)
oWordApp.visible = true
end sub
uj5u.com熱心網友回復：
office建議用這種
uj5u.com熱心網友回復：
1.打開word參考:microsoft word 12.0 object library
dim wordobj as microsoft.office.interop.word.application
dim word as microsoft.office.interop.word.document
wordobj=new microsoft.office.interop.word.application
word=wordobj.document.add
wordobj.visible=true
2.打開ie
dim ie as object=createobject("InternetExplorer.Application")
dim url as string="www.baidu.com"
ie.visible=true
ie.navigate(url)
3.打開畫圖
shell("c:\windows\system32\mspaint.exe",appwinstyle.normalfocus)
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/53952.html
標籤：VB.NET