主题：关于AfterLoad 事件的代码 的动态数据加载

我想在ERP数据库中动态数据加载,按说明去做总是出错,不知原因.

比如我已从ERP外部数据原中加载了"料品资料"表,想在加载这个表时同时加载其下表

在料品资料表的AfterLoad 事件设代码如下:

Dim ids As String
Dim dt As DataTable
For Each dr As DataRow In DataTables("料品资料").DataRows
  ids =   ids & "," & dr("part_no")
Next
ids= ids.Trim(",")
DataTables("料品资料下表1").LoadFilter = "part_no In (" & ids & ")"
DataTables("料品资料下表1").Load()