الترتيب التصاعدى والتنازلى فى الليست فيو

الاخوه الاعزاء اعضاء ومشرفى منتدانا 

اريد اضافة الترتيب التصاعدى لليست فيو والترتيب على اول عمود بالليست بالكود التالى الذى يعرض بدون ترتيب

   Public Sub ListView() 'العرض فى الليست فيو
        If GSQLConnection.State <> ConnectionState.Open Then
            GeneralConnection()
        End If
        Try
            GSQLCmd.CommandText = "select * from Store_items where Branch_code='" & Branch_code.Text & "'"
            GSQLCmd.CommandType = CommandType.Text
            GDR = GSQLCmd.ExecuteReader
            Dim AddToList As New ListViewItem
            Me.ListView1.Items.Clear()
            Do While GDR.Read
                AddToList = Me.ListView1.Items.Add(GDR.GetSqlString(0))
                AddToList.SubItems.Add(1).Text = GDR.GetSqlString(1)
                AddToList.SubItems.Add(19).Text = GDR.GetSqlString(2)
                AddToList.SubItems.Add(2).Text = GDR.GetSqlString(3)

                Application.DoEvents()
            Loop
            GDR.Close()
        Catch exp As Exception
            MsgBox(exp.Message)
        End Try
    End Sub

كل الشكر والتقدير للجميع