【小倫出品】Timer 碼表 (VB小遊戲-3)
Timer 碼表
這是一般的電子碼表,把他寫成了一個小工具。
不過我最後發現,這碼表非常的不准,可能是因為 VB 的關係,或者是我寫的太爛了。
不過拿來當 VB 的界面練習,以及一些平常玩不到的設定,還是不錯的。
- 界面介紹
這次界面比較特別,取消了一般我們界面的設計,只剩下三顆按鈕,以及秒數框,不過由於大小及位置不太好喬,所以有待改進。
- 功能介紹
1. 三顆按鈕分別為:紅,綠/黃,藍。其中,紅色為程式關閉鍵;綠/黃色為啟動鍵,啟動前為黃,啟動後為綠;藍射為重設鍵,碼表歸零。
2. 碼表先以 【秒 : 毫秒】 進行,當超過 60 秒後,碼表改為 【分鐘 : 秒】。
3. 碼表永遠出現在最頂端,不會被其他程式視窗覆蓋。
4. 碼表可隨處移動, 按著碼表處不放便可拖移
- 程式介紹
1. 讓碼表有別於一般的程式視窗,因此針對 Form 的屬性做一些修改,也因為連 X 也消失了,所以必須增加一個結束按鈕。
a. MinimunBox = False
b. MaximumBox = False
c. FormBorderStyle 選擇 None
d. AutoSize = False
2. 讓碼表不被覆蓋。
將 Form 屬性的 TopMost 改為 True。
這時,你可以想像一下,若有兩個程式的 TopMost 為 True 時,誰會蓋誰?
3. Timer 的 Interval。
Interval 設為100,雖然 Interval 可以設定 為 1, 但我發現vb 的 Timer 最多每1/18秒才會執行一次,根本無法做到非常精准的碼表功能。而在我實際操作下,發現準確度又不如預期。
4. 碼表移動。
針對碼表的視窗,使用 MouseDown 和 MouseUp 來控制。MouseDown 時,啟動 Timer, 並記下 程式位置與滑鼠位置的相對位移量 (因為視窗以左上角為基準點);MouseUp 時, Timer 停止。而 Timer Interval 設為 10 (這時越小越好),Timer 的作用是讓視窗與滑鼠保持相同位置,這樣看起來就像是拖移碼表了。
- 結尾
雖然這次的碼表不能夠做到非常準確,可能還是需要用讀取系統時間的方式來執行,但已經做到我想做的功能了,當作練習是很不錯了,下次也可以寫的更好。
- 下載
---檔案過大可能會被誤判為病毒,此檔案保證無毒,請儘管放心---
查看原文 >>