تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] طلب التعديل في كود بسيط
#1
ارجو منكم اخواني مساعدتي في تعديل الكود في البرنامج المرفق

------الجزء الاول----- عند عدم ادراج اي كلمة ( البحث عن ) النتيجة في رقم السطر 0 جيد  هذا ما ابحث عنه
-----الجزء الثاني----- عند ادراج اي كلمة في ( البحث عن) هنالك حالتين
حالة 1 :  الكلمة موجود ------------------------ استخراج رقم السطر
حالة 2 : الكلمة غير موجود رسالة ( الكلمة غير مدرجة في النص )

الاشكال الذي اواجهه هو في الجزء الثاني تكون الكلمة موجودة مثلا في السطر الخامس و مع هذا تظهر الرسالة ( الكلمة غير مدرجة في النص ) 5 مرات بعد الضغط على الرسائل الخمسة يظهر اناذاك رقم السطر
كيف لي ان لا اظهر الرسالة في حالة وجود الكلمة
كيف لي ان اظهر الرسالة مرة واحدة في حالة عدم وجود الكلمة

ارجو مساعدتكم حفظكم الله كما ارجو التطبيق على كلمة taha في الملف النصي المرفق مع البرنامج


الملفات المرفقة
.rar   البرنامج.rar (الحجم : 66.96 ك ب / التحميلات : 17)
الرد }}}}
تم الشكر بواسطة:
#2
PHP كود :
Public Class Form1

   Dim allLines
() As String

   
Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
       Dim openfile1 
= New OpenFileDialog()
       
openfile1.Filter "Text (*.txt)|*.txt"
       
If (openfile1.ShowDialog() = System.Windows.Forms.DialogResult.OKThen
           patch
.Text openfile1.FileName
           allLines 
IO.File.ReadAllLines(patch.Text)
       
End If
   
End Sub

   
Private Sub Button2_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button2.Click
       tbox_line
.Text "0"
       
For 0 To allLines.Count 1
           
If allLines(i).Contains(tbox_Search.Text.TrimThen
               tbox_line
.Text 1
               
Exit For
           
End If
       
Next
       
If tbox_line.Text "0" Then
           MsgBox
("الكلمة غير مدرجة في النص ")
       
End If
   
End Sub

End 
Class 
الرد }}}}
تم الشكر بواسطة:
#3
شكرا لك اخي جزاك الله الف خير وجعله في ميزان حسناتك امين
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] ممكن طلب بسيط MOSTAFA.KAMEL 4 94 14-10-17, 05:36 AM
آخر رد: حريف برمجة
  مطلوب كود بسيط لربط الCombobox مع dgw lemozza 2 56 12-10-17, 05:26 AM
آخر رد: lemozza
  [VB.NET] مطلوب التعديل علي الكود التالي محمد اسماعيل 2 65 11-10-17, 01:08 PM
آخر رد: محمد اسماعيل
  [VB.NET] التعديل على الكود - رقم التسلسلي dubai.eig 4 134 08-10-17, 11:30 PM
آخر رد: dubai.eig
  [VB.NET] اريد التعديل علي المديول التالي محمد اسماعيل 2 65 08-10-17, 07:37 PM
آخر رد: محمد اسماعيل
  [VB.NET] طلب كود بسيط MOSTAFA.KAMEL 3 105 02-10-17, 03:46 PM
آخر رد: MOSTAFA.KAMEL
  [VB.NET] التعديل على الكود ليتناسق ما اريده 0theghost0 4 132 17-09-17, 03:35 PM
آخر رد: 0theghost0
  [VB.NET] لدي مشكلة مع كود التعديل 0theghost0 13 213 09-09-17, 05:24 PM
آخر رد: ola
  استسفسار حول التعديل على فاتورة المشتريات والقيمة المتألق9 1 199 22-08-17, 02:47 PM
آخر رد: نبيل كونكت
  [سؤال] هل الكود التالي يمكن ان يسجل صوت الكومبيوتر بعد تعديل بسيط سعود 4 153 09-08-17, 03:56 AM
آخر رد: سعود

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم