تعبئة داتا جريد من جدولين مرتبطين ؟

كود :

SQL = "SELECT *,* FROM Tab_Users INNER JOIN Tab_User_Kinds ON Tab_Users.User_Kind = '" & Cmb_Search.SelectedIndex & "'  And Tab_Users.User_Kind = Tab_User_Kinds.G_ID"

كود :

       DGV_Names.Rows.Clear()



        Dim i As Integer

        For i = 0 To Dt.Rows.Count - 1



            DGV_Names.Rows.Add()

            DGV_Names.Rows(i).Cells(0).Value = i + 1

            DGV_Names.Rows(i).Cells(1).Value = Dt.Rows(i).ItemArray(1)

            DGV_Names.Rows(i).Cells(2).Value = Dt.Rows(i).ItemArray(2)



            'If Dt.Rows(i).ItemArray(2) = "0" Then DGV_Names.Rows(i).Cells(2).Value = "مدير"

            'If Dt.Rows(i).ItemArray(2) = "1" Then DGV_Names.Rows(i).Cells(2).Value = "مستخدم"



            DGV_Names.Rows(i).Cells(3).Value = Dt.Rows(i).ItemArray(3)                               ' كلمة المرور



            DGV_Names.Rows(i).Cells(4).Value = Dt.Rows(i).ItemArray(5)



            'If Dt.Rows(i).ItemArray(4) = "0" Then DGV_Names.Rows(i).Cells(4).Value = "لا يعمل" ' حالة المستخدم

            'If Dt.Rows(i).ItemArray(4) = "1" Then DGV_Names.Rows(i).Cells(4).Value = " يعمل" ' حالة المستخدم



        Next

        closeDB()