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

如果填写的内容是“县市”同时对应的编码呢？如果每一个县市还都有一个对应的编码，希望选择下拉列表显示的是“县市”名称，选择后填入的是相应县市的“编码”。

开始是通过设置列属性的“数据表”、“显示列”和“取值列”实现，但是后面的过滤条件不会写，无法获取前面一个单元格的值。 

改写PerpaerEdit事件后，只能填上过滤后的名称，又不知如何填上所选名称的“编码”了。

哪位高人指点一下，多谢！