Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
   System.EventArgs) Handles MyBase.Load
 
        Dim BND_Kunden1 As New BindingSource
        Dim BND_Kunden2 As New BindingSource
 
        BND_Kunden1.DataSource = RS_Kunden
        BND_Kunden2.DataSource = RS_Kunden
 
        BND_Kunden1.Sort = "KundenNr"
        BND_Kunden2.Sort = "Name1"
 
        DataGridView1.DataSource = BND_Kunden1
        DataGridView2.DataSource = BND_Kunden2
 
    End Sub

mit freundlichen Grüßen
Sven