未命名

 


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 的作用是讓視窗與滑鼠保持相同位置,這樣看起來就像是拖移碼表了。


- 結尾

雖然這次的碼表不能夠做到非常準確,可能還是需要用讀取系統時間的方式來執行,但已經做到我想做的功能了,當作練習是很不錯了,下次也可以寫的更好。


- 下載

點擊此處下載本次小遊戲

---檔案過大可能會被誤判為病毒,此檔案保證無毒,請儘管放心---


 

 

 

 

 

查看原文 >>
相关文章