在微軟的很多軟件（如WORD）的工具欄中，都采用一種浮動按鈕，即正常情況下按鈕的圖標呈灰色，當鼠標移動到某一按鈕上時，該按鈕自動向上凸起且變為彩色，并在按鈕的右下方有一標簽提示該按鈕的功能，鼠標移開后又自動還原，這種按鈕用VB實現時，方法如下：

1．先用繪圖工具作出按鈕圖標后存盤（如1．BMP），再用圖像處理軟件將該圖標轉換為灰度圖或浮雕圖后再存盤（如2．BMP）。

2．運行VB，建立一新窗體（如FORM1）。

3．在窗體上需要建立按鈕的位置處建立一圖片框（如IMAGE1），其大小和圖標相同，并將其 PICTURE屬性設為2．BMP。

4．在IMAGE1周圍建立由四個長度相同的LINE控件（如LINE1～4）組成的方框，方框要比IMAGE1控件稍大，否則達不到預計效果，將上面和左邊的顏色設成白色，下面和右邊的設成黑色，并將四個LINE控件的VISIBLE屬性都設成FALSE。

5．在程序中加入以下內容即可：

Private Sub Image1_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)

Image1？Picture=LoadPicture(″c:1？bmp″)

Line1？Visible=True

Line2？Visible=True

Line3？Visible=True

Line4？Visible=True

End Sub

Private Sub Form1_MouseMove(Button As Integer,Shift As I nteger,X As Single,Y As Single)

Image1？Picture=LoadPicture(″c:2？bmp″)

Line1？Visible=False

Line2？Visible=False

Line3？Visible=False

Line4？Visible=False

End Sub

6．實現動態提示的方法。