إعـــــــلان

تقليص
لا يوجد إعلان حتى الآن.

حذف اخر حرف من النص

تقليص
هذا الموضوع مغلق.
X
X
 
  • تصفية - فلترة
  • الوقت
  • عرض
إلغاء تحديد الكل
مشاركات جديدة

  • حذف اخر حرف من النص

    السلام عليكم ورحمة الله وبركاته
    اريد يا اخوانى كود حذف اخر حرف من نص معين
    وهل يمكن حذف اخر كلمة او جملة
    وجزاكم الله كل خير

  • #2
    كود:
    input_string = Input.GetText("Input1");
    last_letter = String.Right(input_string, 1);
    finish = String.Replace(input_string, last_letter, "x", false);
    بخصوص الباقي ستجد موضوعين لأخي الفاضل أبو بلقيس في المواضيع الأخيرة ..

    وفقك الله لكل خير

    تعليق


    • #3
      http://sites.ienajah.com/vb2/showthread.php?t=27281

      تعليق


      • #4
        شكرا أخي رعد أحببت أن أعيد كتابة الكود الذي
        تفضلت به
        كود:
           input_string = Input.GetText("Input1");
        last_letter = String.Right(input_string, 1);
        finish = String.Replace(input_string, last_letter, "", false);
        result = Dialog.Message("Notice", finish);
        ملاحظة : يتم الحذف حتى على الكلمات باللغة العربية

        تعليق


        • #5
          و نستطيع حذف آخر كلمة بتوظيف مايلي :
          كود:
           sSeparator = " ";
          tWords = {};
          nEntries = 1;
          nEntriesStart = 1;
          sOutput = "";
          nSeparator = 0;
          sInput = Input.GetText("Input1");
          nInputLength = String.Length(sInput);
          nSeparator = String.ReverseFind(sInput, sSeparator, false);
          sWord = String.Right(sInput, (nInputLength-nSeparator));
          
          result = String.Replace(sInput, sWord, "", false);
          Input.SetText("Input2", result);
          سلام

          تعليق


          • #6
            المشاركة الأصلية بواسطة رعد الحواسيب مشاهدة المشاركة
            كود:
            input_string = Input.GetText("Input1");
            last_letter = String.Right(input_string, 1);
            finish = String.Replace(input_string, last_letter, "x", false);
            بخصوص الباقي ستجد موضوعين لأخي الفاضل أبو بلقيس في المواضيع الأخيرة ..

            وفقك الله لكل خير
            عدت للكود المرسل أخي رعد لاحظ أنه لايحذف آخر حرف
            فقط بل يحذف كل الحروف أو الأرقام المشابهة للأخير مثلا
            معلم تصبح عل
            455484 تصبح 558
            هل من جديد لإكمال هذه النقطة
            حتى يحذف الأخير فقط
            لي رجوع للموضوع

            تعليق


            • #7
              جزاك الله خيرا ، والله لم انتبه لهذا بالمرة فقد كنت مستعجلا ورأيت السؤال فكانت الإجابة ..

              هذا الكود بعد التعديل :

              كود:
              input_string = Input.GetText("Input1");
              length = String.Length(input_string);
              
              my_table = {}
              
              for i = 0 , length do
              
              result = String.Mid(input_string, i, 1);
              
              Table.Insert(my_table, i, result);
              
              end
              
              last_letter = my_table[length]
              
              Table.Remove(my_table, length);
              
              for i,v in pairs (my_table) do
              
              finish = Input.GetText("Input2");
              Input.SetText("Input2", finish..v);
              
              end

              تعليق


              • #8
                جميل أخي رعد
                إليك بهذا الكود القياسي و لاحظ الأرقام جيدا فهي تتحكم
                في عدد الحروف و الاتجاه فهمني أخي
                كود:
                raad = Input.GetText("Input1");
                Input.SetText("Input2", string.sub(raad, 2, -1));
                اعمل بهذا الكود في الحالات المشابهة لتفادي التعب

                تعليق


                • #9
                  أشكر كل من ساهم بالإجابة

                  وأتمنى التوفيق للجميع

                  تعليق


                  • #10
                    و هذا كود لو أردنا استخلاص الحرف الأخير
                    و مسح الباقي أي العكس
                    تحتاج لادرا Input و Label
                    كود:
                    ClickHere=Input.GetText("Input1");
                    result = String.Length(ClickHere);
                    result7 = String.Mid(ClickHere, result, -1);
                    Label.SetText("Label1", result7);
                    سلامي

                    تعليق


                    • #11
                      حذف اخر حرف من النص:
                      كود PHP:
                      Dialog.Message("Notice",String.Mid("thameur"1String.Length("thameur")-1)); 
                      احتجت استعمال هذا الغرض اليوم فاحببت اعادة كتابته

                      تعليق


                      • #12
                        السلام عليكم ورحمة الله وبركاته

                        تعليق

                        مواضيع تهمك

                        تقليص

                        المنتدى: القسم العام نشرت بواسطة: Reem2Rabeh الوقت: 04-23-2025 الساعة 04:27 PM
                        المنتدى: ضبط وتوكيد الجودة نشرت بواسطة: HeaD Master الوقت: 04-15-2025 الساعة 09:30 AM
                        المنتدى: التصنيع والانتاج نشرت بواسطة: HeaD Master الوقت: 04-11-2025 الساعة 01:08 PM
                        المنتدى: القسم العام نشرت بواسطة: نوال الخطيب الوقت: 03-19-2025 الساعة 03:07 AM
                        المنتدى: الكمبيوتر والإنترنت نشرت بواسطة: عوض السوداني الوقت: 03-18-2025 الساعة 07:22 AM
                        يعمل...
                        X