以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  下拉列表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=96057)

--  作者:kaituozhe
--  发布时间:2017/2/12 8:16:00
--  下拉列表

这是一个表中CurrentChanged中的代码,目的是希望在选择某一行,本行摘要列的下拉列表能够自动挑选符合一定条件的下拉列表,减少选择的范围,下列代码就希望选择在明细账摘要中选择与当前行会计年度相同的数据作为本行摘要列的下拉列表,以下代码该如何修改?

e.Table.Cols("摘要").ComboList = DataTables("明细账").GetComboListString("摘要","[会计年度] = \'" & e.Table.Current("会计年度") & "\'")


--  作者:有点色
--  发布时间:2017/2/12 10:09:00
--  

 你应该在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