+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] اظهار النص في الفور الاول ومطابقته في الفورم الاخر (/showthread.php?tid=28607)
اظهار النص في الفور الاول ومطابقته في الفورم الاخر - اباذر - 14-02-19
السلام عليكم الاخوة الاعزاء
مشروع متكون من فورم عدد 2
بلغة VB.net
الفورم الاول يحتوي على RichtextBox + Button
------------
الفورم الثاني يحتوي على TextBox + Button
------------
اثناء كتابة النص في الفورم الاول "
يتم استدعاء الفورم الثاني "
يتم مطابفة النص اذا كان موجود في الفورم الاول ... او غير موجود
اتمنى ان تصل الفكرة لحضرتكم
يرجى مشاهدة الصور اكثر ايضاح للموضوع
RE: اظهار النص في الفور الاول ومطابقته في الفورم الاخر - princelovelorn - 14-02-19
وعليكم السلام ورحمة الله وبركاته
ضع الكود التالي في الزر الأول show في الفورم الأول
كود :
Form2.Show()وضع الكود التالي في الزر البحث في الفورم الثاني
كود :
Dim txt As String = TextBox1.Text
Dim alltxt As String = Form1.RichTextBox1.Text
If alltxt.Contains(txt) Then
MsgBox("النص موجود")
Else
MsgBox("النص غير موجود")
End Ifالمثال في المرفقات
تمنياتي لك بالتوفيق والنجاح
RE: اظهار النص في الفور الاول ومطابقته في الفورم الاخر - اباذر - 14-02-19
(14-02-19, 06:17 AM)princelovelorn كتب :وعليكم السلام ورحمة الله وبركاته
ضع الكود التالي في الزر الأول show في الفورم الأول
كود :
Form2.Show()
وضع الكود التالي في الزر البحث في الفورم الثاني
كود :
Dim txt As String = TextBox1.Text
Dim alltxt As String = Form1.RichTextBox1.Text
If alltxt.Contains(txt) Then
MsgBox("النص موجود")
Else
MsgBox("النص غير موجود")
End Ifالمثال في المرفقات
تمنياتي لك بالتوفيق والنجاح
princelovelorn
اخي الغالي
بارك الله بك على المجهود الجميل و الرائع
وفقك الله بكل مجالات الحياة
مودتي 
RE: اظهار النص في الفور الاول ومطابقته في الفورم الاخر - princelovelorn - 14-02-19
(14-02-19, 06:32 AM)اباذر كتب :princelovelornاخي الغاليبارك الله بك على المجهود الجميل و الرائعوفقك الله بكل مجالات الحياةمودتي
اللهم أمين وإياك