vb點虐 怎么重啟自己

你需要兩個創建兩個程序...

公司主營業務：成都網站制作、成都網站設計、移動網站開發等業務。幫助企業客戶真正實現互聯網宣傳，提高企業的競爭能力。創新互聯是一支青春激揚、勤奮敬業、活力青春激揚、勤奮敬業、活力澎湃、和諧高效的團隊。公司秉承以“開放、自由、嚴謹、自律”為核心的企業文化，感謝他們對我們的高要求，感謝他們從不同領域給我們帶來的挑戰，讓我們激情的團隊有機會用頭腦與智慧不斷的給客戶帶來驚喜。創新互聯推出黃南州免費做網站回饋大家。

首先在你的主程序的代碼里面添加它們:

'main program

public sub restart()

shell app.path "\restart.exe " app.path "你的主程序的名字.exe",vbhide

end

end sub

用于重啟的程序,叫做restart.exe

先創建標準exe工程

然后再在右邊的工程資源管理器中右鍵點擊form1

在彈出的菜單中選擇移除form1

然后點擊菜單條上面的添加模塊

在新添加的module1里添加它們

'restart program

sub main

shell command

end sub

生成exe到你的主程序所在的目錄

這時你便可以在主程序的任意地方添加一行restart來重新啟動你的程序了

vb點虐 怎樣才能在程序運行時一直重復執行一個子函數而不影響程序運行

首先這個要看的子函數執行的情況了，比如你子函數要8秒才能執行完成，你1秒鐘執行一次，到時會有好幾個子函數在運行，肯定會影響程序運行的。你要調整時間才能讓子函數不影響主程序；

再一個，如果不想影響主程序，你可以再建一個程序，專門用來執行子函數，然后讓那個程序用定時器每秒執行一次子函數，這樣就不會影響主程序；

在VB點虐 中我想實現“先暫停該程序，等其他程序運行完再繼續執行該程序”的功能，請問怎么實現？

詳細查看了你的問題，完全不需要使用線程sleep的方法。

在這邊，我要給你引入一個概念。就是Form窗體的兩個方法。

Form.Show()和Form.ShowDialog()

第一個Show方法運行后，你的主程序還是會進行，你的代碼還是會繼續進行下去。此時，窗體還是彈出的。

第二個ShowDialog方法運行后，此時，彈出的一個窗體，你不將其關閉，那么，主程序就會一直等待這個窗體關閉后，才執行后面的代碼。

所以，你只需要使用showdialog這個方法，即可達到你想要的結果。

那么，如何才能讓彈出的窗體不改變呢？很簡單

你可以找到窗體的formcloseing事件，在這個事件中，有一個參數：e

這個e有一個屬性，就是e.handle，表示是否處理過這個事件了。

這個時候，如果你不想讓窗體關閉，你可以寫：

e.handle=true，那么表示已經處理過窗體關閉的事件了。

注：有些情況，可能是：e.cancel=true

小技巧：VB.NET實現關機和重新啟動

Private Declare Function ExitWindowsEx Lib user (ByVal uFlags As Integer ByVal dwReserved As Integer) As IntegerConst EWX_FORCE As Short = Const EWX_LOGOFF As Short = Const EWX_REBOOT As Short = Const EWX_SHUTDOWN As Short = Dim retval As Integer 定義Esc按鍵Const VK_ESCAPE As Short = H BsPrivate Sub Command _Click(ByVal eventSender As System Object ByVal eventArgs As System EventArgs) Handles Command ClickIf Option Checked Then 注銷當前用戶retval = ExitWindowsEx(EWX_FORCE )ElseIf Option Checked Then 關閉計算機retval = ExitWindowsEx(EWX_SHUTDOWN )ElseIf Option Checked Then 重新啟動retval = ExitWindowsEx(EWX_REBOOT )End IfEnd SubPrivate Sub Command _Click(ByVal eventSender As System Object ByVal eventArgs As System EventArgs) Handles Command ClickMe Close()End Sub 按Esc鍵時 結束應用程序Private Sub Form _KeyPress(ByVal eventSender As System Object ByVal eventArgs As System Windows Forms KeyPressEventArgs) Handles MyBase KeyPressDim KeyAscii As Short = Asc(eventArgs KeyChar)If KeyAscii = VK_ESCAPE ThenMe Close()End IfIf KeyAscii = TheneventArgs Handled = TrueEnd IfEnd Sub本實例通過使用ExitWindowEx()API函數來達到關機和重新啟動的目的 在ExitWindowEx()函數中 參數uFlags指定要進行何種操作 在表 中列出了參數uFlags的值及其說明 表 　參數uFlags的值及說明 lishixinzhi/Article/program/net/201311/13585

網站標題：vb點虐 重新執行 vbnet doevent
新聞來源：http://www.yijiale78.com/article12/ddgscgc.html

成都網站建設公司_創新互聯，為您提供品牌網站建設、網站設計公司、網站維護、企業網站制作、面包屑導航、自適應網站

廣告

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