主题：下拉列表

 你应该在prepareEdit写代码才对

If e.Col.name = "摘要" Then
    If e.Row.isnull("会计年度") Then
        e.Col.ComboList = DataTables("明细账").GetComboListString("摘要")
    Else
        e.Col.ComboList = DataTables("明细账").GetComboListString("摘要","[会计年度] = '" & e.Row("会计年度") & "'")
    End If
End If