This function creates an empty dataset with an empty table but with predefined schema.
Private function GenerateEmptyDataSet() As Dataset
Dim dtData As New DataTable()
Dim dsData As New DataSet()
dtData.Columns.Add(New DataColumn("ID"))
dtData.Columns.Add(New DataColumn("FirstName"))
dtData.Columns.Add(New DataColumn("LastName"))
dtData.Columns.Add(New DataColumn("Contact"))
dsData.Tables.Add(dtData)
dtData = Nothing
return dsData
End Sub