Программно задать ширину колонок DataGridView - Visual Basic .NET

Public Sub LoadTable1(DGV As DataGridView, cmd As String)
        constr()
        dt = New DataTable
        Dim da As New OleDbDataAdapter
        Dim bs As New BindingSource
        'Загружаем базу в DataGrid
        Try
            cn.Open()
            Dim Query As String
            Query = cmd
            cm = New OleDbCommand(Query, cn)
            da.SelectCommand = cm
            da.Fill(dt)
            bs.DataSource = dt
            DGV.DataSource = bs
            da.Update(dt)
            cn.Close()
 
'Смена ширины всех колонок ----------------------
For Each col in DGV.Columns
col.Width = 150
Next
 
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
        cn.Dispose()
    End Sub