Dim conn As New SqlClient.SqlConnection("Server = .\sqlexpress; Database = Prova; Integrated Security = sspi;") 


Dim dt As New DataTable

Dim da As New SqlClient.SqlDataAdapter("Select * from miaTabella", conn) 
da.FillSchema(dt, SchemaType.Mapped) 

dt.Columns("mioID").DataType = GetType(Integer) 
da.Fill(dt) 


