VB 2013 - Database SQL Server Connection

In This tutorial I will share about How to connect database SQL Server in VB NET 2013. There are three step to connected Database SQL Server :

Step 1: Create New Project use VB 2013
Step 2 :Create database and table in MS Access 2003
Step 3 : Design form in VB .Net 2013

Step : 1
Click Visual Studio 2013

Click FILE - New - Project..

after that like below picture :

Click OK

After that, please follow STEP 2

Step 2 :
Create Database and Table in SQL Server
Please create database with name : DB_MYAPP
Create Table with name : TBL_PRODUCT

Fill data for sample in TBL_PRODUCT

#Step 3 :
Design form1 like below picture

Just add "Datagridview1" in Form1

Place below code at Form1

Imports System.Data.SqlClient

Public Class Form1

Dim Conn As SqlConnection

Dim da As SqlDataAdapter

Dim ds As DataSet

Dim DBLocation As String

Sub OpenDB()

DBLocation = "data source=COMPUTERNAME;initial catalog=DB_MYAPP;integrated security =true"

Conn = New SqlConnection(DBLocation)

If Conn.State = ConnectionState.Closed Then Conn.Open()

End Sub

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

OpenDB()

da = New SqlDataAdapter("Select * from TBL_PRODUCT", Conn)

ds = New DataSet

ds.Clear()

da.Fill(ds, "TBL_PRODUCT")

DataGridView1.DataSource = (ds.Tables("TBL_PRODUCT"))

End Sub

End Class