Private Sub SwapAlignment()
Me.UltraComboEditor1.DropDownListWidth = 150
If Me.UltraComboEditor1.DropDownButtonAlignment = Infragistics.Win.ButtonAlignment.Right Then
Me.UltraComboEditor1.DropDownButtonAlignment = Infragistics.Win.ButtonAlignment.Left
Me.UltraComboEditor1.DropDownListAlignment = Infragistics.Win.DropDownListAlignment.Right
Else
Me.UltraComboEditor1.DropDownButtonAlignment = Infragistics.Win.ButtonAlignment.Right
Me.UltraComboEditor1.DropDownListAlignment = Infragistics.Win.DropDownListAlignment.Left
End If
End Sub