Forums Ultimate UI for Windows Forms
Your Privacy Matters: We use our own and third-party cookies to improve your experience on our website. By continuing to use the website we understand that you accept their use. Cookie Policy
Close
Gregorio J.
195
Clear the ValueList and Assign another ValueList
posted

I got a grid column that I add a valuelist as a ComboBox.  That part work perfect and I can see the values correctly.  When I change the table in the combobox and reasign to the ValueList property the list never get changed.  But If I create another DropDown and asign that new DropDown to the ValueList property the values show correctly.  How I can re asign the same DropDown after changing the table?  Here is the code I got so far.

 

Private Sub CleanTables()

Try

Me.FundSele.Clear()

If Me.rdbTransferTypePrimaryToInvestment.Checked Then

Me.FundSele = Me.clsDataProcessor.getFundsSelectCashBalanceList(Me.clsEntity.SystemYear, Me.clsCurrentUser.UserID, Me.Departmental, IIf(Me.clsCurrentUser.MultiDepartmentReporting.ToUpper = "YES", True, False), Me.clsEntity.TemporaryMode, Nothing, Me.clsEntity.ProcessingYear)

Else

Me.FundSele = Me.clsDataProcessor.getFundsSelectInvestmentBalanceList(Me.cboiInvestment.Value, Me.clsEntity.SystemYear, Me.clsCurrentUser.UserID, Me.Departmental, IIf(Me.clsCurrentUser.MultiDepartmentReporting.ToUpper = "YES", True, False), Me.clsEntity.TemporaryMode, Nothing, Me.clsEntity.ProcessingYear)

End If

Me.FundSeleV.Table = Me.FundSele.Tables(0)

Me.FundSeleV.RowFilter = "FundBalance > 0.00"

Me.fundseleF = Me.FundSeleV.ToTable

Me.FundSeleFS.Tables.Clear()

Me.FundSeleFS.Tables.Add(Me.fundseleF)

 

Me.FundDist.Tables("FundDist").Clear()

If Me.rdbTransferTypePrimaryToInvestment.Checked Then

Me.FundultraDropDown.DataSource = Me.FundSeleFS

Me.FundultraDropDown.Refresh()

Me.InvestmentTransferGrid.grdiList.DisplayLayout.Bands(0).Columns("FundNumber").ValueList = Nothing

Me.InvestmentTransferGrid.grdiList.DisplayLayout.Bands(0).Columns("FundNumber").ValueList = Me.FundultraDropDown

Else

Me.FundultraDropDown2.DataSource = Me.FundSeleFS

Me.FundultraDropDown2.Refresh()

Me.InvestmentTransferGrid.grdiList.DisplayLayout.Bands(0).Columns("FundNumber").ValueList = Nothing

Me.InvestmentTransferGrid.grdiList.DisplayLayout.Bands(0).Columns("FundNumber").ValueList = Me.FundultraDropDown2

End If

Catch ex As Exception

End Try

 

End Sub

Parents
No Data
Reply Children
No Data