例如
If e.IsFocusCell Then '如果是焦点所在单元格
If e.Col.Name = "县市" Then '如果正在编辑的是县市列
'从行政区域表提取该省市的县市作为列表项目
e.Col.Combolist = DataTables("行政区域").GetComboListString("县市", "[省市] = '" & e.Row("省市") & "'") elseif e.Col.Name = "区镇" Then
e.Col.Combolist = DataTables("行政区域").GetComboListString("区镇", "[省市] = '" & e.Row("省市") & "' and [县市] = '" & e.Row("县市") & "'")
elseif e.Col.Name = "xxxx...........
……
End If
End If
加好友 
发短信
Post By：2019/10/29 11:28:00 [显示全部帖子]
