1樓：老地方見
簡單點的：
關機裡面寫：shell "cmd /c shutdown /s /t 0", vbhide
重啟裡面寫：shell "cmd /c shutdown /r /t 0", vbhide
登出裡面寫：shell "cmd /c shutdown /l /t 0", vbhide
2樓：有手藝的農民
可以呼叫shutdown命令，首先你的開啟記事本編輯三個bat檔案，包括「關機」，「重啟」和「登出」，例如：在d盤下分別另存為：11.
bat 、12.bat、13.bat。
在記事本中寫入**如下（分別寫在三個記事本中，然後另存為）：
登出：shutdown -l
關機：shutdown -s
重啟：shutdown -r
以上，使用時直接用shell呼叫，比如11.bat為關機命令，**為：
private sub command1_click()shell"d:\11.bat"'存在哪就寫哪個路徑end sub
3樓：小羅哥
這需要用到api函式，建議看下類似教程，或者留個郵箱，我給你發個我以前做的。
vb可以做到每天定時關機的程式
4樓：網海1書生
我也是建議你用windows系統本身的計劃任務來實現，相容性最好，不用程式設計。
自己程式設計的話，技術上很簡單，幾乎沒啥技術含量，就是像一樓說的用shell呼叫shutdown，也可以呼叫api函式來實現，只要用個timer控制元件每隔一分鐘迴圈一次，判斷當前時間是否6點整（下午的六點就是18點整），是就執行關機**即可。
但是，難點是，不管你怎麼弄，這種需要開機自啟動的小程式肯定會被360、管家之類的安全軟體攔截的，除非你按照它們的提示去認證然後繳納一定的保護費，否則就只能希望你的軟體使用者的電腦沒裝這些安全軟體了。當然，如果只是你自己用的，你可以把你的軟體加入它們的白名單。
5樓：創作者
也有簡單辦法，僅僅給啟動項傳檔案：
用記事本在裡面寫：
at 22:00 shutdown -s -t.txt字尾改成 .bat
直接把他複製到啟動項資料夾。一切就ok
下次你要改就以記事本開啟他，時間改下就好了。
你還用vb寫登錄檔，不是拿高射炮打蚊子嗎？vb語言有他自己的用途，不是狗拿耗子的事情，就好比本來是匹馬，偏偏雜交成騾子來用
用vb製作小程式
6樓：閃星
option explicit
private sub form_load()randomize
label1.caption = int((rnd * (999999 - 100000 + 1)) + 100000) '生成100000-999999之間的隨機數
timer1.interval = 1000 '一秒一次timer1.enabled = trueend sub
private sub timer1_timer()static n as integer
n = n + 1
if n = 60 then '一秒一次，累加到60此即60秒
n = 0
randomize
label1.caption = int((rnd * (999999 - 100000 + 1)) + 100000)
end if
end sub
有問題請追問，滿意請採納，加油！
7樓：九頭草雞
見附件示例程式。
為了直接看到效果，示例程式數字每秒重新整理一次，你自己根據需要改成喜歡的間隔變換時間。
8樓：王署
option explicit
dim dd as single '0---999999dim tt as integer
private sub form_load()label1.caption = ""
timer1.interval = 1000timer1.enabled = truett = 0
label1.fontsize = 16
dd = int(999999 * rnd + 1)label1.caption = format(dd, "000000")
end sub
private sub timer1_timer()if tt < 60 then '60秒
tt = tt + 1
else
dd = int(999999 * rnd + 1)label1.caption = format(dd, "000000")
tt = 0
end if
end sub
vb的sub子程式怎麼用，關於vb的sub子過程的定義問題！
建立sub過程 1 定義sub過程 語句結構如下 static private public sub 過程名 引數列表 語句塊 exit sub 語句塊 endsub 引數列表指明瞭呼叫時傳送給過程的引數的型別和個數，每個引數的格式為 byval 變數名 as 資料型別 如果加上byval則表明該引...
這個VB的加法怎麼做啊，vb加法怎麼弄
您好，很高興為您解答。儘管沒有分。首先，您點選一下 號前面那個text控制元件，修改name 名稱 屬性為text1 然後點選 號後面的那個text控制元件，修改name 名稱 屬性為text2 雙擊那個command.caption 的那個控制元件，就是那個 號。進入 編輯器，輸入 dimsum ...
可不可以用VB寫一個程式來把bmp檔案轉換成ico檔案呀？
你認為加加分就能完成嗎？這個程式除錯成功估計最少也需要3 5天時間，想想，就16 16的ico檔案需要256個區域。32 32的？48 48的？省省吧！可能你的50分要完成這個不可能的！1 把bmp檔案轉換成ico檔案不僅僅是格式的變換 2 ico檔案儲存格式和bmp格式是完全不同的格式檔案 3 轉...