Efek Form Memutar Saat Load Dan Keluar Dari Form

Efek Form Memutar Saat Load Dan Keluar Dari Form

Tanpa basa basi langsung aja bro .
disini ane mau share efek form load dan closing pada vb.net .

Double klik form ( pada event load isikan koding di bawah ini )

            Dim a As Integer
            For a = 0 To 100 Step +1
            Me.Opacity = a / 100
            Me.Refresh()
           Next

Dan pada button exit isikan koding ini :

        Dim a As Integer
        For a = 100 To 0 Step -1
        Me.Opacity = a / 100
        Me.Refresh()
        Next
        Me.Close()

Koding keseluruhan seperti ini bro :

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim a As Integer
        For a = 0 To 100 Step +1
            Me.Opacity = a / 100
            Me.Refresh()
        Next

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim a As Integer
        For a = 100 To 0 Step -1
            Me.Opacity = a / 100
            Me.Refresh()
        Next
        Me.Close()
    End Sub

Thanks bro...

Semoga bermanfaat

Browse More Articles

Tweet

Written by thoestone

We are Creative Blogger Theme Wavers which provides user friendly, effective and easy to use themes. Each support has free and providing HD support screen casting.