Error:'ddlInterestCalculationMethod' has a SelectedValue which is invalid............

[sha_shivani]

I am getting this exception when try to load the dropdownbox.
I do have the value in the Item collection which is coming back from this Me.lblInterestCalcMethod.Text = .InterestCalculationMethod object.Can you pls tell me what i need to fix this issue?

Exception

Top level exception
Message: 'ddlInterestCalculationMethod' has a SelectedValue which is invalid because it does not exist in the list of items. Parameter name: value
Extra information:
Type: System.ArgumentOutOfRangeException
Stack trace:
at System.Web.UI.WebControls.ListControl.set_SelectedValue(String value)
at System.Web.UI.WebControls.ListControl.set_Text(String value)
at FileInfo.LoadFileEditScreen() in C:\FISDesktop\FISDesktop_WebApp_VB\FileScreen.aspx.vb:line 78
at FileInfo.ascxToolsMenu_MenuItemCommand(Object sender, FISDesktopMenuItemEventArgs menuItem) in C:\FISDesktop\FISDesktop_WebApp_VB\FileScreen.aspx.vb:line 281
at controls_ProductFeatureMenu.rpt_ItemCommand(Object source, RepeaterCommandEventArgs e) in C:\FISDesktop\FISDesktop_WebApp_VB\controls\ProductFeatureMenu.ascx.vb:line 423
at System.Web.UI.WebControls.Repeater.OnItemCommand(RepeaterCommandEventArgs e)
at System.Web.UI.WebControls.Repeater.OnBubbleEvent(Object sender, EventArgs e)
at System.Web.UI.Control.RaiseBubbleEvent(Object source, EventArgs args)
at System.Web.UI.WebControls.RepeaterItem.OnBubbleEvent(Object source, EventArgs e)
at System.Web.UI.Control.RaiseBubbleEvent(Object source, EventArgs args)
at System.Web.UI.WebControls.ImageButton.OnCommand(CommandEventArgs e)
at System.Web.UI.WebControls.ImageButton.RaisePostBackEvent(String eventArgument)
at System.Web.UI.WebControls.ImageButton.System.Web.UI.IPostBackEventHandler.RaisePostBackEvent(String eventArgument)
at System.Web.UI.Page.RaisePostBackEvent(IPostBackEventHandler sourceControl, String eventArgument)
at System.Web.UI.Page.RaisePostBackEvent(NameValueCollection postData)
at System.Web.UI.Page.ProcessRequestMain(Boolean includeStagesBeforeAsyncPoint, Boolean includeStagesAfterAsyncPoint)

My LoadFileEditScreen Method()

    Private Sub LoadFileEditScreen()
        Dim iFile As Business.Model.Shared.Process.ILoanInfo
        iFile = ProcMan.Svc.GetLoanInfo(thisFile.FileID)

        With iFile
            'Loan Information
            Me.txtLoanClassification.Text = .LoanClassification
            Me.txtLoanType.Text = .LoanType
            Me.ddlLoanPosition.Text = .LoanPosition
            Me.txtLoanOrigination.Text = .LoanOrigination
            Me.txtFirstPayment.Text = .FirstPayment
            Me.txtNextPayment.Text = .NextPayment
            Me.txtOriginalLoanAmount.Text = .OriginalLoanAmount
            Me.txtOriginalInterestRate.Text = .OriginalInterestRate
            Me.txtCurrentLoanAmount.Text = .CurrentLoanAmount
            Me.txtCurrentInterestRate.Text = .CurrentInterestRate
            Me.txtNetAmountDue.Text = .NetAmountDue
            Me.txtLoanTerm.Text = .LoanTerm
            Me.txtEscrowBalance.Text = .EscrowBalance
            Me.txtPIPayment.Text = .PIPayment
            Me.ddlPaymentFrequency.Text = .PaymentFrequency
            Me.ddlInterestCalculationMethod.Text = .InterestCalculationMethod [B][U]Line No: 78[/U][/B]
            Me.txtSuspenseBalance.Text = .SuspenseBalance
            Me.ddlOccupancyStatus.Text = .OccupancyStatus
            Me.txtPostPetitionDueDate.Text = .PostPetitionDueDate

            'Investor Information
            Me.ddlInvestor.Text = .Investor
            Me.txtInvestorLoanNumber.Text = .InvestorLoanNumber
            Me.txtClientInvestorCode.Text = .ClientInvestorCode
            Me.txtInvestorCategory.Text = .InvestorCategory
            Me.txtInvestorName.Text = .InvestorName
            Me.txtPendingInvestorLoanNumber.Text = .PendingInvestorLoanNumber
            Me.txtPowerofAttorney.Text = .PowerOfAttorney
            Me.txtPendingInvestorChangeEffectiveDate.Text = .PendingInvestorChangeEffectiveDate
            Me.txtPendingInvestorNumber.Text = .PendingInvestorNumber
            Me.txtPendingInvestorCategory.Text = .PendingInvestorCategory
            Me.txtPendingInvestorName.Text = .PendingInvestorName
            Me.txtPendingPowerofAttorney.Text = .PendingPowerOfAttorney
            Me.txtClientInvestorActionName.Text = .ClientInvestorActionName
            Me.txtTitleVestedintheNameof.Text = .TitleVestedInTheNameOf

            'MERS Data
            Me.txtMERSReg.Text = .MERSReg
            Me.txtMERSMOMNo.Text = .MersMinNo
            Me.txtMERSMOMInd.Text = .MersMomInd
            'Me.txtActionintheNameof.Text = .ActionInTheNameOf

            'Property Information
            'Me.lblAddress.Text = .add

            'Insurer Information
            Me.ddlInsurer.Text = .Insurer
            Me.txtInsurerLoanNumber.Text = .InsurerLoanNumber
        End With
        Me.pnlFileInfo.Visible = False

        Me.pnlFileEditInfo.Visible = True
    End Sub

Loading dropdownlist

 Private Sub LoadInterestCalculation()
        Dim Items As ILookupItemCollection
        Items = New SharedLookupItemCollection(ProcMan.Svc.ListLoanInfoInterestCalculationMethods())
        If Not IsNothing(Items) AndAlso Items.Count() > 0 Then
            Items.BindListControl(ddlInterestCalculationMethod, New ListItem("-- Select Payment Frequency --", "0"), "0")
        End If
    End Sub