Foros del Web - Problema con listado de ArrayList en Consola

EStoy haciendo un pequeño programita en consola en el que tengo que hacer un listado desde el ArrayList y en vez de inmprimirme el listado me imprime "Console.Application1.camion", aqui les dejo los codigos a ver si me puede ayudar.

esto está en el modulo

Código:



    Sub ListadoCamiones(ByVal inempre As empresa)

        Console.WriteLine(inempre.ListarCamiones)

        Console.ReadLine()

    End Sub

esto esta en empresa

Código:



    Public Function ListarCamiones() As String

        Dim listado As String = "Listado de camiones"

        If Me.ColCamiones Is Nothing Or Me.ColCamiones.Count = 0 Then

            listado &= ControlChars.NewLine & "No se puede listar los camiones"

        Else

            listado = "Listado de Camiones"

            For i As Integer = 0 To i < Me.ColCamiones.Count - 1

                listado &= ControlChars.NewLine & Me.ColCamiones.Item(i).ToString

                i += 1

            Next

        End If

        Return listado

    End Function

si existen los camiones o no me ntra en el if corecto pero no me imprime los camiones listados.:molesto:

Gracias