[AbdoDabak]

تفضل اخي

انا انصحك باستخدام قاعدة بيانات ليسهل عليك الامر

PHP كود :

Dim ii As Integer = DataGridView1.Rows.Count - 1
        If TextBox1.Text.Contains(1 & vbCrLf & 2) Then
            DataGridView1.Rows.Add()
            DataGridView1.Rows(ii).Cells(0).Value = 1
            DataGridView1.Rows(ii).Cells(1).Value = "AhMed El-Qon"
            DataGridView1.Rows(ii).Cells(2).Value = "+201010759698"
            DataGridView1.Rows(ii).Cells(3).Value = "NON"
            DataGridView1.Rows(ii).Cells(4).Value = "‏‎Sidi Salim, Kafr Ash Shaykh, Egypt‎‏"
            DataGridView1.Rows.Add()
            DataGridView1.Rows(ii + 1).Cells(0).Value = 2
            DataGridView1.Rows(ii + 1).Cells(1).Value = "Hossam Ibrahim"
            DataGridView1.Rows(ii + 1).Cells(2).Value = "+201202179000"
            DataGridView1.Rows(ii + 1).Cells(3).Value = "hhxx61@yahoo.com"
            DataGridView1.Rows(ii + 1).Cells(4).Value = " ‏الأقصر‏"
            Label1.Text = TextBox1.Lines.Count - 2
            TextBox1.Clear()
            TextBox1.Select()
        ElseIf TextBox1.Text.Contains(2) Then
            DataGridView1.Rows.Add()
            DataGridView1.Rows(ii).Cells(0).Value = 2
            DataGridView1.Rows(ii).Cells(1).Value = "Hossam Ibrahim"
            DataGridView1.Rows(ii).Cells(2).Value = "+201202179000"
            DataGridView1.Rows(ii).Cells(3).Value = "hhxx61@yahoo.com"
            DataGridView1.Rows(ii).Cells(4).Value = " ‏الأقصر‏"
            Label1.Text = TextBox1.Lines.Count - 1
            TextBox1.Clear()
            TextBox1.Select()
        ElseIf TextBox1.Text.Contains(1) Then
            DataGridView1.Rows.Add()
            DataGridView1.Rows(ii).Cells(0).Value = 1
            DataGridView1.Rows(ii).Cells(1).Value = "AhMed El-Qon"
            DataGridView1.Rows(ii).Cells(2).Value = "+201010759698"
            DataGridView1.Rows(ii).Cells(3).Value = "NON"
            DataGridView1.Rows(ii).Cells(4).Value = "‏‎Sidi Salim, Kafr Ash Shaykh, Egypt‎‏"
            Label1.Text = TextBox1.Lines.Count - 1
            TextBox1.Clear()
            TextBox1.Select()
        Else
            Label1.Text = TextBox1.Lines.Count
        End If 


اخي يجب وضع 1و2 بهذا الشكل ليطلع بياناتهم

1

2

ما يكون في بيناتهن اي رقم

5

4

8

0

7

1

2

3

5

7