生成列表项目不成功，Area11列显示五大洲的列表，选择一个大洲后，Area1列就填充为该大洲的Id号，例如选择“亚洲”，对应Id是3895，在Area22列需要生成下拉列表（属于亚洲的，也就是“东亚和东南亚”），但是Area22 没有下拉列表，怎么回事呢？？请指教，好像PrepareEdit事件中的代码没起作用。

Area11列是在列属性中设置的下拉列表，见表4

PrepareEdit事件代码为：

If e.IsFocusCell Then \'如果是焦点所在单元格
    If e.Col.Name = "Area22" Then \'如果正在编辑的是Area22列
        \'从行政区域表提取作为列表项目
        e.Col.Combolist = DataTables("Customer_List").GetComboListString("Area22","[ParentId]= \'" & e.Row("Area1") & "\'")
    End If
End If

此主题相关图片如下：1.jpg

此主题相关图片如下：2.jpg

 应该这样改吧？如果要生成所在的 洲 全部地区，你还需要额外处理一下。

If e.IsFocusCell Then \'如果是焦点所在单元格
    If e.Col.Name = "Area22" Then \'如果正在编辑的是Area22列
        \'从行政区域表提取作为列表项目
        e.Col.Combolist = DataTables("Dict_Area").GetComboListString("Text", "[ParentId]= \'" & e.Row("Area1") & "\'")
    End If
End If