[اليوم السابع]

(24-10-19, 10:58 AM)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

شكرا اخي ولكن هذا الكود يظهر مجموع محتوي التكست بوكس بما فيهم الي متاح بيانتهم كما هو موضح 
السهم المشار برقم 1 = رقم ليس له بيانات علي الداتا جريد فيو
السهم المشار برقم 2 = مجموع محتوي التكست بوكس انا اود ان يكون يحتوي علي عدد الارقام التي ليس لها بيانات يعني من المفترض يظهر رقم 1
السهم المشار برقم 3 = هو مجموع عدد محتوي التكست بوكس 
السهم المشار برقم 4 = هو مجموع عدد الصفوف في الداتا جريد فيو

---

(24-10-19, 05:32 PM)اليوم السابع كتب :

(24-10-19, 10:58 AM)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

شكرا اخي ولكن هذا الكود يظهر مجموع محتوي التكست بوكس بما فيهم الي متاح بيانتهم كما هو موضح 
السهم المشار برقم 1 = رقم ليس له بيانات علي الداتا جريد فيو
السهم المشار برقم 2 = مجموع محتوي التكست بوكس انا اود ان يكون يحتوي علي عدد الارقام التي ليس لها بيانات يعني من المفترض يظهر رقم 1
السهم المشار برقم 3 = هو مجموع عدد محتوي التكست بوكس 
السهم المشار برقم 4 = هو مجموع عدد الصفوف في الداتا جريد فيو