一个绑定实例

打开CaseStudy目录下的文件“甘特图绑定状态.Table”。

该示例文件有个窗口，你打开窗口，可以在窗口中的对甘特图做任意修改，包括任务、任务条样式、单元格样式、项目属性、资源、日历和时间标尺等等等，都会自动保存在数据表中，已经完全不需要XML文件了。

每次打开窗口，都会读取数据表的内容，然后自动生成甘特图：

你要做的只是在窗口的AfterLoad事件中加上代码：

Dim gv As GanttView = e.Form.Controls("GanttView1").GanttView
gv.PropertyDataTable = DataTables("Properties") '甘特图属性设置存储在Properties表中
gv.CalendarDataTable = DataTables("Calendars") '甘特图的日历设置存储在Calendars表中
gv.ResourceDataTable = DataTables("Resources") '甘特图的资源设置存储在Resources表中
gv.TaskDataTable = DataTables("Tasks") '甘特图的任务数据存储在Tasks表中
gv.LoadSettings() '从数据表中加载设置

然后在窗口的AfterClose事件加上代码：

Dim gv As GanttView = e.Form.Controls("GanttView1").GanttView
gv.SaveSettings() '将设置信息保存到数据表
DataTables("Properties").Save()
DataTables("Calendars").Save()
DataTables("Resources").Save()
DataTables("Tasks").Save()

重要提示：

即使在绑定状态，依然可以加载XML格式的甘特图数据(包括微软的Project)，需要注意的是，一旦加载XML数据，上述四个表的数据会被全部清空，然后根据XML数据重新生成数据 行。