我在项目属性—项目事件—BeforeLoadOuterTable中写代码,到是能用,就是觉得怕把系统崩溃了,请狐爸帮我重新写一下吧!
If e.DataTableName = "yonghu" AndAlso e.User.Name = "城西" Then
e.SelectString = "Select * From {yonghu} where [pian] In ( '城西 ')"
End If
If e.DataTableName = "yonghu" AndAlso e.User.Name = "城北" Then
e.SelectString = "Select * From {yonghu} where [pian] In ( '城北 ')"
End If
If e.DataTableName = "yonghu" AndAlso e.User.Name = "城南" Then
e.SelectString = "Select * From {yonghu} where [pian] In ( '城南 ')"
End If