主题：设置的刚打开不不加载明细表数据,为什么选中主表行,副表不管有多少数据都只加载一行呢?

以下内容为程序代码:

1 If Forms("维护计划2").opened = True Then
2 Dim t As DataTable = DataTables("东营计划清单")'明细表
3 With Tables("东营计划")'主表
4 If .Current Is Nothing Then
5 t.loadFilter = ""
6 t.load
7 Else
8 t.loadFilter = "计划号 = '" & .Current("计划号") & "'"
9 t.load
10 End If
11 End With
12 End If