Visual Basic para Aplicaciones - list view, hacer columnas invisibles

hola, estoy usando un listview genérico que llamo desde distintos sitios para mostrar los datos de una tabla, muestra distintas columnas de la tabla según de donde se llama. Las columnas las tengo todas creadas, el problema es que tengo que hacer invisibles algunhas, se puede en vb6?
hasta el momento le ponía ancho de columna 0 pero no vale ya que permite estirar y ver los datos con ancho 0, hai manera de hacer que no se pueda modificar el ancho de cada columna?
Muchas gracias

Hola una manera facil de hacerlo es cargar en el ListView solo los campos que tiene la tabla, asi no tienes que ocultar ninguna columna no deseada:

te paso este metodo ojala te sirva:

Public Sub cargarlistview(Registro As ADODB.Recordset, lwCabecera As ListView)
Dim Columnas As Integer
Dim I As Integer
Dim ItemProducto As ListItem
Columnas = Registro.Fields.Count

lwCabecera.View = lvwReport
For I = lwCabecera.ColumnHeaders.Count To 1 Step -1
lwCabecera.ColumnHeaders.Remove (I)
Next
For I = 0 To Columnas - 1
Set ClmCabecera = lwCabecera.ColumnHeaders.Add(, , Registro.Fields(I).Name)
Next
lwCabecera.ListItems.Clear
Do While Not Registro.EOF
Cadena = Registro(0)
Set ItemProducto = lwCabecera.ListItems.Add(, , Cadena)
For I = 1 To Columnas - 1
If Not IsNull(Registro(I)) Then
ItemProducto.SubItems(I) = Registro(I)
Else
ItemProducto.SubItems(I) = ""
End If
Next
Registro.MoveNext
Loop
End Sub