تقييم الموضوع :
  • 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
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طريقة مميزة لعمل إعدادات Setting لحفظ اعدادات برنامجك بدون أكواد kslawy 6 1,647 26-05-16, 12:07 PM
آخر رد: CLARO
  [درس فيديو] تشغيل اوامر Run من البرنامج & مثال غلق الويندوز بعد وقت محدد باستخدام VB.net أحمد النجار 1 538 23-12-15, 04:26 AM
آخر رد: الماجيك مسعد
  RichTextBox In VB.Net m.sami.ak 5 3,131 14-09-15, 03:12 PM
آخر رد: ausamaxp
  كيفية تغيير خلفية محرر الكود في Visual Studio 2010 إلى صورة أبو عمر 0 566 06-09-15, 06:44 PM
آخر رد: أبو عمر
  [VB.NET] عمل برنامج محرر وعارض اكواد html alking-0999 0 438 08-07-15, 06:27 PM
آخر رد: alking-0999
  [VB.NET] التشفير باستخدام خوارزمية rsa alking-0999 10 1,333 08-07-15, 04:24 PM
آخر رد: مبرمج بلا حدود
  معلومة ::: RichTextBox RaggiTech 7 638 06-10-12, 09:04 PM
آخر رد: RaggiTech
  رسم الباركود برمجيا باستخدام (Code128) RaggiTech 3 2,653 06-10-12, 12:51 AM
آخر رد: RaggiTech
  مقال- تطوير الفورم رسم الفورم باستخدام +GDI وتحريكه Moving و تغيير أبعاده Resize RaggiTech 2 873 05-10-12, 07:00 PM
آخر رد: RaggiTech
  معلومة -- كيف تقوم بطباعة الـ RichTextBox كما هو منسق RaggiTech 0 517 04-10-12, 11:53 AM
آخر رد: RaggiTech

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


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