1樓：薔高翰
要是說到指定日期打不開 你可以使用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
當程式執行指定次數可以使用寫登錄檔也可以使用寫檔案的辦法
登錄檔很麻煩，下面我把寫檔案的**給你
2樓：匿名使用者
你就寫指定日期小於當前時間時,就自動退出就行了吧.
vb中怎樣實現在指定時間執行指定程式
3樓：匿名使用者
timer只能是相對時間，等多長時間做什麼事情。
想按日期的話用api來做吧
其實可以用計劃任務，比你用vb做效果好。
真用vb的話就設定一個timer，觸發函式內檢測日期時間，到點就呼叫你需要執行的程式就可以了。
4樓：網海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執行“記事本”
5樓：
將timer控制元件時差設為1000，
用if語句判定你設定的時間＝now
注意，你設定的時間要精確到秒
怎樣用vb做個編寫一個程式，在文字框中顯示當前系統時間，並隨時間進行變化
6樓：匿名使用者
你新增一個timer控制元件
interval屬性=100
新增事件
private sub timer1_timer()text1.text = format(now, "hh:mm:ss")
end sub
7樓：匿名使用者
private sub form_load()timer1.enabled = trueend sub
private sub timer1_timer()text1.text = now
end sub
建立兩個控制元件timer1和text1。
我也初學。
設計程式vb隨機產生10到100之間（包括10和
private sub command1 click on error resume next dim a 5 as integer randomize int upperbound lowerbound 1 rnd lowerbound for i 0 to 3 b c 0 for j 1 to ...
用vb60設計程式，在窗體上的標籤label中
private sub form load label1.caption 歡迎進入vb的程式設計世界 label1.font 文泉驛等寬正黑 不要意思咱機子上沒有 楷體 label1.fontsize 14.25label1.fontbold truelabel1.backcolor vbreden...
c程式1設計程式，輸入123，返回1 2 3也就是數的和6，輸入 123也還是數的和，是
1 設計一個程式，輸入123，返回1 2 3也就是三個數的和6，輸入 123 也還是三個數的和，是6.include int add int n return sum int main void 2 設計程式，輸入123 返回321。輸入 123，返回321 include int reverse ...