リストボックスにきれいに複数表示するには?

解決


きよ  2002-11-21 13:33:23  No: 105482  IP: [192.*.*.*]

リストボックスに

名前      住所
田中      東京都〜
山田      北海道〜
東海林    高知県〜

のように、二つのデータを2列に表示したいのです。
その際、住所の場所(二つめのデータの場所)がきれいに並ぶようにしたいのですが
どうしたらよいのでしょうか?
知恵をお授けくださいm(_  _)m

編集 削除
とろ  2002-11-21 13:35:41  No: 105483  IP: [192.*.*.*]

ListView コントロールを使用したらいかが?

編集 削除
きよ  2002-11-21 13:40:25  No: 105484  IP: [192.*.*.*]

HELPを読んでみたのですが
具体的にどう使えばいいのかが、わからないのです。
お手数ですが、どういう風に使えばいいのか
お教え願えないでしょうか?

編集 削除
とろ  2002-11-21 15:10:24  No: 105485  IP: [192.*.*.*]

ListView をフォーム上に貼り付けて実行してみて下さい。

Private Sub Form_Load()
  Dim itmX As ListItem
  
  With ListView1
    .ColumnHeaders.Add , , "名前", 800
    .ColumnHeaders.Add , , "住所", 800
    .View = lvwReport
    .LabelEdit = lvwManual
  End With
  
  Set itmX = ListView1.ListItems.Add(, , "田中")
  itmX.SubItems(1) = "東京都〜"
  
  Set itmX = ListView1.ListItems.Add(, , "山田")
  itmX.SubItems(1) = "北海道〜"
  
  Set itmX = ListView1.ListItems.Add(, , "東海林")
  itmX.SubItems(1) = "高知県〜"
  
  Set itmX = Nothing
End Sub

編集 削除
きよ  2002-11-21 16:19:46  No: 105486  IP: [192.*.*.*]

書いていただいたソースを元に、どうにか完成することができました。
丁寧なお答えを、本当にありがとうございました!
まだまだ初心者ですが、また何かありましたら
よろしくお願いします。m(_ _)m

編集 削除