如何制作翻转图像，但是在VB.net中按下时仍保留为该图像 [英] How to make a Rollover Image but, it stays as that image when pressed in VB.net

问题描述

我有一个正常的翻转图像...

I have a normal rollover image as so...

'MainMenuTab
Private Sub MainMenuTabBtn_Click(sender As Object, e As EventArgs) Handles MainMenuTabBtn.Click
    TabControl1.SelectedTab = TabPage1
End Sub

'MainMenuTab Down
Private Sub MainMenuTabBtn_MouseEnter(sender As Object, e As EventArgs) Handles MainMenuTabBtn.MouseEnter
    MainMenuTabBtn.Image = My.Resources.MainMenuTab_Down
End Sub

'MainMenuTab Up
Private Sub MainMenuTabBtn_MouseLeave(sender As Object, e As EventArgs) Handles MainMenuTabBtn.MouseLeave
    MainMenuTabBtn.Image = My.Resources.MainMenuTab_Norm
End Sub

所以我有鼠标"Enter"和"Leave"，但是我一直想做的就是在按下"MainMenuTab_Selected.jpg"时使图像更改，但是随后将图像更改回"MainMenuTab_Norm.png"因为鼠标离开了图片框.

So I have my Mouse 'Enter' and 'Leave', but what I have been trying to do is make the image change when pressed to "MainMenuTab_Selected.jpg" but then it changes the image back to "MainMenuTab_Norm.png" because the mouse is leaving the Picture Box.

那么有没有一种使用'If'语句的方法，因为这就是我一直在研究的内容.谢谢

So Is there a way to use 'If' statements, because that is what I have been looking at. Thanks

推荐答案

单击按钮时设置一个变量，然后在鼠标事件中检查它的值:

Set a variable when you click the button, and then check the value of it on the mouse events:

Dim buttonClicked as Boolean = False
Private Sub MainMenuTabBtn_Click(sender As Object, e As EventArgs) Handles MainMenuTabBtn.Click
    MainMenuTabBtn.Image = My.Resources.MainMenuTab_Selected
    buttonClicked = True
    TabControl1.SelectedTab = TabPage1
End Sub

'MainMenuTab Down
Private Sub MainMenuTabBtn_MouseEnter(sender As Object, e As EventArgs) Handles MainMenuTabBtn.MouseEnter
    If Not buttonClicked Then
        MainMenuTabBtn.Image = My.Resources.MainMenuTab_Down
    End If
End Sub

'MainMenuTab Up
Private Sub MainMenuTabBtn_MouseLeave(sender As Object, e As EventArgs) Handles MainMenuTabBtn.MouseLeave
    If Not buttonClicked Then
        MainMenuTabBtn.Image = My.Resources.MainMenuTab_Norm
    End If
End Sub

这篇关于如何制作翻转图像，但是在VB.net中按下时仍保留为该图像的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！