cara membuat from login di VB net dengan Database SQL Server

Buat temen-temen yang sedang mencari tutorial tentang cara pembuatana  from login di vb net mengunakan  databesa SQL server tahun 2015, seperti berikut :
Pastikan VB.net dan SQL kita terhubung/ter Install di PC atau komputer yangakan kita gunakan sebagai databesa.
pertama kita buka SQL server 2015, seandainya belum mengetahui caramenciptakan database SQL server silahkan baca lebih lanjut artikel kiat menciptakan database sql server.
kalo kita mau bisa menggunkan atau membuat database, silahkan ikuti langkah langkah berikut. :
1. buat project bau bersama dua buah from dan satu module. segera saja kita bikin fro perdannaya, di properti tukar bersama flogin dan text nya, pindai bersama login. Tampilannya seperti pada gambar dibawah ini. :

gambar 1.

Iimport System.Data.Sql

Import Syestem.Data.SqlClient

Public Class Flogin

Private Sub Flogin_Activated(ByVal sender As Object,ByVal e As System.EventArgs)

Handles Me.Activated
txtuser.Focus()
End Sub

Private Sub Button2_Clik(ByVal sender As System.Object,ByVal e As System.EventArgs)Handles MyBase.load buka()
End Sub

Private Sub Button2_Clik(ByVal sender As System.Object,ByVal e As System.EventArgs)Handles Button2.Click Dim Sql,User,pass As Strring

User=txtuser.Text
pass=txtpass.text
koneksi.Close()
Call buka()

Cek apakah user, pasword da hak akses yang elah dipilih/di masukkan ada di database Sql="SELECT*FROM tbuser WHERE username=""+use+""AND pass=""+""
cmd=New SqlCommand(Sql,koneksi)
baccmd.ExecuteReader()
If baca.Has.Rows=True Then
From1.Show()
Me.Hide()
Else

Munculkan messagebox pesan salah messadeBox.Show("kombinasiUsername dan password sala","konfirmasi",
messageBoxButtons.OK,
MessageBoxIcon.Error)
txtuser.Focus()
End If
txtuser.text=""
txtpass.text=""
baca.Close()
cmd.Dispose()
End Sub

setelah itu kita bikin from yang ke dua merupakan from menu penting, yang nantinya dapat kita panggil sesudah login berhasil, telah tahu kan trik menciptakan from menu utama kita lanjutkan ke berikutnya adalah menciptakan module. Tentu tahu kan fungsi module. tentu berikut berfungsi fungsi module meruapakan menghubungkan atabase SQL server 2015 ke VB.Net. Kita serentak add module nya adalalh dengan menekan Klik kanan pada projct kita memilih add, setelah itu module dan klik add setelah itu ketikkan koding di bawah ini.

Imports System.Data.Sql
Imports System.Data.SqlClient
Module Module1
Public koneksi As Sqlconnection
Public data As DataSet
Public baca As SqlDataRender
Public adaptor As SqlDataAdapter
Public cmd As SqlCommad
Public ass As DataTable
Public str,sql As String
Public Sub buka()
 str="Data Source=raden-PC\SQLEXPRESS;PWD=remot1234"
koneksi=New SqlConnetion(str)
Try
If koneksi.State=Connection.Closed
Then
 koneksi.open()
End If
Cath ex As Exception
MsgBoxStyle.Critical,"Error")
End Try
End Sub
End Module

From login di VB.net bersama database SQL server 2005 sudah selesai kita untuk, waktu inin tinggal di running/jalan programnya.
masukkan Username dan kata sandi pass bersama database yang kita buat tadi.

Sejian dulu tutorial dari saya, semoga bermanfaat terutama buat saya dan buat rapa pembaca.

"teruslah semangat dan janganlah menyerah"

GOOD LUCK

@Saya Mohammad Nuris
( Mahasiswa Fakultas Teknik Informatika Unuversitas Nurul Jadid, Paiton, Probolinggo.)