Mscomctl ((link)) [ Windows ]

' Add item Dim itm As ListItem Set itm = ListView1.ListItems.Add(, , "MyFile.txt") itm.SubItems(1) = "1.2 KB" itm.SmallIcon = "file" End Sub | Use case | Recommendation | |----------|----------------| | Maintaining legacy VB6 app | Acceptable, but plan migration. Use version 6.1.98.48 or later. | | New VB6 development | Strongly discouraged – use WinForms or WPF instead. | | Migration to .NET | Rewrite UI – do not wrap mscomctl in .NET. | | Enterprise LOB apps | Avoid due to security and 32-bit limitations. | | Hobby / retro computing | Works fine on WinXP/Win7 VMs. |

' Add columns ListView1.ColumnHeaders.Add , , "Name" ListView1.ColumnHeaders.Add , , "Size" mscomctl