vb編寫可以在指定時間執行程式的程式

2021-07-09 16:26:03 字數 3260 閱讀 9921

1樓:匿名使用者

一.在核心功能執行前插入一段按時間啟動的**二.在核心功能執行後開始一段倒計關閉的**三.鍵鼠鎖加個鉤子不給控制代碼就可以了

四.熱鍵:有了鉤子你就可能做了

vb中怎樣實現在指定時間執行指定程式

2樓:匿名使用者

timer只能是相對時間,等多長時間做什麼事情。

想按日期的話用api來做吧

其實可以用計劃任務,比你用vb做效果好。

真用vb的話就設定一個timer,觸發函式內檢測日期時間,到點就呼叫你需要執行的程式就可以了。

3樓:網海1書生

private sub form_load()timer1.interval = 60000timer1.enabled = trueend sub

private sub timer1_timer()if hour(now) = 18 and minute(now) = 30 then

shell "notepad.exe", vbnormalfocusend if

end sub

以上**是在每天的18:30執行“記事本”

4樓:

將timer控制元件時差設為1000,

用if語句判定你設定的時間=now

注意,你設定的時間要精確到秒

vb設定指定某段時間執行程式..

5樓:玫瑰為你盛開

在窗體1里加個timer

private sub form_load()timer1.enabled = truetimer1.interval = 100end sub

private sub timer1_timer()if hour(now) < 7 or hour(now) >= 23 then

form1.hide

form2.show

else

form1.show

form2.hide

end if

end sub

6樓:白木道人

關機那是不可能的。因為你的**執行監視系統時間後臺還可以執行,關機那就肯定不行,除非寫成開機啟動,那麼他一開機這段**就會執行,從而實現關機。

private sub form_load()timer1.enabled=false

timer1.inteval=1000

end sub

private sub timer1_timer()label1=now

if label1="#2009-6-12 23:00:00 #" then form2.show:me.hide

if label1="#2009-6-13 07:00:00 #" then form1.show:form2.unload

end sub

7樓:匿名使用者

其實我是想寫一程式限制一下別人使用我的電腦啦...等他在這段時間一開機就關啦...

就不需要讓窗體顯示,加在啟動項,到時倒計時關機,如果是自已用,在執行框shutdown -a取消,或者做熱鍵撥出

private sub form_load()timer1.enabled = truetimer1.interval = 100me.hide

end sub

private sub timer1_timer()if hour(now) < 7 or hour(now) >= 23 then

shell "shutdown.exe -s -t 60"

endend if

end sub

vb中,若想設定一個程式在某個指定的時間執行,其**如何寫啊?

8樓:湘下人

可以自己用timer

在timer事件中用 datediff 函式判斷當前時間是否到了預定時間,以

分、秒為單位都可以,然後觸發你的程式

如要源**,可以找我.

vb編寫自動執行程式

9樓:聼說她來過

方法1:把你的程式全路徑名寫到登錄檔裡的local-ms-windows-currentversion-run裡即可。

方法2:把你的程式放入開始-程式選單的啟動下

方法3:把程式全路徑名寫入autoexce.bat

如何vb設計一個程式,到指定使用次數或指定日期後無法使用該程式。

10樓:薔高翰

要是說到指定日期打不開 你可以使用day(date)來獲得指定日期,用month(date)來獲得月份 用 year(date)來獲得年份

比如你想在它2023年6月19日打不開**可以這樣寫

option explicit

private sub form_load()

if year(date) = "2011" and month(date) = "6" and day(date) = 19 then

msgbox "指定日期不能開啟程式,程式將關閉!"

endend if

end sub

這**是在2023年6月19號那天打不開要是想在19號之後都打不開**換成這樣

option explicit

private sub form_load()

if year(date) >= 2011 and month(date) >= 6 and day(date) >= 19 then

msgbox "軟體使用期限已到,程式將關閉!"

endend if

end sub

當程式執行指定次數可以使用寫登錄檔也可以使用寫檔案的辦法

登錄檔很麻煩,下面我把寫檔案的**給你

11樓:匿名使用者

你就寫指定日期小於當前時間時,就自動退出就行了吧.

用vb做一個,定時執行指定程式

12樓:匿名使用者

這個功能windows的任務計劃已經實現了的

如果一定要自己寫,就要用timer進行時間控制,然後將程式包成後臺服務,開機自動執行服務,大概是這麼個思路。

在vb中怎麼實現隔一段時間執行一段程式

動物比如狗在骨折之後可以在一定時間內自愈,原因是不是和狗吃含鈣的骨頭有關

一般來說,狗狗是可以自己恢復的吶,不過有些狗狗在時間長後可能會因為傷口未很好恢復,而留下後遺症,所以建議在這個星期內多給狗狗補充營養,有助於狗狗的傷口恢復。狗狗多吃含鈣骨頭也可以增加狗體內的能量和鈣物質,不容易骨折,增加了動物骨頭的硬度,即使骨折後一段時間內也會自愈,不過有的動物自愈能力比較差,建議...

小明每天看,可以在規定時間看完,每天看,少看兩天,這本書有多少頁

小明每天看24頁,可以在規定時間看完,每天看28頁,少看兩天,這本書有336頁。設小明每天看24頁的看書時間為x,每天看28頁的看書時間為y。因為小明每天看24頁,可以在規定時間看完,每天看28頁,少看兩天,所以有式子一 24x 28y和式子二 x y 2。聯立式子一 24x 28y和式子二 x y...

請問,VB中可以畫線的粗細和指定畫出的線是什麼顏色嗎

line 方法 在物件上畫直線和矩形。語法object.line step x1,1 step x2,y2 color b f line 方法的語法有以下物件限定符和部分 部分 描述 object 可選的。物件表示式,其值為 應用於 列表中的物件。如果object 省略,具有焦點的窗體作為objec...