Заполнение DataGridView из базы данных SQL

Imports System.Data.SqlClient
Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim conn As New SqlConnection
        conn.ConnectionString = "Data Source=EVGENY\SQLEXPRESS; Initial Catalog=database; User Id=sa;Password=123;"
        conn.Open()
 
        Dim ds As New DataSet
        Dim c As New SqlCommand("Select * from Clients", conn)
        Dim da As New SqlDataAdapter(c)
 
        da.Fill(ds, "Clients")
        Grid1.DataSource = ds
        Grid1.DataMember = "Clients"
 
    End Sub
 
End Class

da.Fill(ds, "Clients")

Dim conn As New SqlConnection
        conn.ConnectionString = "Data Source=EVGENY\SQLEXPRESS; Initial Catalog=database; User Id=sa;Password=123;"
        conn.Open()
 
        Dim ds As New DataSet
        Dim c As New SqlCommand("Select * from Clients", conn)
        Dim da As New SqlDataAdapter(c)
        c.Connection = conn
        c.CommandType = CommandType.Text
        ds.DataSetName = "Clients"
        ds.Locale = New System.Globalization.CultureInfo("ru-RU", True)
        ds.Namespace = "http://www.tempuri.org/dsAS.xsd"
        da.SelectCommand = c
        da.Fill(ds, "Clients")
        Grid1.DataSource = ds.Tables(0).DefaultView