CARA MEMBUAT FORM LOGIN DI VB.NET

CARA MEMBUAT FORM LOGIN DI VB.NET

Pria Baik

Duluurrr..

biasanya untuk tampilan pertama aplikasi itu menggunakan login untuk validasi apakah benar-benar pengguna yang dizinkan untuk masuk ke aplikasi / program tersebut.

Disini Pria Baik Share lagi lurrr.

Bagaimana caranya membuat form login di VB.Net

Koneksi menggunakan ODBC Conncection Disini

Ikuti aja Step by Step nya di Tutorial Pria Baik mudah kok.

Jangan Lupa Like dan Subscribe ya lurrr.. biar kita makin semangat..

Cara membuat Form CRUD VB.net Disini

Cara membuat Laporan dengan Crystal Report VB.net Disini

Cara menampilkan Toolbox Crystal Report Viewer VB.net Disini

Design Login

Script Login nya lurr...

Imports System.Data.Odbc

Public Class Login

    Dim con As OdbcConnection

    Dim dr As OdbcDataReader

    Dim da As OdbcDataAdapter

    Dim ds As DataSet

    Dim dt As DataTable

    Dim cmd As OdbcCommand

    Sub koneksi()

        con = New OdbcConnection

        con.ConnectionString = "DSN=uasvb"

        con.Open()

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        End

    End Sub

    Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged

        If tpass.UseSystemPasswordChar = True Then

            tpass.UseSystemPasswordChar = False

        Else

            tpass.UseSystemPasswordChar = True

        End If

    End Sub

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

        koneksi()

        Dim sql As String

        sql = "select * from tblogin where username='" & tuser.Text & "' and password='" & tpass.Text & "'"

        cmd = New Odbc.OdbcCommand(sql, con)

        dr = cmd.ExecuteReader

        If dr.Read = False Then

            MsgBox("Periksa Username & Password !!!")

        Else

            MsgBox("Login Berhasil !!")

            Dim bukamenu As New FMenu()

            bukamenu.Show()

            Me.Hide()

        End If

    End Sub

End Class

Lebih paham nya simak Video Dibawah ini

Membuat form login VB.net Part 1

Membuat form login VB.net Part 2

By. Pria Baik