2017-06-20 36 views
0

我進入我的電子郵件沉着「的形式時,有下列顯示問題:RichTextBox的要點對齊顯示問題(左,中,右)

Bullets incorrectly aligned

我有左,中,右對齊要點。爲了使所選文本項目符號列表樣式,按鈕被激活,其執行以下操作:

chkBullet.CheckState = If(isSelectionBulletList(richTextBox), CheckState.Checked, CheckState.Unchecked) 

這反過來又激活了一段作爲一個符號列表:

Private Function isSelectionBulletList(RichTextBox As RichTextBox) As Boolean 
Dim startParagraph As Paragraph = RichTextBox.Selection.Start.Paragraph 
If startParagraph IsNot Nothing Then 
    If TypeOf (startParagraph.Parent) Is ListItem Then 
    Dim markerStyle As TextMarkerStyle = CType(startParagraph.Parent, ListItem).List.MarkerStyle 
    If markerStyle = TextMarkerStyle.Disc Then 
     Return True 
    End If 
    End If 
End If 
Return False 
End Function 

將突出顯示的子彈點所需的對齊方式,我運行了以下內容:

Align(0).Checked = 
    (CType(richTextBox.Selection.GetPropertyValue(Paragraph.TextAlignmentProperty), TextAlignment) = 
    TextAlignment.Left) 

哪個正確移動文本,但不隨文字移動子彈。

我後來的後來運行RTF到HTML的轉換併發送過電子郵件給我的收件箱,子彈點正確對齊,如下圖所示:

enter image description here

沒有人有任何想法如何我可以解決這個顯示問題?

回答