CurrentTableChanged
选择不同表后执行,也就是CurrentTable发生变化后执行。
此事件无e参数,这是因为系统变量CurrentTable可以直接返回所选择的表。
如果我们选择不同的主表,会先后触发MainTableChanged和CurrentTableChanged事件,因为此时MainTable和CurrentTable都发生了变化。
如果我们选择一个关联表,那么只会触发CurrentTableChanged事件,因为此时只有CurrentTable发生了变化。
例如将CurrentTableChanged事件代码设为:
If CurrentTable.DataTable.Name
= "订单"
Then
'如果选择的主表是订单表
CurrentTable.Cols("客户").Combolist
= DataTables("客户").GetComboListString("公司名称")
End
If
这样我们每次选择一个Table,如果这个Table的数据来自于订单表,都会从客户表提取公司名称,作为该表客户列的列表项目。