VB.NET WithEvents 和 Handles 子句

"如果物件是區域物建變數，那就要用 addhandler..., addressOf..."

"如果是全域物件變數，可以改用WithEvents" :

自己練習了一個利用Timer 模擬水庫上升 下降 產生 Event 
檔案下載