แนะนำวิธี gridview1 แสดงแค่ 20 บรรทัดแรก 21-40 แสดงที่ gridview 2 แบบนี้ไปเรื่อยๆ database ตัวเดียวครับแต่แบ่ง gridview

 cmd = New MySql.Data.MySqlClient.MySqlCommand("SELECT fix_id,date_save,customer_id FROM comfix;", ConnectionDB)
        Call open_connection()
        Dr = cmd.ExecuteReader
        If Dr.HasRows Then
            While Dr.Read
                If Me.DataGridView1.RowCount < 20 Then
                    Dim r As Integer
                    r = Me.DataGridView1.RowCount
                    Me.DataGridView1.Rows.Add()
                    Me.DataGridView1.Rows(r).Cells(0).Value = Dr.Item("fix_id")
                    Me.DataGridView1.Rows(r).Cells(1).Value = Dr.Item("date_save")
                    Me.DataGridView1.Rows(r).Cells(2).Value = Dr.Item("customer_id")
                    If Me.DataGridView2.RowCount < 20 Then
                        Dim rr As Integer
                        rr = Me.DataGridView2.RowCount
                        Me.DataGridView2.Rows.Add()
                        Me.DataGridView2.Rows(rr).Cells(0).Value = Dr.Item("fix_id")
                        Me.DataGridView2.Rows(rr).Cells(1).Value = Dr.Item("date_save")
                        Me.DataGridView2.Rows(rr).Cells(2).Value = Dr.Item("customer_id")
                        If Me.DataGridView3.RowCount < 20 Then
                            Dim rrr As Integer
                            rrr = Me.DataGridView3.RowCount
                            Me.DataGridView3.Rows.Add()
                            Me.DataGridView3.Rows(rrr).Cells(0).Value = Dr.Item("fix_id")
                            Me.DataGridView3.Rows(rrr).Cells(1).Value = Dr.Item("date_save")
                            Me.DataGridView3.Rows(rrr).Cells(2).Value = Dr.Item("customer_id")
                            If Me.DataGridView4.RowCount <= 20 Then
                                Dim rrrr As Integer
                                rrrr = Me.DataGridView4.RowCount
                                Me.DataGridView4.Rows.Add()
                                Me.DataGridView4.Rows(rrrr).Cells(0).Value = Dr.Item("fix_id")
                                Me.DataGridView4.Rows(rrrr).Cells(1).Value = Dr.Item("date_save")
                                Me.DataGridView4.Rows(rrrr).Cells(2).Value = Dr.Item("customer_id")
                                If Me.DataGridView5.RowCount < 20 Then
                                    Dim rrrrr As Integer
                                    rrrrr = Me.DataGridView5.RowCount
                                    Me.DataGridView5.Rows.Add()
                                    Me.DataGridView5.Rows(rrrrr).Cells(0).Value = Dr.Item("fix_id")
                                    Me.DataGridView5.Rows(rrrrr).Cells(1).Value = Dr.Item("date_save")
                                    Me.DataGridView5.Rows(rrrrr).Cells(2).Value = Dr.Item("customer_id")
                                End If
                            End If
                        End If
                    End If
                End If
            End While
        End If