Hola:
Parece que no asignas correctamente los SubItems a la variable Horario:
Dim Horario As ListViewItem
Horario = New ListViewItem(row(0).ToString)
Horario.SubItems.Add(row(1) + " " + row(2))
Horario.SubItems.Add(row(3).ToString)
MiListView.Items.Add(Horario)
Saludos