打開VS點虐

專注于為中小企業(yè)提供成都做網(wǎng)站、成都網(wǎng)站制作服務(wù),電腦端+手機端+微信端的三站合一,更高效的管理,為中小企業(yè)文圣免費做網(wǎng)站提供優(yōu)質(zhì)的服務(wù)。我們立足成都,凝聚了一批互聯(lián)網(wǎng)行業(yè)人才,有力地推動了上千多家企業(yè)的穩(wěn)健成長,幫助中小企業(yè)通過網(wǎng)站建設(shè)實現(xiàn)規(guī)模擴充和轉(zhuǎn)變。
2008
,打開工程,點擊菜單項目
在點XX屬性,就可以看到啟動對象,選擇賣坦相穗配逗應(yīng)的啟動模塊猜賣
在寬卜右側(cè)解決方案資源管理器窗口下右擊工程慎搜穗名,點擊屬性對話框,在出現(xiàn)的界面中點擊應(yīng)用程序選項卡,里面有一個啟動窗體選項,漏旅你可以自由設(shè)置。
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 關(guān)閉計算機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鍵時 結(jié)束應(yīng)用程序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函數(shù)來達到關(guān)機和重新啟動的目的 在ExitWindowEx()函數(shù)中 參數(shù)敏蠢uFlags指定要進行何種操作 在表 中列出了參數(shù)uFlags的值及散譽其說明 表 參數(shù)uFlags的值及說明 lishixinzhi/Article/program/net/201311/13585
修改注遲渣稿冊表Run鍵
Dim Reg As Microsoft.Win32.RegistryKey
'修改注碼孝冊表,用于啟動時加載梁轎
Reg = CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Run", True)
Reg.SetValue("testSoft", Application.ExecutablePath)
名稱欄目:vb點虐
啟動服務(wù) vbs啟動程序
URL地址:http://www.chinadenli.net/article28/ddpcicp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供小程序開發(fā)、全網(wǎng)營銷推廣、網(wǎng)站內(nèi)鏈、網(wǎng)站改版、建站公司、網(wǎng)站建設(shè)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)