由 SQL Server 以 DataAdapter 方法 取得 Data 至 DataGridView

 

   由 SQL Server 以 DataAdapter 方法 取得 Data 至 DataGridView
 
   Private Sub GetStaff()
 
      Dim connectionString1 As String = "Data Source=.\SqlExpress; Initial Catalog=Admin; Integrated Security=SSPI"
      Dim con1 As SqlConnection = New SqlConnection(connectionString1)
      con1.Open()
 
      Dim SqlString1 As String = "SELECT Staff_ID, Staff_Name, Staff_Login FROM dbo.Staff"
 
      Dim Adapter As New SqlDataAdapter(SqlString1.ToString(), con1)
      Dim ds As New DataSet
 
      Adapter.Fill(ds)
 
      DataGridView2.DataSource = ds.Tables(0).DefaultView
 
      ds.Dispose()
      con1.Dispose()
 
   End Sub