DataTable

Como Crear un Data Table por codigo ya que creo este codigo para poder
plobar un data grid y no lo logro
creo este metodo pero muetsra un error
Private Sub MostrarDatos()

Dim CnNorpal As New SqlConnection(Conexion)

Dim dapCliente As New SqlDataAdapter

Dim cmdCliente As New SqlCommand("Select
Id_Cli,Raz_Soc,Direccion,Ruc,Telefono", CnNorpal)

cmdCliente.CommandType = CommandType.Text

dapCliente.SelectCommand = cmdCliente

Dim dtCliente As New DataTable("Clientes") Dim ds As DataSet

CnNorpal.Open()

dapCliente.Fill(dtCliente) //// ''ERROR en esta linea

CnNorpal.Close()

Me.DataGrid1.DataSource = dtCliente

End Sub

Mensaje del error
''Excepción no controlada del tipo 'System.Data.SqlClient.SqlException' en
system.data.dll Información adicional: Error del sistema.
Saludos

Herbert A. Ojeda Ascanio
MsHao40@Hotmail.com

Importadora Norpal W&J S.A.C.
Cercado de Lima
Lima 01,Peru

"Si los arquitectos hiciesen edificios de la misma forma en que los
programadores escriben programas, el primer pájaro carpintero que pasase por
aquí destruiría la civilización."
Gerald Weimberg