リストボックスに出力した文字列の色を一行づつ変化させたいのですが
うまくいきません。どなたかご教授願えませんでしょうか。
環境はVB6.0です。よろしくお願いします。
以下に失敗したソースを記述します。
Private Sub sub_EntryStatus( Byval str_Status as String )
Dim ix as Integer
For ix = 0 to 10
ListBox1.ForeColor = RGB(ix + 200, 100, 100)
ListBox1.List(ix) = "Status #" & ix + 1
Next ix
End Sub
ListBoxには、そのような機能はありません。(APIを使えば別ですが)
代わりに、TreeView や ListView 、MSHFlexGrid 等を利用してみてください。
魔界の仮面弁士さん。御回答ありがとうございます。
ご指摘の通り、別のコントロールで作成したいと思います。
ツイート | ![]() |