Yaz  Font K   lt Yaz  Font B y lt

User Login Ýþlemi

 

Merhaba arkadaþlar bu makalemizde veritabaný olmadan basit bir kullanýcý login iþlemini gerçekleþtireceðiz. Bunun için if else koþul ifadesini kullanacaðýz

 

 

Resim1

Þekil 1

 



Resim2

Þekil 2

 

 

 

Form1.vb

 

 

Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

 

        Dim username As String

        Dim password As String

 

        username = TextBox1.Text

        password = TextBox2.Text

 

        If username = "admin" And password = "1234" Then

 

            MessageBox.Show("Login successful""User Login", MessageBoxButtons.OK, MessageBoxIcon.Information)

 

        Else

 

            MessageBox.Show("Login failed!""User Login", MessageBoxButtons.OK, MessageBoxIcon.Error)

 

        End If

    End Sub

End Class

 

 

Bir makalenin daha sonuna geldik. Bir sonraki makalede görüþmek üzere. Bahadýr ÞAHÝN