1樓：網友
在窗體裡面放如個timer控制項。
private sub form_load() 載入窗體的時候執行下面**。
10000 '間隔10秒 最大為65秒。
shell "c:\", vbhide '隱藏執行c:\ 不能在程序裡面隱藏 當然自己本身隱藏程序的話也不會顯示在程序裡面。
end sub
private sub timer1_timer()end '退出 主程式 注意。不能退出。
end sub
不知道你關閉主程式後 需要關閉不？
如何讓vb啟動執行大概十秒後，再啟動另外乙個.exe程式。
2樓：北京萬博彙
用sleep或者timer
首先講講sleep，這是系統api函式，要用之前需要先宣告一下private declare sub sleep lib "kernel32" (byval dwmilliseconds as long)
然後在需要延時的地方加入sleep(1000)，引數1000是指1000毫秒，就是1秒。
timer控制項。
private sub form_load()= true
end sub
private sub timer1_timer()shell "d:\" '雙引號裡是軟體的位址end sub
對比下，sleep在執行時軟體會出現假死的情況，就是win7的（未響應），直到sleep結束，而timer就沒有這個問題。
3樓：網友
dim x as integer
private sub form_load() true
end sub
private sub timer1_timer()
x = x + 1 ' 這裡計時，隔1秒，x增加1
dim fs as object, fl as string
set fs = createobject("")
fl = "路徑+檔名。exe" '這裡填寫「組態王軟體」的詳細路徑以及名稱和副檔名。
if x >= 10 then '如果夠10秒。
if = true then '判斷需要開啟的軟體是否存在。
shell "路徑+檔名。exe", 1 '如果存在開啟軟體。
elsemsgbox "沒有找到這個檔案！", vbokonly, "無開啟的檔案！" '如果不存在，提示。
end if
false '關閉計時器。
end if
end sub
4樓：網友
doevents
sleep(10*1000)『等待10秒。
dim retval
retval = shell("c:\windows\", 1) ' 啟動計算器。
怎麼用vb開啟另外乙個程式
5樓：惡通天來也
你可以建立乙個通用對話方塊。讓它的index屬性值等於2，你就可以開啟你指定的程式。自己試試看。 或者shell 函式。
執行乙個可執行檔案，返回乙個 variant (double)，如果成功的話，代表這個程式的任務 id，若不成功，則會返回 0。
語法shell(pathname[,windowstyle])
shell 函式的語法含有下面這些命名引數：
部分 描述。
pathname 必要引數。variant (string)，要執行的程式名，以及任何必需的引數或命令列變數，可能還包括目錄或資料夾，以及驅動器。
windowstyle 可選引數。variant (integer)，表示在程式執行時視窗的樣式。如果 windowstyle 省略，則程式是以具有焦點的最小化視窗來執行的。
windowstyle 命名引數有以下這些值：
常量 值 描述。
vbhide 0 視窗被隱藏，且焦點會移到隱式視窗。
vbnormalfocus 1 視窗具有焦點，且會還原到它原來的大小和位置。
vbminimizedfocus 2 視窗會以乙個具有焦點的圖示來顯示。
vbmaximizedfocus 3 視窗是乙個具有焦點的最大化視窗。
vbnormalnofocus 4 視窗會被還原到最近使用的大小和位置，而當前活動的視窗仍然保持活動。
vbminimizednofocus 6 視窗會以乙個圖示來顯示。而當前活動的的視窗仍然保持活動。
說明如果 shell 函式成功地執行了所要執行的檔案，則它會返回程式的任務 id。任務 id 是乙個唯一的數值，用來指明正在執行的程式。如果 shell 函式不能開啟命名的程式，則會產生錯誤。
注意 預設情況下，shell 函式是以非同步方式來執行其它程式的。也就是說，用 shell 啟動的程式可能還沒有完成執行過程，就已經執行到 shell 函式之後的語句。
shell 函式示例。
本示例使用 shell 函式來完成乙個使用者指定的應用程式。
將第二個引數值設成 1，可讓該程式以正常大小的視窗完成，並且擁有焦點。
dim retval
retval = shell("c:\windows\", 1) ' 完成calculator。
6樓：網友
vb實現開啟另一程式。可以呼叫api函式shellexecute.當然最簡單的還是用shell了。
如果程式字尾為exe或是com的話，可以直接用[shell "完整檔案路徑/完整程式名",逗號後可以加引數設定執行方式。如：shell "d:
我的文件\桌面\"]如果程式不是exe或是com的話，可以這樣用：shell "cmd /c start d:\我的文件\桌面\"呼叫cmd來執行程式。
希望能對你有所幫助。
7樓：網友
1、如果是開啟已存在的程式（如 *.exe *.com 等檔案），可以使用shell "完整路徑\完整檔名"。
例開啟計算器： shell "c:\windows\system32\",vbnormalfocus
2、開啟當前工程的視窗，使用 視窗名。show 方法。
例已有視窗名為frma :
8樓：⑽字_架
right
shell "path"
for example:
shell "c:\"
如果沒有此檔案就會提示錯誤。
9樓：網友
開啟另乙個程式。
shell "d:\"
或點選進入另乙個介面。
load form2
10樓：網友
shell e:\keil\uv4\
記得把shell的api宣告一下。
11樓：網友
用shell命令，具體格式我忘不了，你自己查一下。
vb開啟另乙個程式的**
12樓：網友
vb實現開啟另一程式。可以呼叫api函式shellexecute.當然最簡單的還是用shell了。
如果程式字尾為exe或是com的話，可以直接用[shell "完整檔案路徑/完整程式名",逗號後可以加引數設定執行方式。如：shell "d:
我的文件\桌面\"]如果程式不是exe或是com的話，可以這樣用：shell "cmd /c start d:\我的文件\桌面\"呼叫cmd來執行程式。
希望能對你有所幫助。
13樓：網友
1、如果是開啟已存在的程式（如 *.exe *.com 等檔案），可以使用shell "完整路徑\完整檔名"。
例開啟計算器： shell "c:\windows\system32\",vbnormalfocus
2、開啟當前工程的視窗，使用 視窗名。show 方法。
例已有視窗名為frma :
14樓：網友
開啟另乙個程式。
shell "d:\"
或點選進入另乙個介面。
load form2
vb使用快捷鍵結束乙個程序，再按另乙個鍵啟動這個程序
15樓：悲傷0謝幕
給你個思路：可以先註冊熱鍵registerhotkey或可以用getasynckeystate，然後用shell執行 用terminateprocess結束吧。
1，在vb中，怎樣在執行時啟動電腦的另外乙個程式？例如，開啟乙個文件？ 2，怎樣在vb結束程式的時候開啟
16樓：網友
shell "外部程式的路徑"
就能開啟另外的程式了。不知讀明白你說的沒得？
在vb結束時開啟個檔案。可以在【private sub form_unload(cancel as integer)】裡也入。**就1的那個。。
如不對請指出。謝謝。
17樓：亞馬遜選品管家
用shell，比如shell("d:\")就啟動這個程式了。
vb6.0怎麼在點選按鈕後開啟另乙個程式？
18樓：股海小書童
按鈕上面加。
shell 「
引號中間加你要開啟程式的路徑。
vb執行自動單擊另一程式的按鈕
19樓：網友
用控制代碼啊，獲得選單控制代碼：視窗選單用getmenu，視窗的系統選單用getsystemmenu，然後用getsubmenu獲取子選單的控制代碼，然後是按鈕的控制代碼（findwindow）；然後模擬點選：使用 sendmessage 給這個按鈕傳送 wm_lbuttondown 和 wm_lbuttonup 訊息模擬滑鼠點選。
20樓：網友
你那個按鈕是灰色（禁用）的，呵呵。
系統啟動程序問題
不知道你是不是用的vista，三十多個程序很正常，那個是cpu頻率.是固定屬性，無法改變.解決辦法 減少開機啟動項,方法 開始 執行 輸入 msconfig 選擇 啟動項 把不需要開機啟動的前面勾去掉 只保留ctfmon.exe輸入法和防毒軟體 即可。然後點 服務 下面 隱藏所有microsoft服...
易語言檢測程序出現之後結束某一程序的命令是什麼 求求各位大俠了！還有需要什麼模組麼
版本 2 支援庫 eapi 程式集 視窗程式集1 程式集變數 程序,程序資訊,0 程式集變數 程序名,整數型 程式集變數 是否,邏輯型 時鐘2.時鐘週期 500 版本 2 支援庫 eapi 子程式 時鐘2 週期事件 是否 假 程序 取系統程序列表 計次迴圈首 取陣列成員數 程序 程序名 如果真 到小...
VB基礎問題，VB一個基礎問題
private sub command1 click static i as integer dim a a array 小1 王2 小3 李4 太5 多6 了7 不8 寫9 了10 label1.caption a i if i 9 then i i 1end sub private sub co...