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

時間 2021-07-09 16:26:13

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中怎麼實現隔一段時間執行一段程式

vbs 請高手提供樣碼 要求在指定時間執行程式

set w createobject wscript.shell dim a,b,c c time 系統時間 set objwsh createobject wscript.shell a 12 30 00 定義時間段b 23 30 00 定義時間段if datediff n a,c 0 and d...

vb編寫的程式,可不可以在沒安裝vb的電腦上執行

1,vb編寫的程式,先編譯先成exe程式。2,將vb生成的exe和所有需要的控制元件等打包。vb自帶的打包方法如下 1 單擊 外接程式 選單下的 外接程式管理器 2 在彈出的窗體中選擇 打包和嚮導 最後一項 在載入行為中選擇 載入 解除安裝 確定。3 再次單擊 外接程式 選單項,單擊 打包和嚮導 4...

有什么小軟體可以在特定時間裡提醒自己該做什麼事情了

基本介紹 pc上網計時器 即 程式貓上網計時器 能記錄您通過調變解調器 modem,支援adsl 撥號上網的資訊 連線名稱 連線日期 時間 斷開日期時間,並且自動計算出上網時間長度 上網累計時間 上網次數,同時提供時間記錄的複合查詢和維護功能。pc上網計時器還具有連線和斷開連線的訊息提示,限時定時提...