تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
اصنع محرر أكواد خاص بك باستخدام الأداة RichTextBox
#1
السلام عليكم ،،

كيفكم أخواني ،، اليوم كنت اتصفح مواقع أجنبيه و الصراحه أعجبني كود لقيته فقلت أشاركه هنا :
أولاً لبساطة الكود
ثانيا قد يستفيد منه أحد

المهم لا أطول بالحديث

فكرة عن عمل البرنامج من خلال الصورة



الكود البرمجي له
كود :
[align=left]
Imports System.Text.RegularExpressions

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        RichTextBox1.Text = IO.File.ReadAllText("C:\Users\Paul\Desktop\1.txt")
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim rx As New Regex("Imports|Public|Class|Private|Sub|End|ByVal|As|Handles|MyBase|Dim|New|For |Each|In |Next")
        For Each m As Match In rx.Matches(RichTextBox1.Text)
            RichTextBox1.SelectionStart = m.Index
            RichTextBox1.SelectionLength = m.Value.Length
            RichTextBox1.SelectionColor = Color.Blue
        Next
        rx = New Regex(""".+""")
        For Each m As Match In rx.Matches(RichTextBox1.Text)
            RichTextBox1.SelectionStart = m.Index
            RichTextBox1.SelectionLength = m.Value.Length
            RichTextBox1.SelectionColor = Color.Tomato
        Next
    End Sub

End Class
[/align]
الرد }}}
#2
بارك الله فيك وجزاك كل خير
الرد }}}
تم الشكر بواسطة:
#3
جزاك الله كل خير اخى
الرد }}}
تم الشكر بواسطة:
#4
الله يجازيك خير
الرد }}}
تم الشكر بواسطة:
#5
الله يعطيك العافية كود مميز فعلاً Smile
اللَّهُمَّ أَنْتَ رَبِّي ، لا إِلَه إِلاَّ أَنْتَ خَلَقْتَني وأَنَا عَبْدُكَ ، وأَنَا على عهْدِكَ ووعْدِكَ ما اسْتَطَعْتُ ، أَعُوذُ بِكَ مِنْ شَرِّ ما صنَعْتُ ، أَبوءُ لَكَ بِنِعْمتِكَ علَيَ ، وأَبُوءُ بذَنْبي فَاغْفِرْ لي ، فَإِنَّهُ لا يغْفِرُ الذُّنُوبِ إِلاَّ أَنْتَ .
الرد }}}
تم الشكر بواسطة:
#6
ما شاء الله ... شكرا كثيرا على المجهود
{وَسَارِعُواْ إِلَى مَغْفِرَةٍ مِّن رَّبِّكُمْ وَجَنَّةٍ عَرْضُهَا السَّمَاوَاتُ وَالأَرْضُ أُعِدَّتْ لِلْمُتَّقِينَ }آل عمران133
الرد }}}
تم الشكر بواسطة:
#7
مشكورررررر وبارك الله فيك
الرد }}}
تم الشكر بواسطة:
#8
ماشاء الله لاقوة الا بالله
من عام 2013 الموضوع موجود ولم اعلم به الا الان؟!
ابسط مثال يوضح كيفية استخدام الـ Regex
الرد }}}
تم الشكر بواسطة:
#9
شكرا لك اخي على هذا الكود

لقد افادني جدا في مواضيع اخرى

يعطيم العافية
Mish3l
الرد }}}
تم الشكر بواسطة:
#10
بارك الله فيك
لطالما بحث عنه
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  التعامل مع الصور Images في بيئة الدوت نت باستخدام +GDI - مقدمة RaggiTech 3 5,858 30-07-21, 05:14 PM
آخر رد: kebboud
  RichTextBox In VB.Net m.sami.ak 10 13,603 04-02-20, 02:23 AM
آخر رد: egypt 2020
  كيفية قراءة ملف باستخدام IntPtr الخاص بالملف silverlight 3 3,630 24-12-16, 03:13 AM
آخر رد: silverlight
  طريقة مميزة لعمل إعدادات Setting لحفظ اعدادات برنامجك بدون أكواد kslawy 6 6,044 26-05-16, 12:07 PM
آخر رد: CLARO
  [درس فيديو] تشغيل اوامر Run من البرنامج & مثال غلق الويندوز بعد وقت محدد باستخدام VB.net أحمد النجار 1 3,852 23-12-15, 04:26 AM
آخر رد: الماجيك مسعد
  كيفية تغيير خلفية محرر الكود في Visual Studio 2010 إلى صورة أبو عمر 0 4,193 06-09-15, 06:44 PM
آخر رد: أبو عمر
  [VB.NET] عمل برنامج محرر وعارض اكواد html alking-0999 0 2,586 08-07-15, 06:27 PM
آخر رد: alking-0999
  [VB.NET] التشفير باستخدام خوارزمية rsa alking-0999 10 7,542 08-07-15, 04:24 PM
آخر رد: مبرمج بلا حدود
  معلومة ::: RichTextBox RaggiTech 7 3,749 06-10-12, 09:04 PM
آخر رد: RaggiTech
  رسم الباركود برمجيا باستخدام (Code128) RaggiTech 3 9,423 06-10-12, 12:51 AM
آخر رد: RaggiTech

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


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