Membuat Login Sederhana Menggunaka VB.Net


Dibawah ini koding untuk membuat login sederhana menggunakan vb.net. 
 
Public Class LoginForm1

    Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
        If UsernameTextBox.Text = "admin" And PasswordTextBox.Text = "12345" Then
            Menu_Utama.Show()

        Else : MsgBox("Sorry,username or password not found", MsgBoxStyle.OkOnly, "invalid")
        End If

    End Sub

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

End Class

Semoga bermanfaat.


Komentar

Posting Komentar

Postingan populer dari blog ini

PROGRAM PEMBAYARAN LISTRIK DENGAN VB NET

Gambar
http://www.mesran.blogspot.com Public Class Form1        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load         Dim x As String         No_urut.Text = "1" & Microsoft.VisualBasic.Right(KODE.Text, 2)         x = Microsoft.VisualBasic.Mid(KODE.Text, 4, 3)         If x = "MED" Then             daerah.Text = "MEDAN"             pajak.Text = 0.015         ElseIf x = "BEL" Then             daerah.Text = "BELAWAN"             pajak.Text = 0.015         ElseIf x = "TEM" Then             daerah.Text = "AKSARA"             pajak.Text...
Baca selengkapnya

Menghapus data Pada Listview

Gambar
http://www.mesran.blogspot.com/ Class Form1     Sub buattabel()         LV.Columns.Add("NPM", 80, HorizontalAlignment.Center)         LV.Columns.Add("Nama", 180, HorizontalAlignment.Left)         LV.View = View.Details         LV.GridLines = True         LV.FullRowSelect = True     End Sub     Sub isitabel()         Dim lst As New ListViewItem         lst.Text = NPM.Text         lst.SubItems.Add(Nama.Text)         LV.Items.Add(lst)     End Sub     Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click     End Sub     Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As S...
Baca selengkapnya

Pengertian Visual Basic Fungsi dan Penjelasan

Gambar
IDE kepedekan dari Intregated Development Environment atau dalam bahasa local sendiri maksudnya adalah lingkungan pengembangan yang terintregrasi. Sehingga IDE Visual Basic adalah suatu lingkungan untuk pengembangan aplikasi dari Visual Basic .    Gambar Tampilan Area Kerja Visual Basic 1.    Toolbox       Toolbox adalah bagian atau panel yang berisi sekumpulan alat atau komponen Visual Basic untuk pengembangan desain dari aplikasi. Dengan demikian komponen-komponen dari toolbox yang kita pakai untuk mempercantik tampilan dari aplikasi yang kita buat. 2.    Form Desaigner       Form Desaigner adalah jendela untuk mendesain suatu form yang terpilih. Disinilah kita mengambarkan komponen dari toolbox. 3.    Solution Explorer       Solution Explorer adalah sekumpulan komponen yang terkait pada suatu proyek ( solution ) yang sedang kita buat. Kita ...
Baca selengkapnya