1樓:匿名使用者
易語言倒計時器**如下:
.版本 2
.程式集 視窗程式集_啟動視窗
.程式集變數 時間, 整數型
.子程式 _開始按鈕_被單擊
時鐘1.時鐘週期 = 1000
時間 = 100 ' 可以改成你的秒數
.子程式 _時鐘1_週期事件
時間 = 時間 - 1
.判斷開始 (時間 ≤ 0)
_結束按鈕_被單擊 ()
.預設標籤1.標題 = 到文字 (時間)
.判斷結束
.子程式 _結束按鈕_被單擊
時鐘1.時鐘週期 = 0
2樓:匿名使用者
.版本 2
.程式集 視窗程式集1
.程式集變數 結束時間, 日期時間型
.程式集變數 間隔時間, 整數型
.子程式 _按鈕1_被單擊
間隔時間 = 10 ' 這裡是以10秒倒計時,具體時間可自行修改結束時間 = 增減時間 (取現行時間 (), #秒, 間隔時間)時鐘1.時鐘週期 = 1000
.子程式 _時鐘1_週期事件
間隔時間 = 取時間間隔 (結束時間, 取現行時間 (), #秒).判斷開始 (間隔時間 > 0)
標籤1.標題 = 「倒計時:」 + 到文字 (間隔時間) + 「 秒」
.預設標籤1.標題 = 「時間到!」
.判斷結束
如何用易語言編輯倒計時和計時
3樓:文件類共創空間
.版本 2
.程式集 視窗程式集1
.子程式 _按鈕1_被單擊
時鐘1.時鐘週期 = 1000
.子程式 _時鐘1_週期事件
.區域性變數 數, 整數型
數 = 到數值 (編輯框1.內容)
數 = 數 - 1
編輯框1.內容 = 到文字 (數)
4樓:笑凝伐噢號
用vb就可以了,加個timer的控制項,很容易的初中生都會編。
5樓:匿名使用者
分不要了。。。只是告訴你,這種要求用vb很容易就能實現
6樓:匿名使用者
vb<%@ language=vbscript %>倒記時間
<%response.write "今天是"
response.write formatdatetime(date(),1) & ","
'格式化為長日期格式輸出顯示
response.write " 離中考還有"
response.write ""
'呼叫datediff函式,計算日期間隔.
response.write datediff("d",date(),"06-06-17")
response.write "
"response.write "天"
%>
7樓:分享優質知識
第乙個.版本 2
.程式集 視窗程式集1
.子程式 _按鈕3_被單擊
時鐘2.時鐘週期 = 1000
標籤8.標題 = 編輯框4.內容
.子程式 _時鐘2_週期事件
標籤8.標題 = 到文字 (到數值 (標籤8.標題) - 到數值 (1))
第二個.版本 2
.程式集 視窗程式集1
.程式集變數 q, 文字型
.程式集變數 w, 文字型
.子程式 _按鈕4_被單擊
.如果 (按鈕4.標題 = 「停止」)
按鈕4.標題 = 「開始計時」
時鐘3.時鐘週期 = 0
.否則.如果 (按鈕4.標題 = 「開始計時」)按鈕4.標題 = 「停止」
時鐘3.時鐘週期 = 1000
.否則.如果結束
.如果結束
.子程式 _時鐘3_週期事件
標籤10.標題 = 到文字 (到數值 (標籤10.標題) + 到數值 (1))
.如果 (標籤10.標題 = 「60」)
標籤10.標題 = 「0」
q = 到文字 (到數值 (q) + 到數值 (1)).否則.如果 (q = 「60」)
q = 「0」
w = 到文字 (到數值 (w) + 到數值 (1)).否則.如果結束
.如果結束
標籤11.標題 = w + 「:」 + q + 「:」 + 標籤10.標題
.子程式 __啟動視窗_建立完畢
按鈕4.標題 = 「開始計時」
q = 「 0」
w = 「0」
如果計時要比較準確的話,建議多加個時鐘控制項
易語言怎麼做倒計時?
8樓:二娘呀
1、將預置時間 轉成 時間戳 並寫進程式(即,在程式中設定成全域性變數)。
2、連線網路,取網路標準時間的時間戳(不取本地時間,是因為某些原因會匯入時間不準確,比如人為手動修改時間)。
3、判斷時間差(通過 全域性變數的時間戳 - 網路時間戳 = 倒計時的時間戳。
4、通過 倒計時的時間戳 轉換成倒數資料(具體的,都是除法)。
5、開機啟動,不論你什麼啟動,在網路下都可以準確倒計時、
易語言是乙個自主開發,適合國情,不同層次不同專業的人員易學易用的漢語程式語言。易語言降低了廣大電腦使用者程式設計的門檻,尤其是根本不懂英文或者英文了解很少的使用者,可以通過使用本語言極其快速地進入windows程式編寫的大門。
易語言怎麼實現日期倒計時?
9樓:匿名使用者
你可以用取時間間隔得到總共剩餘多少秒,然後再把秒數換成xx月xx天xx小時xx分xx秒。
給你個參考就明白了。
.版本 2
.子程式 取毫秒到小時, 文字型
.引數 參_毫秒, 整數型
.區域性變數 局_小時, 整數型
.區域性變數 局_分鐘, 整數型
.區域性變數 局_秒, 整數型
局_小時 = 參_毫秒 ÷ 3600000局_分鐘 = (參_毫秒 % 3600000) ÷ 60000局_秒 = (參_毫秒 % 3600000 % 60000) ÷ 1000
返回 (到文字 (局_小時) + 「小時」 + 到文字 (局_分鐘) + 「分」 + 到文字 (局_秒) + 「秒」)
10樓:匿名使用者
呵呵,這樣算的話,一年按365天,考慮閏年嗎?乙個月按30天算,31天的月怎麼算?
如何用易語言寫乙個10秒倒計時程式?
11樓:
很簡單!
乙個標籤 乙個時鐘
設定 標籤1.標題=10
下面是**:
.版本 2
.程式集 視窗程式集1
.子程式 _時鐘1_週期事件
標籤1.標題 = 到文字 (到數值 (標籤1.標題) - 到數值 (1))
12樓:匿名使用者
汗,你和qianqian_918的問題竟然是一模一樣的,是同乙個人嗎?
我回答也fuz複製下吧
.版本 2
.程式集 視窗程式集1
.程式集變數 a, 整數型
.子程式 _按鈕1_被單擊
時鐘1.時鐘週期 = 1000
a = 10
.子程式 _時鐘1_週期事件
.如果 (a > 0)
a = a - 1
.否則時鐘1.時鐘週期 = 0
資訊框 (「10秒已經到了!」, 0, )
13樓:匿名使用者
.版本 2
.程式集 視窗程式集1
.程式集變數 a, 整數型
.子程式 _按鈕1_被單擊
時鐘1.時鐘週期 = 1000
a = 10
.子程式 _時鐘1_週期事件
.如果 (a > 0)
a = a - 1
.否則時鐘1.時鐘週期 = 0
資訊框 (「10秒已經到了!」, 0, )
求乙個倒計時的程式,倒計時怎麼計算?
需要納入起算的那一天 5月24日 不納入到期的那一天 6月7日 演算法 8天 5月,包含今天 6天 6月,不含7日 14天倒計時 倒計時,從未來的某一時點往現在計算時間,用來表示距離某一期限還有多少時間 多含剩餘時間越來越少,越來越緊迫的意思 意義 倒計時 的意義在 現代漢語詞典 解釋為 從未來的某...
中考倒計時排怎麼做 如何做中考倒計時牌
什麼意思呢?設計個版面?這不是很簡單的事兒嗎?畫乙個厚厚的日曆,每天改乙個數字就像翻過一頁一樣。旁邊再寫點簡短的勵志的話,這種東西不要太花哨的好。如何做中考倒計時牌 你拿一些白紙來,大概現在中考剩下110天左右,你就拿110張白紙,分別寫上號碼,每日撕掉一張,從110天開始撕起。其實作為長久放置在班...
如果你的生命開始倒計時,該怎麼過
我不選在那個時候猜開始珍惜生命 如果你已經開始想到有這麼一天了 那是不是就說明你開始珍惜每一天的生活了呢 我想 只有珍惜現在擁有的每一天生活 你才會在你真的無法再繼續走下去的時候 沒有後悔 也會走的安詳 而當你無法堅持的時候 那就意味著你離堅持只差一步遠了 能夠活著最好還是活著,生活多美好啊 如果因...