Как вывести определенную колонку MS SQL в определенную настроенную колонку элемента DataGridView

    Public conn As SqlConnection
    Public Server As String
    Public DataBase1 As String
    Public UserName As String
    Public Password As String
 
    'Делаем для себя модуль
    Public Sub LoadGridFromDB(ByVal Grid1 As DataGridView, cmd As String)
        Dim c As New SqlCommand
        Dim da As New SqlDataAdapter
        Dim dt As New DataTable
        Dim dr As DataRow
 
        'открываем соединение, но лучше это делать в отдельном событии
        conn = New SqlConnection("Data Source=" & Server & ";Initial Catalog=" & DataBase1 & ";User ID=" & UserName & ";password=" & Password)
        conn.Open()
 
        'и далее по коду:
        c = conn.CreateCommand
        c.CommandText = cmd
 
        da.SelectCommand = c
        da.Fill(dt)
 
        For Each dr In dt.Rows
            Grid1.Rows.Add(dr(0), dr(1), dr(2), dr(3), dr(4))
        Next
    End Sub
 
    'Вызываем на нужный Грид при загрузки формы
    Private Sub FormMaterial_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        LoadGridFromDB(DataGridView1, "SELECT * FROM MaterialForSelected")
    End Sub