以下是代码填充GridLookUpEdit(Dev Express)或来自LINQ的任何组合。 问题是,当基础数据源发生变化时,它不会刷新
Dim l_LNQUserAccess = (From TBU_User In PB_DT_User
Join TBU_AccessLevel In PB_DT_AccessLevel
On TBU_User.Field(Of Guid)("AccessLevelDID") Equals TBU_AccessLevel.Field(Of Guid)("PKGUID")
Where (TBU_User.Field(Of Integer)("BranchID") = Pb_ST_BranchInf.LoginBranchId) And (TBU_User.Field(Of Integer)("Operation") <> PB_EN_DBOpp.Delete)
Select New With
{
.PKGUID = TBU_User.Field(Of Guid)("PKGUID"),
.UserID = TBU_User.Field(Of String)("UserID"),
.Descr = TBU_User.Field(Of String)("Descr"),
.AccessLevelID = TBU_AccessLevel.Field(Of String)("AccessLevelID")
})
Dim bs = New BindingSource()
bs.DataSource = l_LNQUserAccess
l_GLE.Properties.ValueMember = "PKGUID"
l_GLE.Properties.DisplayMember = "UserID"
l_GLE.Properties.DataSource = ""
l_GLE.Properties.DataSource = bs