Using SqlConn As New SqlClient.SqlConnection("Data Source=127.0.0.1;Initial Catalog=NomeDataBase;Integrated Security=True")

  Using SqlCmd As New SqlClient.SqlCommand
  
    SqlCmd.Connection = SqlConn
    SqlCmd.CommandText = "INSERT INTO prova (Data) VALUES (@Data)"
    SqlCmd.CommandType = CommandType.Text
    SqlCmd.Parameters.Add(New SqlClient.SqlParameter("@Data", Date.Now()))
    
    SqlConn.Open()
    
    SqlCmd.ExecuteNonQuery()
    
    SqlConn.Close()
  
  End Using

End Using