记录一些小知识点：

1.如何改变listview的列标题名称：

With ListDetail.ColumnHeaders
.Clear
.Add,"",50
.Add,"序号",800
.Add,"元素",1600
.Add,"附加值",1000
.Add,"动作序号",1000
End With

当要改变标题时

ListDetail.ColumnHeaders(2).Text ="标题1"

ListDetail.ColumnHeaders(3).Text ="标题2"

ListDetail.ColumnHeaders(4).Text ="标题3"

ListDetail.ColumnHeaders(5).Text ="标题4"