2

Como obter os efeitos de fade-in e out, transições, movimentações e etc, em formulários e seus controles no VB.NET, de forma nativa ou com uso de FrameWorks?

1

1 Resposta 1

1

Pode-ser manipular a propriedade Opacity do formulário para obter esse efeito. Segue um exemplo:

Public Sub fadeIn()
    For fade = 0.0 To 1.1 Step 0.1
        Me.Opacity = fade
        Me.Refresh()
        Threading.Thread.Sleep(100)
    Next
End Sub

Public Sub fadeOut()
    For fade = 90 To 10 Step -10
        Me.Opacity = fade / 100
        Me.Refresh()
        Threading.Thread.Sleep(50)
    Next
End Sub

Nos eventos Form1_Load e Form1_FormClosing você faz:

Private Sub Form1_Load(sender As Object, e As EventArgs) 
 Handles MyBase.Load
    fadeIn()
End Sub

Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) 
 Handles MyBase.FormClosing
    fadeOut()
End Sub

Você deve fazer log-in para responder a esta pergunta.

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .