بوجدود هذا لكود في زر التالي بحيث ينتقل على السطر التالي وضعت خذا الكود ولكن توجد مشكلة وقت نسخ النص المعروض في Label1.Text اذا كان سطر فارغ وجربت كل الطرق ما زبط معي
اكيد الفكرة وصلت
ضغط زر التالي ينتقل على السطر الاخر ويعرض في Label1.Text ومن ثم ينسخ الموجود في Label1.Text
عندما يقابل اول سطر فارغ اول اخر سطر مع العلم انه موجود كوذ تفريغ السطور ولايكن بفضل السطر الاول والاخير موجود فية سطر فارغ فما الحل ؟؟؟
الحلول المطروحة
كتابة كود انة يتم الكتابة او لصق النص من اول سطر في TextBox2.Text تلقائيا بحيث لا يتم الصف او الكتابة في السطر الثاني
ارجو ان تكون الفكرة وصلت
المشكلة التي تظهر
System.ArgumentNullException: 'لا يمكن أن تكون القيمة فارغة.
اسم المعلمة: text'
اكيد الفكرة وصلت
ضغط زر التالي ينتقل على السطر الاخر ويعرض في Label1.Text ومن ثم ينسخ الموجود في Label1.Text
عندما يقابل اول سطر فارغ اول اخر سطر مع العلم انه موجود كوذ تفريغ السطور ولايكن بفضل السطر الاول والاخير موجود فية سطر فارغ فما الحل ؟؟؟
الحلول المطروحة
كتابة كود انة يتم الكتابة او لصق النص من اول سطر في TextBox2.Text تلقائيا بحيث لا يتم الصف او الكتابة في السطر الثاني
ارجو ان تكون الفكرة وصلت
المشكلة التي تظهر
System.ArgumentNullException: 'لا يمكن أن تكون القيمة فارغة.
اسم المعلمة: text'
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
TextBox2.Text = System.Text.RegularExpressions.Regex.Replace(TextBox2.Text, "\r\s+", vbNewLine)
'التالي
If i = TextBox2.Lines.Count - 1 Then i = -1
i += 1
Label1.Text = TextBox2.Lines(i)
If TextBox2.SelectedText.Length = 0 Then MessageBox.Show("حدد رقم ليتم النسخ") : Exit Sub
Clipboard.SetText(Label1.Text)