تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[كود] استفسار عن كود Back Space
#1
السلام عليكم ورحمه الله وبركاته 

عندي استفسار عن كود زر Back Space .............

المشروع بتاعي عباره عن فكره Notepad طبعا فكره قديمه بس انا قولت اعدل شويه 
صوره البرنامج في المرفقات 
المشكله هي ان لما ادوس علي الزر الانا عملتو بالكود ده 
كود :
Try
           If Len(RichTextBox1.Text) > 0 Then
               RichTextBox1.Text = Mid(RichTextBox1.Text, 1, Len(RichTextBox1.Text) - 1)
              RichTextBox1.Focus()
           End If
       Catch
       End Try

بيمسح اخر حرف (ده طبيعي ) ولكن لما احدد حرف في نص الكلام بيمسح اخر حرف بردو  ولما احط علامه المؤشر  في اي حته بردو يمسح اخر حرف 
ارجو تيفيدوني وتردو عليا


الملفات المرفقة صورة/صور
   
الرد }}}}
تم الشكر بواسطة:
#2
تفضل


كود :
     If RichTextBox1.TextLength <> 0 Then
            Dim I As Integer = RichTextBox1.SelectionStart
            RichTextBox1.Text = RichTextBox1.Text.Remove(If(I = 0, RichTextBox1.TextLength - 1, I - 1), 1)
            RichTextBox1.Focus()
        End If       End If
الْلَّهُم صَلِّ وَسَلِم وَبَارِك عَلَى سَيِّدِنَا مُحَمَّد

ماهو ال UrlEncoding
الرد }}}}
تم الشكر بواسطة: ziad.mg95
#3
(09-08-16, 05:17 PM)LoveVb كتب : تفضل


كود :
     If RichTextBox1.TextLength <> 0 Then
            Dim I As Integer = RichTextBox1.SelectionStart
            RichTextBox1.Text = RichTextBox1.Text.Remove(If(I = 0, RichTextBox1.TextLength - 1, I - 1), 1)
            RichTextBox1.Focus()
        End If       End If
شكرا اخي الكود نجح 
بارك الله فيك
الرد }}}}
تم الشكر بواسطة: LoveVb


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استفسار بخصوص عدم ظهور اداة عرض ملف pdf في الادوات عباسة 7 149 22-02-17, 08:07 PM
آخر رد: عباسة
Wink [VB.NET] استفسار بخصوص التعديل والحفظ علي اداة datagridview dark1459 9 128 20-02-17, 02:13 AM
آخر رد: khodor1985
  استفسار عن تعبئة combobox من قاعدة البيانات المتألق9 2 76 16-02-17, 11:57 AM
آخر رد: المتألق9
  استفسار ComboBox bidaya 2 75 12-02-17, 06:18 PM
آخر رد: مساعدة
  [سؤال] استفسار بخصوص انواع كود البحث.. Marwan9990 1 101 03-02-17, 07:09 PM
آخر رد: مساعدة
  [سؤال] استفسار داخل List box عبدالرحمن المكاوي 10 179 31-01-17, 05:32 PM
آخر رد: عبدالرحمن المكاوي
  [VB.NET] استفسار بخصوص WebBrowser1 dubai.eig 2 95 28-01-17, 05:12 PM
آخر رد: dubai.eig
  استفسار عن الجداول المتعددة في قاعدة البيانات اكسس أبووسم 4 183 14-01-17, 12:36 PM
آخر رد: أبووسم
  استفسار حول (ComboBox) و (TextBox). المبرمج المبتدئ 1 10 387 05-01-17, 03:37 AM
آخر رد: المبرمج المبتدئ 1
  [VB.NET] استفسار عن DataGridView dubai.eig 3 241 28-12-16, 08:11 AM
آخر رد: Hazim Elabd

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


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