Code:
If IO.File.Exists("records.xml") Then
dt.ReadXmlSchema("records.xml")
dt.ReadXml("records.xml")
Else
dt.Columns.Add("Name")
dt.Columns.Add("Appearance", GetType(Integer))
dt.Columns.Add("Efficiency", GetType(Integer))
dt.Columns.Add("Concision", GetType(Integer))
dt.Columns.Add("Adherence", GetType(Integer))
dt.Columns.Add("Total", GetType(Integer))
End If
dt.Columns(5).Expression = "Appearance + Efficiency + Concision + Adherence"