VB6.0 打造圓形按鈕：Image 控件完美解決背景遮擋問題

前言

在 VB6.0 開發中，若想製作圓形按鈕並自由設定顏色，直接使用 PictureBox 往往會遮蓋底層背景，影響介面美觀。本文將介紹一種輕量級的解決方案——善用 Image 控件，配合滑鼠事件即可輕鬆實現圓形按鈕效果，且不會遮擋背景。

核心思路

Image 控件本身不具備背景繪製功能，僅顯示圖片，因此天然透明，不會遮住父容器的背景。我們只需準備兩張圖片（正常狀態、按下/懸停狀態），在 Click、MouseMove 等事件中切換圖片，即可模擬按鈕行為。

實作步驟

1. 在表單上放置一個 Image 控件（名為 imgBtn）。
2. 設定其 Stretch 屬性為 True，使圖片自適應控件大小。
3. 準備兩張圓形按鈕圖片：btn_normal.bmp、btn_hover.bmp。
4. 在表單的 Form_Load 中載入預設圖片：
   

   Private Sub Form_Load()
       Set imgBtn.Picture = LoadPicture("btn_normal.bmp")
   End Sub

5. 處理滑鼠事件以切換圖片並觸發點擊邏輯：
   

   Private Sub imgBtn_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
       Set imgBtn.Picture = LoadPicture("btn_hover.bmp")
   End Sub
   
   Private Sub imgBtn_MouseLeave()
       Set imgBtn.Picture = LoadPicture("btn_normal.bmp")
   End Sub
   
   Private Sub imgBtn_Click()
       ' 在此處編寫按鈕點擊後的業務邏輯
       MsgBox "圓形按鈕被點擊了！"
   End Sub

優勢總結

• 無背景遮擋：Image 控件透明特性完美保留底層背景。
• 資源輕量：比 PictureBox 佔用更少記憶體與 GDI 物件。
• 靈活度高：可隨意更換圖片實現不同風格的圓形、橢圓或任意形狀按鈕。

採用 Image 控件配合事件驅動，是 VB6.0 時代實現自訂外觀按鈕的經典最佳實踐之一。