How to format strings in a RichTextBox

Question

0.00/5 (No votes)

See more:

Hi

How do I select all the items in a ListBox with a CheckBox and then display the Strings associate with each item in the ListBox on separate lines in bold in a RichTextBox?

Posted 15-Aug-11 20:24pm

Terence J

Add a Solution

Comments

OriginalGriff 16-Aug-11 3:59am

Sorry? That doesn't make complete sense. You can't put CheckBoxes inside list boxes, so where does that come into it?
Please use the "Improve question" widget to edit your question and provide better information.

DaveAuld 16-Aug-11 4:20am

No, but you can use a CheckedListBox :-)

OriginalGriff 16-Aug-11 4:26am

Coffee, I need more coffee. :Doh!:

Terence J 16-Aug-11 4:42am

I do not want to put a CheckBox inside a ListBox. The ListBox is on Form. When I check the CheckBox all the items of the ListBox must be selected and the strings associated with the ListBox must be displayed in the RichTextBox on seperate lines in bold font.

3 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

rrrer · Answer 1 · 2011-08-15T22:02:00

Use The Fallowing Coding

VB

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        '  String 1
        Dim Position As Int16 = 0
        Dim string1 As String = "This is string1. Font=Arial: FontSize=14: Color=Blue" & vbNewLine
        Dim myFont As New Font("Arial", 14, FontStyle.Regular, GraphicsUnit.Point)
        Dim myColor As Color = Color.Blue
        rtb.Select(Position, 0)
        rtb.SelectionFont = myFont
        rtb.SelectionColor = myColor
        rtb.SelectedText = string1
        Position += string1.Length

        '  String 2
        string1 = "This is string2. Font=microsoft sans serif: FontSize=10: Color=Red" & vbNewLine
        myFont = New Font("microsoft sans serif", 10, FontStyle.Regular, GraphicsUnit.Point)
        myColor = Color.Red
        rtb.Select(Position, 0)
        rtb.SelectionFont = myFont
        rtb.SelectionColor = myColor
        rtb.SelectedText = string1
        Position += string1.Length

        '  String 3
        string1 = "This is string3. Font=courier new: FontSize=30: Color=Green: BOLD" & vbNewLine
        myFont = New Font("courier new", 30, FontStyle.Bold, GraphicsUnit.Point)
        myColor = Color.Green
        rtb.Select(Position, 0)
        rtb.SelectionFont = myFont
        rtb.SelectionColor = myColor
        rtb.SelectedText = string1
        Position += string1.Length
    End Sub
End Class

DaveAuld · Answer 2 · 2011-08-15T22:19:00

See this demo i knocked up.
Add a CheckedListBox and RichTextBox to a form

The load event will add 20 items to a list box, it will also add the same 20 items to the RTB.
When you select an item in the listbox, it will highlight in the RTB, you can toggle the BOLD state of the item by changing the checked status.

VB

Public class Form1
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
    'Add 20 items to list box and Add the 20 items to the Rich Text Box
    For x as Integer = 1 To 20
      CheckedListBox1.Items.Add("Item" + x.ToString)
      RichTextBox1.Text = RichTextBox1.Text + "Item" + x.ToString
    Next
End Sub

Private Sub CheckedListBox1_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles CheckedListBox1.SelectedIndexChanged
    'Get the Current Selected Item
    Dim item as String = CheckedListBox1.SelectedItem

    If item.Length > 0 Then
      'Find the item selected in the RTB
      Dim index As Integer = RichTextBox1.Text.IndexOf(item)
      If index >=0 Then
        'item found
        RichTextBox1.SelectionStart = index
        RichTextBox1.SelectionLength = item.Length

        'Check the checked box state for the item selected and adjust font style
        If CheckedListBox1.checkedIndices.Contains(CheckedListBox1.SelectedIndices(0)) Then
          'take current font and make it bold
          RichTextBox1.SelectionFont = New Font(RichTextBox1.SelectionFont.FontFamily,  RichTextBox1.SelectionFont.FontFamily,  FontStyle.Bold)
        Else
          'take the current font and make it regular
          RichTextBox1.SelectionFont = New Font(RichTextBox1.SelectionFont.FontFamily,  RichTextBox1.SelectionFont.FontFamily,  FontStyle.Regular)
        End If
      End If
    End If
End Sub
End Class

OriginalGriff · Answer 3 · 2011-08-15T23:09:00

"I do not want to put a CheckBox inside a ListBox. The ListBox is on Form. When I check the CheckBox all the items of the ListBox must be selected and the strings associated with the ListBox must be displayed in the RichTextBox on seperate lines in bold font."

Ah!
Selection is easy: Handle the CheckBox.Changed event:

VB

If myCheckBox.Checked Then
    For i As Integer = 0 To myListBox.Items.Count - 1
        myListBox.SetSelected(i, True)
    Next
End If

The RTF display is also simple:

VB

Dim sb As New StringBuilder()
sb.Append("{\rtf1\ansi ")
For Each i As Integer In myListBox.SelectedIndices
	sb.Append("\b ")
	sb.Append(myListBox.Items(i).ToString())
	sb.Append("\b0 ")
	sb.Append("\par")
Next
sb.Append("}")
myRichTextBox.Rtf = sb.ToString()

How to format strings in a RichTextBox

3 solutions

Solution 1

Solution 2

Solution 3

Add your solution here

Preview 0