如何在VB.Net中水平对齐文本组合框

Question

我无法找到允许我在vb.net组合框内对齐文本的属性。文本框具有TextAlign属性，但组合框没有该属性。组合框使用了另一个属性吗？还是有另一种方法来做到这一点？

感谢

Answer 1

如果组合的DropDownStyle设置为DropDownList您可以通过所有者绘制项目做到这一点。要做到这一点设置其DrawMode属性为OwnerDrawFixed，放在了DrawItem事件是这样的：

If e.Index >= 0 Then 
    Using st As New StringFormat With {.Alignment = StringAlignment.Far} 
     e.Graphics.DrawString(sender.Items(e.Index).ToString, e.Font, Brushes.Black, e.Bounds, st) 
    End Using 
End If