سؤال

لدي RichTextBox السيطرة على النموذج.لدي أيضا على هذا الزر المسمى جريئة, ، ، إذا كان شخص يختار النص في RichTextBox, ثم يضغط على زر ، النص المحدد يتحول جريئة. أي طريقة للقيام بذلك ؟ اليومية البسيطة مهمة بالنسبة للمستخدمين النهائيين.شكرا

هل كانت مفيدة؟

المحلول

الاختلاف على ما سبق أن يأخذ في الاعتبار التحول جريئة على/قبالة اعتمادا على النص المختار الخط معلومات:

    With Me.rtbDoc
        If .SelectionFont IsNot Nothing Then
            Dim currentFont As System.Drawing.Font = .SelectionFont
            Dim newFontStyle As System.Drawing.FontStyle

            If .SelectionFont.Bold = True Then
                newFontStyle = currentFont.Style - Drawing.FontStyle.Bold
            Else
                newFontStyle = currentFont.Style + Drawing.FontStyle.Bold
            End If

            .SelectionFont = New Drawing.Font(currentFont.FontFamily, currentFont.Size, newFontStyle)
        End If
    End With

قد تحتاج إلى تنظيف قليلا سحبت هذا من قديم المشروع.

نصائح أخرى

سوف تحتاج إلى استخدام .SelectionFont ممتلكات RichTextBox وتعيين الخط الكائن المطلوب الأساليب.

على سبيل المثال - هذا الرمز سيكون في حالة معالج زر:

Dim bfont As New Font(RichTextBoxFoo.Font, FontStyle.Bold)
RichTextBoxFoo.SelectionFont = bfont
مرخصة بموجب: CC-BY-SA مع الإسناد
لا تنتمي إلى StackOverflow
scroll top