Tạo 1 dataGrid và một button có code như sau để test connect
Dim conString As String = “Data Source=.;Initial Catalog=Northwind;Integrated Security=True” ‘ khai báo chuỗi kết nối
Dim sqlString As String = “Select * from Categories” ‘ khai báo câu lệnh SQL ,lấy dữ liệu từ bảng Categories
Dim da As New sqlDataAdapter(sqlString, conString) ‘ Khởi tạo và khai báo 1 đối tượng sqlDataAdapter
Dim ds As New DataSet() ‘ Khởi tạo và khai báo 1 đối tượng DataSet
da.Fill(ds, “Categories”) ‘ điền dữ liệu vào dataset
DataGridView1.DataSource = ds.Tables(0)
