أريد تظليل النص في التكست بوكس

أخي الكريم ...

عندما تستخدم الفئة streamreader لفتح ملف نصي في textBox استخدم الطريقة Select لتظليل النص في مربع النص

مثال

dim streamtodisplay as streamreader 
streamtodisplay = new streamreder _

(هنا تضع امتداد الملف )
textbox1.text =stremtodesplay.readtoEnd 
streamtodisplay.close()
textBox1.select(0,0)

المعامل الاول في الطريقة select يعني أول char يتم تظليلة المعامل الثاني يدل على عدد char التي سيتم تظليلها

اتمنى خدمتك وبالتوفيق

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

داخل الحدث Enter قم باستدعاء الإجراء SelectAll

    Private Sub TextBox1_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.Enter
        TextBox1.SelectAll()
    End Sub

شكراً على الاجابة الوافيه وجزاكم الله خير ولكن يامشرف كتابة الاكواد في المنتدى بعد التعديل اصبحة صغيرة الكتابة خصوصاً اللي داخل مربع الاكواد هل ممكن تكبير الخط شوي هذي اللي يظهر لي