私の問題は以下の通りです:ディスプレイの表示色
私はこのような(Excelファイルから抽出された)ARGBコードで満たさコンボボックスがあります。
255, 149, 55, 39
255, 0, 176, 80
255, 0, 112, 192
...
を私の目標でありますrgbコードの代わりに色のリストを表示する。 だから、私は失敗し、これを実行しようとしました:
Private Sub CB_Color_DrawItem(ByVal sender As System.Object, ByVal e As DrawItemEventArgs) Handles CB_Color.DrawItem
If e.Index = -1 Then
Exit Sub
End If
Dim colBrush As Brush = New SolidBrush(Color.FromArgb(CB_Color.Items(e.Index)))
'Drawing rectangles for the color values
e.Graphics.DrawRectangle(New Pen(Brushes.Black), e.Bounds.Left + 2,
e.Bounds.Top + 2, 30, e.Bounds.Height - 5)
e.Graphics.FillRectangle(colBrush, e.Bounds.Left + 3, e.Bounds.Top + 3,
29, e.Bounds.Height - 6)
End Sub
このコードは何も変更しません。私はまだコンボボックスのリストにrbgコードを持っています。誰でもこのコードが間違っていると教えてもらえますか?
Iは '描画する各色が' Color.FromArgb(CB_Color.Items(e.Index))で定義されているもの。ユーザーはドロップダウンリストから色を選択するだけで、選択したアイテムのインデックスを使用して彼が選んだものを知ることができたと思います。 – Elhendriks