Quantcast
Viewing all articles
Browse latest Browse all 27095

VS 2005 Me.Close() Not Working

I have two Forms -SPlashForm & LoginUserForm. On the LoginUserForm, I haveclose Button.

ERROR - Close Button on LoginUserForm is not working

Code:

SPlashForm CODE -

Public Class FrmSplash

    Private Sub FrmSplash_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Enabled = True
        ProgressBar1.Minimum = 0
        ProgressBar1.Maximum = 100
        ProgressBar1.Value = 0
        Timer1.Interval = 600 'remember this value is in milliseconds
    End Sub
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If ProgressBar1.Value <> ProgressBar1.Maximum Then
            ProgressBar1.Value = (ProgressBar1.Value + 10)
            Label1.Text = "Loading " & ProgressBar1.Value & "% Complete"
        Else
            LoginUserForm.Visible = True
            Me.Visible = False
        End If
    End Sub
End Class


[code]
LoginUserForm CODE -

Code:

Private Sub btnClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClose.Click
        Me.Close()
    End Sub


Viewing all articles
Browse latest Browse all 27095


<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>