1)
codice:
conn.Open()
Dim comm As New OleDbCommand("SELECT * FROM Movimenti WHERE ID = " & Id & "", conn)
Dim read As OleDbDataReader = comm.ExecuteReader
read.Read()
Dim Nome As String = String.Empty
if not isdbnull(read("Nome")) then Nome = read("Nome")
conn.Close()
2) Per formattare tipi di dati DateTime basta il ToString...
es.. DateTime.Now.ToString("MM/dd/yyyy")
converte la data attuale in formato inglese