编程论坛 → VB6论坛

vb使用两张图片做一个按钮效果

ssllgg 发布于 2012-11-29 09:03， 652 次点击

两张图片，鼠标移动到按钮上时显示另外一张图片

3 回复

风吹过b2012-11-29 09:24

你看一下自定义按钮。

好像以前论坛有这个方面的贴子。

jrs1232012-11-29 11:29

回复楼主 ssllgg

供你参考：
Private Sub Check1_Click()
    If Check1.Value = 1 Then
        Command1.Enabled = False
    Else
        Command1.Enabled = True
    End If
End Sub
Private Sub Form_Load()
    Command1.Picture = LoadPicture(App.Path + "\1.bmp")
    Command1.DownPicture = LoadPicture(App.Path + "\2.bmp")
    Command1.DisabledPicture = LoadPicture(App.Path + "\3.bmp")
End Sub

mayuebo2012-12-04 14:39

按钮有mousemove事件,在事件中处理就可以了,或者把按钮设置为三态的按钮.设置显示和移动上去的图片