listview的问题!请大家来看一下!帮忙想一下!一定重赏!分可再加!

Question

有一个listview1,我有两个按钮 command1和command2
当我点command1时,我第一列是复选框,
当我要点command2时,我不想要那一列了,去掉!
请问大哥可不可以,怎么做!
小妹一定会重赏你们!

Answer 1

Private Sub Command2_Click()
ListView1.ColumnHeaders.Remove 2      //删除第二列
End Sub

Answer 2

当我点command2时,我不要那一列了
但是我点command1时,我要那一列

Answer 3

Private Sub Command1_Click()
    ListView1.ColumnHeaders.Add , , "我要的列"
End SubPrivate Sub Command2_Click()
    
    Dim i As Integer
    
    For i = ListView1.ColumnHeaders.Count To 1 Step -1
    
      
      ListView1.ColumnHeaders.Remove i
      MsgBox "have deleted the col" & i
      
    Next
    
End SubPrivate Sub Form_Load()   ListView1.View = lvwReport
   ListView1.ColumnHeaders.Add , , "two"
   ListView1.ColumnHeaders.Add , , "three"
   ListView1.ColumnHeaders.Add , , "four"
    
End Sub