[RESOLVED] RESOLVED Populate ListView

[Roofuss]

Thanks the reply i have added that but i get an error that says
"Unable to cast object of type 'System.Int32' to type 'System.String'." at the line highlighted:

    Public Sub CreateListTasks()
        lvTasks.Columns.Add("Task ID", 0, HorizontalAlignment.Left)
        lvTasks.Columns.Add("For Company", 1, HorizontalAlignment.Left)
        lvTasks.Columns.Add("Created On", 2, HorizontalAlignment.Left)
        lvTasks.Columns.Add("Status", 3, HorizontalAlignment.Left)
        lvTasks.Columns.Add("Time Taken", 4, HorizontalAlignment.Left)
        lvTasks.Columns.Add("Cost", 5, HorizontalAlignment.Left)
        lvTasks.AutoResizeColumns(1)
        lvTasks.FullRowSelect = True
        lvTasks.GridLines = True

        Dim Connection As SqlConnection = MSDB.GetConnection
        Dim sSQL As String
        Dim lvwItem As New ListViewItem()
        sSQL = "SELECT TaskID, TaskFor, TaskDate, TaskComplete, TaskTime, TaskCost  FROM tasks "
        sSQL = sSQL & "ORDER BY TaskDate "
        Connection.Open()
        Dim command As New SqlCommand(sSQL, Connection)
        Dim reader As SqlDataReader = command.ExecuteReader()

        While reader.Read()
            lvwItem = lvTasks.Items.Add(reader.GetString(0) & "TaskID")
            lvwItem.SubItems.Add(reader.GetString(1) & "TaskFor")
            lvwItem.SubItems.Add(reader.GetString(2) & "TaskDate")
            lvwItem.SubItems.Add(reader.GetString(3) & "TaskComplete")
            lvwItem.SubItems.Add(reader.GetString(4) & "TaskTime")
            lvwItem.SubItems.Add(reader.GetString(5) & "TaskCost")
        End While
        Connection.Close()
    End Sub