Here we see how to use ado.net to connect to a database
and match the value from the database to the user control. To do that we make a
table in the database and creating connection with database. After the
connection using select command to match the value from the database to the user
control.
Creating connection object
To create a connection we pass the connection
string as a parameter in connection object.
Dim
str As String
= "Data
Source=.;uid=sa;pwd=123;database=master"
Dim con As New
SqlConnection(str)
The above string defines the connection string which is used to connect the
database with the application.
Select command
This statement is used to select the rows of data in a table.
Dim
com As String =
"Select username from logn where username='"
& txtuser.Text & "' and password ='" &
txtpass.Text & "';"
Dim cm As New SqlCommand(com,
con)
Now we create a database table and insert some values in this table. Table looks
like this.
create table logn
(
username
varchar(50),
password varchar(40)
)
go
insert into logn values('monu','mohan')
go
insert into logn values('Rohatash','rohit')
go
insert into logn values('Manoj','singh')
go
select * from logn;
The table looks like this.
OUTPUT

Table1.gif
For example
Drag and drop two TextBox and two level control and one Button control on the
form. The form looks like this.
Form1.gif
Now double click on the Button control and add the following code.
Imports
System.Data.SqlClient
Public Class Form1
Private Sub
Button1_Click(ByVal sender
As System.Object,
ByVal e As
System.EventArgs)
Handles Button1.Click
Dim str As String = "Data
Source=.;uid=sa;pwd=123;database=master"
Dim con As New SqlConnection(str)
con.Open()
Dim com As String = "Select
username from logn where username='" & txtuser.Text &
"' and password ='" & txtpass.Text &
"';"
Dim cm As New SqlCommand(com,
con)
Dim rd As SqlDataReader = cm.ExecuteReader()
If rd.Read() = True Then
MessageBox.Show("Valid
username and password")
Else
MessageBox.Show("Invalid
username and password", caption:="login")
txtuser.Clear()
txtpass.Clear()
End If
End Sub
End Class
Now run the application and enter the username and password in the TextBox
control.
Form2.gif
Now click on the Button control.
Form3.gif
Now enter the correct username and password which match with the database.
Form4.gif
Now click on the Button control.
Form5.gif