تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
اقتصاص ما بعد الكلمة في textbox
#1
السلام عليكم

السؤال هو كيفية اقتصاص كلمة معينة بعد كلمة Hi فمثلا عند كتابة Hi Mr.IlI في التكس بوكس يقوم باظهار مسج فيها Mr.IlI وذلك بعد الضغط على enter

تم الحل ... لكن الحل مخبص شوي لكن زابط استخدمت Repalce و Find

PHP كود :
Dim a As Int16
        Dim stt 
As String RichTextBox1.Text



        Dim boxes 
As New StringBuilder(stt)
        If 
RichTextBox1.Text.Contains("HI "Then
            a 
RichTextBox1.Find("HI ")
            
RichTextBox1.Select(a2)
            
Dim word1 As New StringBuilder(RichTextBox1.SelectedText)
            
boxes.Replace(RichTextBox1.SelectedText"")

            
RichTextBox1.Text boxes.ToString()
            
TextBox1.AppendText(RichTextBox1.Text)
            
RichTextBox1.Text ""
        
End If
    
End Sub 
الرد
تم الشكر بواسطة: الشاكي لله
#2
السلام عليكم...

يمكنك اختصار الكود كالتالي (في الحدث KeyDown لمربع النص):

كود :
Private Sub TextBox1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
    Dim MyWord As String = "Hi, "
    Dim MyStr As String

    If e.KeyCode = Keys.Enter Then   ' إذا تم الضغط على مفتاح إنتر
        If TextBox1.Text.Contains(MyWord) Then
            MyStr = TextBox1.Text.Substring(TextBox1.Text.IndexOf(MyWord, 1, MyWord.Length) + MyWord.Length)
            MsgBox(MyStr)
        Else
            MsgBox("'" & MyWord.Trim() & "' is NOT found")
        End If
    End If
End Sub
نرجو الاستفادة و السلام.
بِسْمِ اللهِ الرَّحْمَنِ الرَّحِيمِ ( وَ مَا تُقَدِّمُوا لِأَنفُسِكُم مِّنْ خَيْرٍ تَجِدُوهُ عِندَ اللهِ هُوَ خَيْراً وَ أَعْظَمَ أَجْراً ) صَدَقَ اللهُ الْعَظِيمُ
الرد
تم الشكر بواسطة: mohammed moh , Mr.ILI , kslawy


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Lightbulb سؤال حول ال textbox haider kh 3 80 10-03-19, 12:18 AM
آخر رد: ابراهيم ايبو
Lightbulb سؤال بخصوص اعدادات textbox haider kh 8 158 09-03-19, 10:26 AM
آخر رد: ابراهيم ايبو
  [سؤال] محتويات Textbox تتاثر باختيار كائن معين من Combobox mr_hso 3 147 05-03-19, 03:31 PM
آخر رد: mr_hso
  [VB.NET] مشكلة فى عرض محتويات DataGridView فى TextBox mr_hso 9 303 26-02-19, 09:18 PM
آخر رد: mr_hso
  مساعدة في جعل الإستعلام يبحث عن جزء من الكلمة Hamoody 5 154 27-01-19, 09:23 PM
آخر رد: Hamoody
  مساعدة بخصوص الارقام في Textbox Adata 2 175 25-01-19, 02:35 AM
آخر رد: ابراهيم ايبو
  ازالة الصفارة الخاصه textbox معاذ_ابراهيم 5 183 19-01-19, 03:00 PM
آخر رد: alsouf
  [VB.NET] استفسار :- بخصوص textbox dubai.eig 0 124 27-12-18, 12:27 PM
آخر رد: dubai.eig
  [VB.NET] حفظ ما في textbox farfour 5 238 21-11-18, 06:31 PM
آخر رد: farfour
  [VB.NET] استفسار :- بخصوص TEXTBOX dubai.eig 2 219 04-11-18, 12:48 AM
آخر رد: dubai.eig

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


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