*These
two namespaces are must be required for SqlServer Connectivity in your form:-
1. Imports System.Data
2. Imports System.Data.SqlClient
Show Data
Private Sub btnShow_Click(sender As Object, e As EventArgs) Handles btnShow.Click
Dim strCon As String
strCon = "Data
Source=PRADEEP-HP;Initial Catalog=ClassDemo;Integrated Security=True"
Dim Sqlcon As New SqlConnection
Sqlcon = New SqlConnection(strCon)
Dim Query As String
Query = "Select
* from Employee"
Dim dt As New DataTable
dt = New DataTable()
Dim Da As SqlDataAdapter
Da = New SqlDataAdapter(Query, Sqlcon)
Da.Fill(dt)
Dim bs As New BindingSource
bs.DataSource = dt
DataGridView1.DataSource = bs
End Sub
0 comments
Post a Comment