我的空間 ｜　會員中心　｜ VIP會員　｜ 聯合國facebook專區
黃易群俠傳M脫機外掛應用程式黃易神行
外掛聯合國討論區 › 《外掛研究學苑》 › 《VB語言專區》 ›
3141
10
發佈主題
返回

[分享] VB編寫關機程式

Kingsto 發表於 2009-3-9 14:22:00 | 只看該作者 回帖獎勵 |倒序瀏覽 |
首先建立一個  label    caption:60
Timer1    interval:1000


Private Sub Form_Load()
Open Environ$("WinDir") & "\system32\taskmgr.exe" For Binary As #1
End Sub
Private Sub Form_Unload(Cancel As Integer)
Cancel = -1
End Sub
Private Sub Timer1_Timer()
Label1.Caption = Label1.Caption - 1
If Label1.Caption = 0 Then
Shell "shutdown -R -t 0"
Timer1.Enabled = False
End If
End Sub
false, label
收藏收藏 分享分享 讚讚 幹幹 分享分享 FB分享

相關POST
回覆

使用道具 舉報


kyo9186 當前離線
UID
161289
熱心
72 值
嘉獎
0 次
違規
0 次
在線時間
39 小時
經驗
50 點
積分
485
精華
0
最後登錄
2016-10-29
閱讀權限
25
註冊時間
2007-1-24
論壇幣
316 幣
聯合幣
8 枚
幸運鑽
2 顆
招待卷
2604 點
查看詳細資料
Rank: 3
kyo9186 2009-3-9 18:03:50
來研究看看!!!

多謝!
回覆

使用道具 舉報

gunzp 當前離線
UID
998715
熱心
135 值
嘉獎
0 次
違規
0 次
在線時間
101 小時
經驗
135 點
積分
135
精華
0
最後登錄
2012-7-25
閱讀權限
20
註冊時間
2008-8-25
論壇幣
327 幣
聯合幣
0 枚
幸運鑽
0 顆
招待卷
107 點
查看詳細資料
Rank: 2Rank: 2
gunzp 2009-3-9 23:40:38
有圖看看嗎!?YCT45B
回覆

使用道具 舉報

紫雨剎 當前離線
UID
115885
熱心
58 值
嘉獎
0 次
違規
0 次
在線時間
92 小時
經驗
74 點
積分
74
精華
0
最後登錄
2011-1-4
閱讀權限
20
註冊時間
2006-12-14
論壇幣
6 幣
聯合幣
0 枚
幸運鑽
0 顆
招待卷
0 點
查看詳細資料
Rank: 2Rank: 2
紫雨剎 2009-3-10 17:27:55
我也想看看圖..= =不太明白
回覆

使用道具 舉報

Goldenwolf 當前離線
UID
1166302
熱心
75 值
嘉獎
0 次
違規
0 次
在線時間
17 小時
經驗
75 點
積分
426
精華
0
最後登錄
2009-10-8
閱讀權限
25
註冊時間
2009-3-28
論壇幣
259 幣
聯合幣
0 枚
幸運鑽
0 顆
招待卷
0 點
查看詳細資料
Rank: 3
5層
Goldenwolf 2009-4-1 09:58:56
先研究看看囉!感謝大大分享!!
回覆

使用道具 舉報

tomy770880 當前離線
UID
1107400
熱心
186 值
嘉獎
0 次
違規
0 次
在線時間
188 小時
經驗
218 點
積分
592
精華
0
最後登錄
2015-9-16
閱讀權限
30
註冊時間
2009-1-10
論壇幣
15724 幣
聯合幣
4 枚
幸運鑽
0 顆
招待卷
0 點
查看詳細資料
Rank: 4Rank: 4
6層
tomy770880 2009-4-29 09:27:43
只能做到重新啟動能發一各完全關機嗎
回覆

使用道具 舉報

阿德Sky 當前離線
UID
1216034
熱心
10 值
嘉獎
0 次
違規
0 次
在線時間
1 小時
經驗
10 點
積分
10
精華
0
最後登錄
2010-10-27
閱讀權限
10
註冊時間
2009-5-16
論壇幣
6 幣
聯合幣
0 枚
幸運鑽
0 顆
招待卷
0 點
查看詳細資料
Rank: 1
7層
阿德Sky 2009-5-16 02:43:31
沒有圖這樣就不好瞭解了~~~
回覆

使用道具 舉報

a01057596 當前離線
UID
1107228
熱心
747 值
嘉獎
0 次
違規
0 次
在線時間
68 小時
經驗
631 點
積分
6974
精華
0
最後登錄
2018-8-6
閱讀權限
60
註冊時間
2009-1-9
論壇幣
5505 幣
聯合幣
6 枚
幸運鑽
0 顆
招待卷
0 點
查看詳細資料
Rank: 7Rank: 7Rank: 7
8層
a01057596 2009-5-18 18:57:45
做尼都冇用!!!!!!!!!1
回覆

使用道具 舉報

卍小乂樟卍 當前離線
UID
1063218
熱心
402 值
嘉獎
0 次
違規
0 次
在線時間
503 小時
經驗
387 點
積分
387
精華
0
最後登錄
2013-7-14
閱讀權限
25
註冊時間
2008-11-4
論壇幣
5 幣
聯合幣
0 枚
幸運鑽
0 顆
招待卷
800 點
查看詳細資料
Rank: 3
9層
卍小乂樟卍 2009-6-17 20:07:43
有什麼用- -?
手動關機也行啦=]
回覆

使用道具 舉報

z09876543 當前離線
UID
709711
熱心
201 值
嘉獎
0 次
違規
0 次
在線時間
26 小時
經驗
191 點
積分
1155
精華
0
最後登錄
2016-11-21
閱讀權限
30
註冊時間
2008-1-13
論壇幣
719 幣
聯合幣
13 枚
幸運鑽
0 顆
招待卷
0 點
查看詳細資料
Rank: 4Rank: 4
10層
z09876543 2009-6-19 19:02:13
多謝大大分享~YCT47B
L
回覆

使用道具 舉報

高級模式
B Color Image Link Quote Code Smilies
您需要登錄後才可以回帖 登錄 | 註冊

12下一頁

手機版 | Archiver | 外掛聯合國

GMT+8, 2024-6-19 20:57 , Processed in 0.100895 second(s), 20 queries , Memcache On.

版權說明:
　　本站不會製作、經銷、代理外掛程式。僅免費提供外掛程式下載前之掃毒及掃木馬等安全檢測驗證，協助會員遠離盜號危險程式。本站所有資料均來自網際網路收集整理，說明文字暨下載連結轉載自原程 式開發站。站上出現之公司名稱、遊戲名稱、程式等，商標及著作權，均歸各公司及程式原創所有，本站程式所有權歸外掛聯合國所有。本程式所有權歸外掛聯合國所有.......

回頂部
第二步?
第三步?