如何用代码设置listview的某些列居中呀，如果显示数字的话，居左太难看了

Question

如何用代码设置listview的某些列居中呀，如果显示数字的话，居左太难看了
我是指报表模式

Answer 1

With Me.ListView1
   .View = lvwReport
   .LabelEdit = lvwManual
   .SmallIcons = ImageList1
   
.ColumnHeaders.Add , , "序号", 0, lvwColumnLeft'向左
.ColumnHeaders.Add , , "类别", 1500, lvwColumnCenter'居中
.ColumnHeaders.Add , , "名称", 3600, lvwColumnRinght'向右
End With

Answer 2

.ColumnHeaders.Add , , "类别", 1500, 2'居中