初學(xué)者vb編程技巧

把Task scheduler改為：

我們提供的服務(wù)有：成都網(wǎng)站建設(shè)、成都網(wǎng)站設(shè)計(jì)、微信公眾號(hào)開(kāi)發(fā)、網(wǎng)站優(yōu)化、網(wǎng)站認(rèn)證、燈塔ssl等。為1000+企事業(yè)單位解決了網(wǎng)站和推廣的問(wèn)題。提供周到的售前咨詢和貼心的售后服務(wù)，是有科學(xué)管理、有技術(shù)的燈塔網(wǎng)站制作公司

""Task scheduler""

兩邊都加兩個(gè)雙引號(hào)

即Shell "net start ""Task scheduler"""

[緊急求助]程序運(yùn)行完畢，自動(dòng)關(guān)閉進(jìn)程？

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

'System.Threading.Thread.Sleep(1000)

Me.Visible = False

Me.ShowIcon = False

'數(shù)據(jù)庫(kù)導(dǎo)入代碼

Me.Close()

End Sub

利用vb.net實(shí)現(xiàn)小鬧鐘功能

Private Declare Function mciSendStringA Lib "winmm.dll" _

(ByVal lpstrCommand As String, ByVal lpstrReturnString As String, _

ByVal uReturnLength As Integer, ByVal hwndCallback As Integer) As Integer

Function PlayMidiFile(ByVal MusicFile As String) As Boolean

If System.IO.File.Exists(MusicFile) Then

mciSendStringA("stop music", "", 0, 0)

mciSendStringA("close music", "", 0, 0)

mciSendStringA("open " MusicFile " alias music", "", 0, 0)

PlayMidiFile = mciSendStringA("play music", "", 0, 0) = 0

End If

End Function

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

If TextBox1.Text = TimeOfDay Then

'具體提醒的東西，如你說(shuō)的播放音樂(lè)

PlayMidiFile("自己添加路徑")

End If

'時(shí)間格式要是這樣的16:00:00

'timer的interval要設(shè)成1

'你還可以自己細(xì)化

End Sub

如何設(shè)置電腦每天玩4小時(shí)就自動(dòng)關(guān)機(jī)。急!!!

軟件到處都是，用計(jì)劃任務(wù)也行，編3個(gè)程序，第一個(gè)自啟動(dòng)，調(diào)用第二個(gè)程序，過(guò)幾秒再調(diào)用第三個(gè)程序（vb.Net里的processg過(guò)程），第二個(gè)程序純粹記錄開(kāi)機(jī)時(shí)間，存文件里，第三個(gè)程序打開(kāi)存時(shí)間的文件，用比較記錄的時(shí)間是否是當(dāng)天來(lái)判斷當(dāng)天是否開(kāi)過(guò)機(jī)，如果沒(méi)有開(kāi)過(guò)就等4小時(shí)，然后再調(diào)用\windows\system32\shutdown.exe /s /t 0關(guān)機(jī)，如果開(kāi)過(guò)就直接調(diào)用\windows\system32\shutdown.exe /s /t 0

其中0是時(shí)間（秒），最好改成30，以便留下時(shí)間保存需要的文件或者取消關(guān)機(jī)，具體方法是有的，可以用/?參數(shù)查看，如果我告訴你那這個(gè)就不是強(qiáng)制關(guān)機(jī)了

VB高手請(qǐng)進(jìn)！

用windows本身的計(jì)劃任務(wù)不好嗎？

如果一定要用程序?qū)崿F(xiàn)，可以用計(jì)時(shí)器控件：

timer1.Interval=1000 '每秒觸發(fā)一次

在Timer1_Timer事件中加入：

If Minute(Now) = 0 And Second(Now) = 0 Then '到整點(diǎn)了

'你的處理過(guò)程

end if

這樣幾乎沒(méi)有CPU占用！

本文標(biāo)題：vb.net計(jì)劃任務(wù),計(jì)劃任務(wù)運(yùn)行vbs
網(wǎng)站路徑：http://chinadenli.net/article11/dsigddd.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供營(yíng)銷型網(wǎng)站建設(shè)、定制開(kāi)發(fā)、網(wǎng)站內(nèi)鏈、軟件開(kāi)發(fā)、定制網(wǎng)站、云服務(wù)器

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)