Los moderadores, MVP y administradores podrán seguir editando, respondiendo o creando nuevos mensajes

Buenos días.
Tengo un problema con un datagrid. Quiero rellenar un datagrid con datos de una base de datos. Después de hacer los selects me salen las filas en el datagrid pero no me aparece ningun dato, solo filas vacias. Alguien me puede ayudar.
Pongo el codigo porque quizas se ve mas claro donde esta el error.

cn = New SqlConnection("Data Source=Josep-Pc\sqlexpress;Initial Catalog=Desplacaments;Integrated Security=SSPI")
cn.Open()
sql = "SELECT data, concepte, preu, arxiu from Dietes" 'where usuari =" & usuari
Try
cm = New SqlCommand()
cm.CommandText = sql
cm.CommandType = CommandType.Text
cm.Connection = cn
da = New SqlDataAdapter(cm)
ds = New DataSet()
da.Fill(ds)
DataGridView1.DataSource = ds.Tables(0).DefaultView
Catch ex As Exception
MessageBox.Show("No es pot mostrar les dades - Dietes")
End Try
DataGridView1.Rows(0).Selected = True
DataGridView1.CurrentCell = DataGridView1.Rows(0).Cells(0)

'cn = New SqlConnection("Data Source=Josep-Pc\sqlexpress;Initial Catalog=Desplacaments;Integrated Security=SSPI")
sql = "select data, idorigen, iddesti, km from Viatge" 'where usuari =" '"& usuari & "';"
Try
cm = New SqlCommand()
cm.CommandText = sql
cm.CommandType = CommandType.Text
cm.Connection = cn
da = New SqlDataAdapter(cm)
ds = New DataSet()
da.Fill(ds)
DataGridView1.DataSource = ds.Tables(0).DefaultView
Catch ex As Exception
MessageBox.Show("No es pot mostrar les dades - Viatge")
End Try
DataGridView1.Rows(0).Selected = True
DataGridView1.CurrentCell = DataGridView1.Rows(0).Cells(0)

cn.Close()