Adds a column to the underlying ActiveData object and returns a value that indicates success or failure.
Public Sub Main() AddColumnToDataFile( "occupation" ) End Sub Public Sub AddColumnToDataFile( name As String ) Dim data As ActiveData = Workbench.LoadActiveData( "PhoneBookData" ) data.AddColumn( "Occupation", name ) data.Save() End Sub End Module