Private Sub ModifyingtheDropDownMenusAppearanceandItemList_Load(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MyBase.Load ' リスト内のすべての項目に影響する ItemAppearance の BackColor を設定します。 Me.UltraComboEditor1.ItemAppearance.BackColor = Color.WhiteSmoke ' 奇数番号の項目は偶数番号の項目とは異なる ForeColor を表示するように ' UltraComboEditor の Items コレクションの各項目の Appearance を ' 設定します Dim i As Integer For i = 0 To 4 If i Mod 2 Then Me.UltraComboEditor1.Items(i).Appearance.ForeColor = Color.Blue Else Me.UltraComboEditor1.Items(i).Appearance.ForeColor = Color.Red End If Next End Sub