Llenar un ListView de un DataSet

Hola, les comento que no soy muy bueno en VB.Net, y me esta dando problemas llenar un ListView a partir de un DataSet, por ejemplo el DataSet, viene con esta información:

Yo utilizo este código:

Try
                        With ListViewBitacora
                            .Items.Clear()
                            .Columns.Clear()
                            .View = View.Details
                            .GridLines = True
                            .FullRowSelect = True
                            ' añadir los nombres de columnas  
                            For c As Integer = 0 To DeserializarServidorUsu.DataSet.Tables(0).Columns.Count - 1
                                .Columns.Add(DeserializarServidorUsu.DataSet.Tables(0).Columns(c).Caption)
                            Next
                        End With

                        With DeserializarServidorUsu.DataSet.Tables(0)
                            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
                                ListView2.Items.Add(dato)
                            Next
                        End With
                    Catch ex As Exception
                        MessageBox.Show(ex.Message, "Cliente ListViewBitacora ")
                    End Try

                End If

            Catch ex As Exception
            End Try

Y no me muestra el resultado esperado (el resultado esperado, seria igual a la primera imagen), me muestra esto:

Ayuda, por favor. Y gracias...