導航:首頁 > 程序命令 > vb命令行

vb命令行

發布時間:2023-03-02 22:55:27

① vb 命令

用bat文件
先寫一個bat文件,把要執行的命令寫在其中
然後shell bat文件路徑
如果想得到命令執行的結果,在命令後加 >文件名,就可以把執行的結果輸出到文件中。
例如:dir >a.txt
文件的讀寫我就不說了。

② 在VB中,如何調用命令行的命令

使用SHELL()

SHELL語句用法心得

一. 調用系統「創建快捷方式」向導
是否為VB不支持創建快捷方式而於著急呢?雖然 您可以調用vb5stkit.Dll中的fCreateShellLink函 數,但它是為安裝程序設計的,快捷方式的默認路徑 總是從當前用戶的「\Start Menu\Programs」開始,也 就是說,如果您的Windows95裝在C盤上,您無法通過 fCreateShellLink函數把快捷方式創建到D盤上去。
現在,給大家介紹一種極為方便、巧妙的方法: 用Shell語句調用系統「創建快捷方式」向導。
新建一個項目,在窗體上放一個按鈕,雙擊此按 鈕,加入以下代碼:
Private Sub Command1_Click()
Open App.Path & "\temp.lnk" For Output As #1
Close #1 '以上兩句在程序所在目錄建立一 個臨時文件
Shell "Rundll32.exe AppWiz.Cpl,NewLinkHere
"& App.Path & "\temp.lnk"
End Sub
(注意:Shell語句中NewLinkHere後面跟著一個 空格才是引號,否則將出錯。)
運行程序,按一下命令按鈕,怎麼樣?「創建快 捷方式」向導出現了,如果創建成功,快捷方式將取 代臨時文件temp.lnk的位置,如果選取消,temp.lnk 也會自動消失。當然,您可以在硬碟的任意位置建立 temp.lnk。好,現在又可以為您的程序增添一項新功 能了。Enjoy!
二. Rundll32.exe的用途
我們知道,用Shell語句只能調用可執行文件,即 exe、com、bat和pif文件,有時我們想要調用其他一 些系統功能該怎麼辦呢?此時,Windows提供的 Rundll32.exe可大顯身手了。下面我們來認識一下這 些用法,也許會給您帶來一點驚喜。
1.要打開設置系統時間的控制面板文件 (Timedate.cpl),只需運行如下代碼:
Shell "Rundll32.exe
Shell32.dll,Control_RunDLL Timedate.cpl"
至於打開其他控制面板文件,相信您一定能夠舉 一反三,嘗試一下,換個文件名就成了。
2.要運行某一快捷方式(*.lnk)則可以用以下 代碼:
She11 "Rundll32.exe url.dll, FileProtocolHandler X" (X代表要運行的文件,包括 路徑,下同。
3. 也可以這樣寫來打開ActiveMovie控制:
Shell "RUNDLL32.EXE amovie.ocx,Rundll",1
而用Shell "RUNDLL32.EXE amovie.ocx,Rundll /play X",1 將直接播放媒體文件。
4. Shell "rundll32.exe desk.cpl,InstallScreenSaver X」當然是安裝屏幕保 護啦,如果你寫了一個屏幕保護程序,那麼可以在安 裝程序中寫上它,而不一定要裝到system目錄下。順 便提一下,VB不是自撈一個「Application Setup Wizard」么?它的VB源代碼都在安裝目錄下的 「\setupkit\setup1」中放著呢,好好把它研究一下。 你完全能做出富有個性的安裝程序來。
5.按住shift鍵,右擊某一文件,菜單中會出現 「打開方式」選項,這也許已不是什麼秘密。但現在, 用shell "rundll32.exe shell32.dll OpenAs_RunDLL X" 便能直接調用「打開方式」框。
6. 甚至能用這樣一句來列印文件(包括HTML所 支持的所有文本與圖像格式):
Shell "rundll32.exe MSHTML.DLL,PrintHTML X」, 1
怎麼樣?是不是小有收獲呢?這下,您一定會對 Rundll32.exe這個平時不起眼的文件另眼相待了,它 可是系統運行必不可少的部件呢!其實 Shell+Rundll32還能調用其他許多系統功能,比如關 於NetMeeting和Telnet方面的。如果您有興趣,可以 到往冊表的「我的電腦\HKEY_CLASSES_ROOT\」或「我 的電腦\HKEY_LOCAL_MACHINE\Software\CLASSES」下 去看看,本文的內容大都是從那裡「抄」來的。只要 有足夠的決心、信心、耐心,您一定能發現更多有價 值的東西。Good luck!

③ 在VB中怎麼獲取命令行參數

直接使用Command對象
Private Sub form_load()
Dim ss
If Command <> "" Then
ss = Command '將命令行參數賦值給ss
'這里寫你要執行的代碼(ss中就是你的命令行參數)
End If
End Sub

例如:
Private Sub form_load()
Dim ss
If Command <> "" Then
ss = Command '將命令行參數賦值給ss
MsgBox "你的命令行參數是:" & ss
End If
End Sub
假設編譯為abc.exe,路徑為d:\abc.exe
在運行里輸入 d:\abc.exe MyMingLingHang
程序運行時 msgbox 就提示 你的命令行參數是:MyMingLingHang
對於 \a \b 等一類多參數命令行也是全部存儲在Command中的
具體使用時可以對ss字元串進行切分、判斷等一系列操作

④ VB中的"命令行參數"怎麼用

給你做個簡單的介紹吧,先做下面的
'添加窗體Form1,然後添加如下代碼:
"winmm.dll"Alias"mciSendStringA"(ByVallpstrCommandAsString,,ByValuReturnLengthAsLong,ByValhwndCallbackAsLong)AsLong
PrivateSubForm_Load()
SelectCaseLeft(Command,2)
Case"/o"'表示open,打開光碟機
mciSendString"SetCDAudioDoorOpenWait",0&,0&,0&
Case"/c"'表示close,關閉光碟機
mciSendString"SetCDAudioDoorClosedWait",0&,0&,0&
EndSelect
UnloadMe
EndSub

將上面的編譯成test.exe,放到c:\下,然後打開命令提示符窗口,敲入c:\test.exe /o看看,是不是打開光碟機了?再試試c:\test.exe /c

⑤ VB程序怎麼處理命令行參數

PrivateSubForm_Load()
DimAAsString
A=Command
SelectCaseUCase$(A)
Case"INSTALL"
MsgBox"進入安裝模式",vbInformation,"命令行測試"
Me.Caption="安裝模式"
Case"UNINSTALL"
MsgBox"進入卸載模式",vbInformation,"命令行測試"
Me.Caption="卸載模式"
CaseElse
MsgBoxA,vbInformation,"命令行測試"
EndSelect
EndSub

'比如將編譯好的程序Test.exe放入D盤根目錄下,然後啟動命令提示符,將目錄切換到D盤根目錄,然後輸入「Testinstall」則會自動彈出消息框。

閱讀全文

與vb命令行相關的資料

熱點內容
手中的app如何隱藏 瀏覽:1001
安卓什麼壁紙軟體號 瀏覽:436
java設置內存大小 瀏覽:434
php循環匹配 瀏覽:323
技巧pdf 瀏覽:479
單片機斷程序怎麼解決 瀏覽:160
如何製作APP的圖片 瀏覽:506
php大小排序 瀏覽:548
linuxkerberos 瀏覽:126
暗黑破壞神3如何下載亞洲伺服器 瀏覽:953
linux中ftp伺服器地址怎麼看 瀏覽:438
ansys命令流do 瀏覽:122
單片機6502 瀏覽:765
自助洗車有什麼app 瀏覽:937
程序員離職率多少 瀏覽:322
程序員那麼可愛電視劇今天沒更新 瀏覽:337
我的世界地形演算法 瀏覽:344
台灣dns的伺服器地址雲空間 瀏覽:288
音樂噴泉軟體要什麼加密狗 瀏覽:501
androidhttpmime 瀏覽:774