[mawad]

(03-04-16, 06:04 PM)الماجيك مسعد كتب :

كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        For Each mItem As ListViewItem In ListView1.Items
            Dim t As String = mItem.SubItems(0).Text & mItem.SubItems(1).Text
            For Each mRow As DataGridViewRow In DataGridView1.Rows
                ListBox1.Items.Add(
                     mItem.SubItems(0).Text & mItem.SubItems(1).Text &
                    String.Join("", (From mCell In mRow.Cells Select mCell.Value)))
            Next
        Next

    End Sub