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