Imports Infragistics.Shared
Imports Infragistics.Win
Imports Infragistics.Win.Misc
Imports Infragistics.Win.FormattedLinkLabel
    Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button1.Click
        Me.ultraFormattedTextEditor1.Value = "Test"
        Dim editInfo As FormattedTextEditInfo = Me.ultraFormattedTextEditor1.EditInfo
        ' Select some content.
        editInfo.SelectionStart = 0
        editInfo.SelectionLength = 2
        ' Apply some style to the selected content.
        editInfo.ApplyStyle("color: blue; background-color: yellow; font-size: +6pt;", False)
        ' Get the current style. This method returns style attributes that are common
        ' among all the selected contents. This method can be used to update the
        ' toolbar button states for example.
        Dim style As StyleInfo = editInfo.GetCurrentStyle()
        ' Print out the font size. It should be +6pt since that's what we set above.
        Debug.WriteLine("Font size: " & style.FontSize.ToString())
    End Sub
    Private Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim editInfo As FormattedTextEditInfo = Me.ultraFormattedTextEditor1.EditInfo
        ' Select something. ClearStyleAttributes and ClearAllStyleAttributes perform
        ' their operations on the selected content.
        editInfo.SelectAll()
        ' ClearStyleAttributes can be used to clear specific style attributes. Here
        ' we are clearing the font-size and background-color settings of the selected
        ' conents.
        editInfo.ClearStyleAttributes(New String() {"font-size", "background-color"})
        ' You can also clear all the style attributes using the ClearAllStyleAttributes
        ' method.
        editInfo.ClearAllStyleAttributes()
    End Sub