主题：全局变量是怎么加上去的

就是在项目的Initialize 事件中编写代码，增加全局变量

项目属性

Initialize

数据已经加载，所有的DataTable都已经生成，即将生成Table和窗口的时候执行，通常在此添加全局变量，以及针对DataTable的初始化设置。

例如将Initialize事件代码设为：

Vars.Add("Aggregate",GetType(Boolean),False)
DataTables("订单").DataCols("日期").DefaultValue = Date.Today()

上面的代码增加了一个逻辑型全局变量Aggregate，并将订单表日期列的默认值设置当天日期。

利用Initialize事件，还可以动态设置列标题：

With DataTables("表B")
    .DataCols("Name").Caption = "姓名"
    .DataCols("ID").Caption = "编号"
    .DataCols("Date").Caption = "日期"
End With

不能在Initialize事件中出现针对Table、Col和窗口的代码，因为此时上述对象还未生成。