DatagridView vb.net. štekanje..

Code:
Public Sub osvijezi()
        Dim myCommand As New MySqlCommand
        Dim myAdapter As New MySqlDataAdapter
        Dim myData As New DataTable
        Dim SQL As String
        SQL = ("select id, kod, naziv,((cijena * pdv)+cijena) AS cijena, mj_jed, pdv, povratna_naknada, barkod, opis, lager from artikli ORDER BY kod ASC")
        Try
            If conn.State = ConnectionState.Closed Then
                conn.ConnectionString = myConnString1 & ";Allow Zero Datetime=true"
                conn.Open()
            End If
            Try
                myCommand.Connection = conn
                myCommand.CommandText = SQL
                myAdapter.SelectCommand = myCommand
                myAdapter.Fill(myData)
                dgvArtikli.DataSource = myData
                dgvArtikli.AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.AllCells
                Call DataGridViewFormat(dgvArtikli)
                With dgvArtikli
                    .AutoResizeRows()
                End With
            Catch myerror As MySqlException
                MsgBox(My.Settings.connstring)
                MsgBox("There was an error reading from the database: " & myerror.Message)
            End Try
            conn.Close()
        Catch ex As Exception
        End Try
        If dgvArtikli.RowCount > 0 Then
            'Scroll to the last row.
            Me.dgvArtikli.FirstDisplayedScrollingRowIndex = Me.dgvArtikli.RowCount - 1
            'Select the last row.
            Me.dgvArtikli.Rows(Me.dgvArtikli.RowCount - 1).Selected = True

        End If
    End Sub

Code:
Private Sub DataGridViewFormat(ByRef dgvArtikli As DataGridView)
        With dgvArtikli
            .AlternatingRowsDefaultCellStyle.BackColor = Color.LightCyan
            .SelectionMode = DataGridViewSelectionMode.FullRowSelect
            .AllowUserToOrderColumns = True
            .AllowUserToDeleteRows = False
            .AllowUserToAddRows = False
            .ReadOnly = True
            .MultiSelect = False
            .Columns.Clear()
            .AutoResizeColumns()
            .AutoResizeRows()

            Dim ID As New DataGridViewTextBoxColumn
            With ID
                .DataPropertyName = "id"
                .Name = "id"
                .HeaderText = "ID"
                .AutoSizeMode = DataGridViewAutoSizeColumnMode.ColumnHeader
                .DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleLeft
            End With
            .Columns.Add(ID)
            ID.Visible = False

            Dim kod As New DataGridViewTextBoxColumn
            With kod
                .DataPropertyName = "kod"
                .Name = "kod"
                .HeaderText = "Šifra Artikla"
                .AutoSizeMode = DataGridViewAutoSizeColumnMode.ColumnHeader
                .DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleLeft
            End With
            .Columns.Add(kod)

            Dim naziv As New DataGridViewTextBoxColumn
            With naziv
                .DataPropertyName = "naziv"
                .Name = "naziv"
                .HeaderText = "Naziv Artikla"
                .MinimumWidth = 250
                .AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
                .DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleLeft
            End With
            .Columns.Add(naziv)

            Dim cijena As New DataGridViewTextBoxColumn
            With cijena
                .DataPropertyName = "cijena"
                .Name = "cijena"
                .HeaderText = "Cijena"
                .DefaultCellStyle.Format = "c"
                .AutoSizeMode = DataGridViewAutoSizeColumnMode.DisplayedCells
                .DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
            End With
            .Columns.Add(cijena)

            Dim pdv As New DataGridViewTextBoxColumn
            With pdv
                .DataPropertyName = "pdv"
                .Name = "pdv"
                .HeaderText = "PDV"
                .MinimumWidth = 100
                .DefaultCellStyle.Format = "p"
                .AutoSizeMode = DataGridViewAutoSizeColumnMode.DisplayedCells
                .DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
                .DefaultCellStyle.NullValue = "None"
            End With
            .Columns.Add(pdv)

            Dim povratna_naknada As New DataGridViewTextBoxColumn
            With povratna_naknada
                .DataPropertyName = "povratna_naknada"
                .Name = "povratna_naknada"
                .HeaderText = "Povratna Naknada"
                .DefaultCellStyle.Format = "c"
                .AutoSizeMode = DataGridViewAutoSizeColumnMode.DisplayedCells
                .DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
            End With
            .Columns.Add(povratna_naknada)

            Dim barkod As New DataGridViewTextBoxColumn
            With barkod
                .DataPropertyName = "barkod"
                .Name = "barkod"
                .HeaderText = "Barkod"
                .MinimumWidth = 150
                .AutoSizeMode = DataGridViewAutoSizeColumnMode.DisplayedCells
                .DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
                .DefaultCellStyle.NullValue = "None"
            End With
            .Columns.Add(barkod)

            Dim opis As New DataGridViewTextBoxColumn
            With opis
                .DataPropertyName = "opis"
                .Name = "opis"
                .HeaderText = "Kratak Opis"
                .AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
                .DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleLeft
                .DefaultCellStyle.NullValue = "None"
            End With
            .Columns.Add(opis)
            opis.Visible = False

            Dim lager As New DataGridViewTextBoxColumn
            With lager
                .DataPropertyName = "lager"
                .Name = "lager"
                .HeaderText = "Skaldište"
                .AutoSizeMode = DataGridViewAutoSizeColumnMode.DisplayedCells
                .DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleLeft
                .DefaultCellStyle.NullValue = "None"
            End With
            .Columns.Add(lager)

            Dim mjed As New DataGridViewTextBoxColumn
            With mjed
                .DataPropertyName = "mj_jed"
                .Name = "mj_jed"
                .HeaderText = "M.Jed."
                .AutoSizeMode = DataGridViewAutoSizeColumnMode.DisplayedCells
                .DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleLeft
                .DefaultCellStyle.NullValue = "None"
            End With
            .Columns.Add(mjed)

        End With
    End Sub

Code:

Call DataGridViewFormat(dgvArtikli)

Code:

dgvArtikli.DataSource = myData