agregar un elemento al listview?

[tzalejo]

hola compañero foreros bueno...queria hacerle una consulta...quisiera agregar un elemento a listview pero utilizando esto:

Código vb:

f CnSqlP.State = ConnectionState.Open Then CnSqlP.Close()
CnSqlP.Open()
' propiedades del SqlCommand  
Dim comando As New NpgsqlCommand
With comando
    .CommandType = CommandType.Text
    .CommandText = Sql
    .Connection = CnSqlP
End With
Dim DA As New NpgsqlDataAdapter  ' Crear nuevo SqlDataAdapter  
Dim DataSet As New DataSet ' Crear nuevo dataset  
DA.SelectCommand = comando
' llenar el dataset  
DA.Fill(DataSet, "Tabla")
' Propiedades del ListView  
 
With ListView
                .Items.Clear()
                .Columns.Clear()
                .View = View.Details
                .GridLines = True
                .FullRowSelect = True
                ' añadir los nombres de columnas  
                .Columns.Add("CODIGO", 55, HorizontalAlignment.Left)
                .Columns.Add("COMISION", 65, HorizontalAlignment.Left)
                .Columns.Add("FECHA INICIO", 90, HorizontalAlignment.Left)
                .Columns.Add("HORARIOS", 140, HorizontalAlignment.Left)
                .Columns.Add("ALUMNOS", 80, HorizontalAlignment.Left)
End With
 
' Añadir los registros de la tabla  
With DataSet.Tables("tabla")
    For f As Integer = 0 To .Rows.Count - 1
    Dim dato As New ListViewItem(.Rows(f).Item(0).ToString)
    ' recorrer las columnas  
          For c As Integer = 1 To .Columns.Count - 1
                dato.SubItems.Add(.Rows(f).Item(c).ToString())
          Next
      ListView.Items.Add(dato)
    Next
End With
 

o sea aca ingreso los datos q vienen de una consulta...el tema es que en la columna ALUMNO quiero agregar un elemento que en este caso es un nro...
o sea dnd dice:

For c As Integer = 1 To .Columns.Count - 1
c=5 ingresar el nro, caso contrario ingreso los valores de la consulta...
if c=5 then
ingreso el nro
else
dato.SubItems.Add(.Rows(f).Item(c).ToString())
end if
Next


espero haberme explicado...desde ya muchas gracias...

pd:utilizo vb.net(2005)