ListViewにアイテムを追加する

意外に毎回、やり方を忘れるのでメモしておこう。

With ListView1
    .Items.Add("アイテム")
    .Items(.Items.Count-1).SubItems.Add("サブアイテム1")
    .Items(.Items.Count-1).SubItems.Add("サブアイテム2")
    .Items(.Items.Count-1).SubItems.Add("サブアイテム3")
End With

Columnsは、デザイナで設定する前提ですね。