图像淡入鼠标输入事件
问题描述:
我试图使图像淡入/淡出时,用户悬停在按钮上。当我进入按钮时,淡入淡出效果,但当我离开它时不会。我该如何做这项工作?图像淡入鼠标输入事件
动画代码:
Private Sub GreenBg_animation()
Dim myduration As Duration = New Duration(TimeSpan.FromMilliseconds(250))
Dim da As DoubleAnimation = New DoubleAnimation
da.Duration = myduration
Dim sb As Storyboard = New Storyboard
sb.Duration = myduration
sb.Children.Add(da)
Storyboard.SetTarget(da, btn_bg_green)
Storyboard.SetTargetProperty(da, New PropertyPath(OpacityProperty))
da.From = 0.0
da.To = 1.0
da.AutoReverse = True
sb.Begin()
End Sub
按钮代码:
Private Sub btn_2_MouseEnter(sender As Object, e As System.Windows.Input.MouseEventArgs) Handles btn_2.MouseEnter
GreenBg_animation()
End Sub
答
你需要MouseExit
另一个(反向)的动画,如果你认为AutoReverse
会为你做的你错误。
谢谢你,当我喜欢你时说:D –