Combobox help

I have a program that has a textbox that recieves input and based on that input it populates my whole forms textboxes , i now also have a combobox that gets populated in the same , how can i now make it that when i select a value in this combobox that it repopulates the whole form based on the input gotten form my combobox.
Please help any suggestions would be great.

Comments

  • : I have a program that has a textbox that recieves input and based on that input it populates my whole forms textboxes , i now also have a combobox that gets populated in the same , how can i now make it that when i select a value in this combobox that it repopulates the whole form based on the input gotten form my combobox.
    : Please help any suggestions would be great.
    :
    oops my prog looks like this
    HeaderAL = HeaderInfoController.GetHeaderInfo(txtRunNumber.Text)
    M00HeaderInfo = HeaderAL.Item(0)
    MemberDetail1AL = MemberConsInfoController.GetMemberInfo(txtRunNumber.Text)
    M01Member001Info = MemberDetail1AL.Item(0)
    MemberDetail2AL = MemberConsInfoController2.GetMemberInfo2(txtRunNumber.Text)
    M01Member002Info = MemberDetail2AL.Item(0)
    MemberServiceInfoAL = MemberServiceInfoController.GetMemberServiceInfo(txtRunNumber.Text)
    MemberServiceInfo = MemberServiceInfoAL.Item(0)


    With cmbIndustryNumber
    .DisplayMember = "IndustryReference"
    .ValueMember = "IndustryReference"
    .DataSource = ReferenceNumberAL
    End With

    ''THESE ARE THE BINDINGS FOR The Header ON TOP OF FORM

    txtFund.Text = M01Member001Info.FundCode
    txtEmployer.Text = M01Member001Info.EmployerCode
    txtReturnPeriod.Text = M00HeaderInfo.ReturnPeriod
    txtFileVersion.Text = M00HeaderInfo.Version
    txtReturnDate.Text = M00HeaderInfo.ReturnDate
    txtHeaderDescription.Text = M00HeaderInfo.Comments '& cmbIndustryNumber.SelectedValue

    ''THESE ARE THE BINDINGS FOR Member Detail(M01/002/001)

    txtStatus5.Text = M01Member001Info.StatusCode
    txtIdentityNumber3.Text = M01Member001Info.IDNumber
    txtDateOfBirth3.Text = M01Member001Info.BirthDate
    txtSurname.Text = M01Member001Info.Surname
    txtInitials.Text = M01Member001Info.Initials
    txtFirstName1.Text = M01Member001Info.FirstName1
    txtFirstName2.Text = M01Member001Info.FirstName2
    txtFirstName3.Text = M01Member001Info.FirstName3
    txtTitle.Text = M01Member001Info.Title
    txtLanguage.Text = M01Member001Info.Language
    txtGender.Text = M01Member001Info.Gender
    txtMaritalStatus.Text = M01Member001Info.MaritalStatus
    txtPassportNumber.Text = M01Member001Info.PassportReference
    txtNRA.Text = M01Member001Info.PensionAge
    txtPopulationGroup.Text = M01Member001Info.PopulationGroup

    ''THESE ARE THE BINDINGS FOR Member Detail(M01/002/002)

    txtStatus6.Text = M01Member002Info.StatusCode
    txtIdentityNumber4.Text = M01Member002Info.IDNumber
    txtDateOfBirth4.Text = M01Member002Info.BirthDate
    txtPostalAddressL1.Text = M01Member002Info.PostalAddress1
    txtPostalAddressL2.Text = M01Member002Info.PostalAddress2
    txtPostalAddressL3.Text = M01Member002Info.PostalAddress3
    txtPostalAddressL4.Text = M01Member002Info.PostalAddress4
    txtPostalCode.Text = M01Member002Info.PostalCode
    txtContactPhoneNumber.Text = M01Member002Info.ContactPhone

    ''THESE ARE THE BINDINGS FOR Member Detail(M01/002/003)

    txtStatus7.Text = M01Member003Info.StatusCode
    txtIdentityNumber5.Text = M01Member003Info.IDNumber
    txtDateOfBirth5.Text = M01Member003Info.BirthDate
    txtPostalAddressL1b.Text = M01Member003Info.EmployerAddress1
    txtPostalAddressL2b.Text = M01Member003Info.EmployerAddress2
    txtPostalAddressL3b.Text = M01Member003Info.EmployerAddress3
    txtIndustryType.Text = M01Member003Info.IndustryType
    txtMagistrateDistrict.Text = M01Member003Info.MagistrateDistrict

    ''THESE ARE THE BINDINGS FOR Member Service(M02/002/001)

    txtStatus8.Text = MemberServiceInfo.StatusCode
    txtIdentityNumber6.Text = MemberServiceInfo.IDNumber
    txtDateOfBirth6.Text = MemberServiceInfo.BirthDate
    txtEngagementDate.Text = MemberServiceInfo.EngagementDate
    txtDischargeDate.Text = MemberServiceInfo.DischargeDate
    txtLeaveStartDate.Text = MemberServiceInfo.LeaveStartDate
    txtLeaveEndDate.Text = MemberServiceInfo.LeaveEndDate
    txtReasonCode.Text = MemberServiceInfo.ReasonCode

  • : : I have a program that has a textbox that recieves input and based on that input it populates my whole forms textboxes , i now also have a combobox that gets populated in the same , how can i now make it that when i select a value in this combobox that it repopulates the whole form based on the input gotten form my combobox.
    : : Please help any suggestions would be great.
    : :
    : oops my prog looks like this
    : HeaderAL = HeaderInfoController.GetHeaderInfo(txtRunNumber.Text)
    : M00HeaderInfo = HeaderAL.Item(0)
    : MemberDetail1AL = MemberConsInfoController.GetMemberInfo(txtRunNumber.Text)
    : M01Member001Info = MemberDetail1AL.Item(0)
    : MemberDetail2AL = MemberConsInfoController2.GetMemberInfo2(txtRunNumber.Text)
    : M01Member002Info = MemberDetail2AL.Item(0)
    : MemberServiceInfoAL = MemberServiceInfoController.GetMemberServiceInfo(txtRunNumber.Text)
    : MemberServiceInfo = MemberServiceInfoAL.Item(0)
    :
    :
    : With cmbIndustryNumber
    : .DisplayMember = "IndustryReference"
    : .ValueMember = "IndustryReference"
    : .DataSource = ReferenceNumberAL
    : End With
    :
    : ''THESE ARE THE BINDINGS FOR The Header ON TOP OF FORM
    :
    : txtFund.Text = M01Member001Info.FundCode
    : txtEmployer.Text = M01Member001Info.EmployerCode
    : txtReturnPeriod.Text = M00HeaderInfo.ReturnPeriod
    : txtFileVersion.Text = M00HeaderInfo.Version
    : txtReturnDate.Text = M00HeaderInfo.ReturnDate
    : txtHeaderDescription.Text = M00HeaderInfo.Comments '& cmbIndustryNumber.SelectedValue
    :
    : ''THESE ARE THE BINDINGS FOR Member Detail(M01/002/001)
    :
    : txtStatus5.Text = M01Member001Info.StatusCode
    : txtIdentityNumber3.Text = M01Member001Info.IDNumber
    : txtDateOfBirth3.Text = M01Member001Info.BirthDate
    : txtSurname.Text = M01Member001Info.Surname
    : txtInitials.Text = M01Member001Info.Initials
    : txtFirstName1.Text = M01Member001Info.FirstName1
    : txtFirstName2.Text = M01Member001Info.FirstName2
    : txtFirstName3.Text = M01Member001Info.FirstName3
    : txtTitle.Text = M01Member001Info.Title
    : txtLanguage.Text = M01Member001Info.Language
    : txtGender.Text = M01Member001Info.Gender
    : txtMaritalStatus.Text = M01Member001Info.MaritalStatus
    : txtPassportNumber.Text = M01Member001Info.PassportReference
    : txtNRA.Text = M01Member001Info.PensionAge
    : txtPopulationGroup.Text = M01Member001Info.PopulationGroup
    :
    : ''THESE ARE THE BINDINGS FOR Member Detail(M01/002/002)
    :
    : txtStatus6.Text = M01Member002Info.StatusCode
    : txtIdentityNumber4.Text = M01Member002Info.IDNumber
    : txtDateOfBirth4.Text = M01Member002Info.BirthDate
    : txtPostalAddressL1.Text = M01Member002Info.PostalAddress1
    : txtPostalAddressL2.Text = M01Member002Info.PostalAddress2
    : txtPostalAddressL3.Text = M01Member002Info.PostalAddress3
    : txtPostalAddressL4.Text = M01Member002Info.PostalAddress4
    : txtPostalCode.Text = M01Member002Info.PostalCode
    : txtContactPhoneNumber.Text = M01Member002Info.ContactPhone
    :
    : ''THESE ARE THE BINDINGS FOR Member Detail(M01/002/003)
    :
    : txtStatus7.Text = M01Member003Info.StatusCode
    : txtIdentityNumber5.Text = M01Member003Info.IDNumber
    : txtDateOfBirth5.Text = M01Member003Info.BirthDate
    : txtPostalAddressL1b.Text = M01Member003Info.EmployerAddress1
    : txtPostalAddressL2b.Text = M01Member003Info.EmployerAddress2
    : txtPostalAddressL3b.Text = M01Member003Info.EmployerAddress3
    : txtIndustryType.Text = M01Member003Info.IndustryType
    : txtMagistrateDistrict.Text = M01Member003Info.MagistrateDistrict
    :
    : ''THESE ARE THE BINDINGS FOR Member Service(M02/002/001)
    :
    : txtStatus8.Text = MemberServiceInfo.StatusCode
    : txtIdentityNumber6.Text = MemberServiceInfo.IDNumber
    : txtDateOfBirth6.Text = MemberServiceInfo.BirthDate
    : txtEngagementDate.Text = MemberServiceInfo.EngagementDate
    : txtDischargeDate.Text = MemberServiceInfo.DischargeDate
    : txtLeaveStartDate.Text = MemberServiceInfo.LeaveStartDate
    : txtLeaveEndDate.Text = MemberServiceInfo.LeaveEndDate
    : txtReasonCode.Text = MemberServiceInfo.ReasonCode
    :
    :
    [red]*********************************************************[/red]

    Hello jade:

    The combobox's text property is populated with the selection made from the drop down list. Have you tried running your process from combobox.text instead of textbox.text? Hope this works for you.

    btseb

  • [b][red]This message was edited by jade1 at 2004-10-26 7:2:12[/red][/b][hr]
    : : : I have a program that has a textbox that recieves input and based on that input it populates my whole forms textboxes , i now also have a combobox that gets populated in the same , how can i now make it that when i select a value in this combobox that it repopulates the whole form based on the input gotten form my combobox.
    : : : Please help any suggestions would be great.
    : : :
    : : oops my prog looks like this
    : : HeaderAL = HeaderInfoController.GetHeaderInfo(txtRunNumber.Text)
    : : M00HeaderInfo = HeaderAL.Item(0)
    : : MemberDetail1AL = MemberConsInfoController.GetMemberInfo(txtRunNumber.Text)
    : : M01Member001Info = MemberDetail1AL.Item(0)
    : : MemberDetail2AL = MemberConsInfoController2.GetMemberInfo2(txtRunNumber.Text)
    : : M01Member002Info = MemberDetail2AL.Item(0)
    : : MemberServiceInfoAL = MemberServiceInfoController.GetMemberServiceInfo(txtRunNumber.Text)
    : : MemberServiceInfo = MemberServiceInfoAL.Item(0)
    : :
    : :
    : : With cmbIndustryNumber
    : : .DisplayMember = "IndustryReference"
    : : .ValueMember = "IndustryReference"
    : : .DataSource = ReferenceNumberAL
    : : End With
    : :
    : : ''THESE ARE THE BINDINGS FOR The Header ON TOP OF FORM
    : :
    : : txtFund.Text = M01Member001Info.FundCode
    : : txtEmployer.Text = M01Member001Info.EmployerCode
    : : txtReturnPeriod.Text = M00HeaderInfo.ReturnPeriod
    : : txtFileVersion.Text = M00HeaderInfo.Version
    : : txtReturnDate.Text = M00HeaderInfo.ReturnDate
    : : txtHeaderDescription.Text = M00HeaderInfo.Comments '& cmbIndustryNumber.SelectedValue
    : :
    : : ''THESE ARE THE BINDINGS FOR Member Detail(M01/002/001)
    : :
    : : txtStatus5.Text = M01Member001Info.StatusCode
    : : txtIdentityNumber3.Text = M01Member001Info.IDNumber
    : : txtDateOfBirth3.Text = M01Member001Info.BirthDate
    : : txtSurname.Text = M01Member001Info.Surname
    : : txtInitials.Text = M01Member001Info.Initials
    : : txtFirstName1.Text = M01Member001Info.FirstName1
    : : txtFirstName2.Text = M01Member001Info.FirstName2
    : : txtFirstName3.Text = M01Member001Info.FirstName3
    : : txtTitle.Text = M01Member001Info.Title
    : : txtLanguage.Text = M01Member001Info.Language
    : : txtGender.Text = M01Member001Info.Gender
    : : txtMaritalStatus.Text = M01Member001Info.MaritalStatus
    : : txtPassportNumber.Text = M01Member001Info.PassportReference
    : : txtNRA.Text = M01Member001Info.PensionAge
    : : txtPopulationGroup.Text = M01Member001Info.PopulationGroup
    : :
    : : ''THESE ARE THE BINDINGS FOR Member Detail(M01/002/002)
    : :
    : : txtStatus6.Text = M01Member002Info.StatusCode
    : : txtIdentityNumber4.Text = M01Member002Info.IDNumber
    : : txtDateOfBirth4.Text = M01Member002Info.BirthDate
    : : txtPostalAddressL1.Text = M01Member002Info.PostalAddress1
    : : txtPostalAddressL2.Text = M01Member002Info.PostalAddress2
    : : txtPostalAddressL3.Text = M01Member002Info.PostalAddress3
    : : txtPostalAddressL4.Text = M01Member002Info.PostalAddress4
    : : txtPostalCode.Text = M01Member002Info.PostalCode
    : : txtContactPhoneNumber.Text = M01Member002Info.ContactPhone
    : :
    : : ''THESE ARE THE BINDINGS FOR Member Detail(M01/002/003)
    : :
    : : txtStatus7.Text = M01Member003Info.StatusCode
    : : txtIdentityNumber5.Text = M01Member003Info.IDNumber
    : : txtDateOfBirth5.Text = M01Member003Info.BirthDate
    : : txtPostalAddressL1b.Text = M01Member003Info.EmployerAddress1
    : : txtPostalAddressL2b.Text = M01Member003Info.EmployerAddress2
    : : txtPostalAddressL3b.Text = M01Member003Info.EmployerAddress3
    : : txtIndustryType.Text = M01Member003Info.IndustryType
    : : txtMagistrateDistrict.Text = M01Member003Info.MagistrateDistrict
    : :
    : : ''THESE ARE THE BINDINGS FOR Member Service(M02/002/001)
    : :
    : : txtStatus8.Text = MemberServiceInfo.StatusCode
    : : txtIdentityNumber6.Text = MemberServiceInfo.IDNumber
    : : txtDateOfBirth6.Text = MemberServiceInfo.BirthDate
    : : txtEngagementDate.Text = MemberServiceInfo.EngagementDate
    : : txtDischargeDate.Text = MemberServiceInfo.DischargeDate
    : : txtLeaveStartDate.Text = MemberServiceInfo.LeaveStartDate
    : : txtLeaveEndDate.Text = MemberServiceInfo.LeaveEndDate
    : : txtReasonCode.Text = MemberServiceInfo.ReasonCode
    : :
    : :
    : [red]*********************************************************[/red]
    :
    : Hello jade:
    :
    : The combobox's text property is populated with the selection made from the drop down list. Have you tried running your process from combobox.text instead of textbox.text? Hope this works for you.
    :
    : btseb

    hi well the things is that i have one textbox called txtRunNumber that
    kick's off the whole process , so i will enter a valid run number and based on this run number it will populate all my other textboxes on my form.Ok so now after all my textboxes are populated my one combobox called cmdIndustryReference is also populatd with a industry reference number that i need to repopulate my form.So what i am saying is that my run number will run and based on my run number there can be lets say 10 industry references , now i wanna click on one of these references to repopulate my textboxes as this is the only way to distinguish bewtween my members.
    :
    :



  • : [b][red]This message was edited by jade1 at 2004-10-26 7:2:12[/red][/b][hr]
    : : : : I have a program that has a textbox that recieves input and based on that input it populates my whole forms textboxes , i now also have a combobox that gets populated in the same , how can i now make it that when i select a value in this combobox that it repopulates the whole form based on the input gotten form my combobox.
    : : : : Please help any suggestions would be great.
    : : : :
    : : : oops my prog looks like this
    : : : HeaderAL = HeaderInfoController.GetHeaderInfo(txtRunNumber.Text)
    : : : M00HeaderInfo = HeaderAL.Item(0)
    : : : MemberDetail1AL = MemberConsInfoController.GetMemberInfo(txtRunNumber.Text)
    : : : M01Member001Info = MemberDetail1AL.Item(0)
    : : : MemberDetail2AL = MemberConsInfoController2.GetMemberInfo2(txtRunNumber.Text)
    : : : M01Member002Info = MemberDetail2AL.Item(0)
    : : : MemberServiceInfoAL = MemberServiceInfoController.GetMemberServiceInfo(txtRunNumber.Text)
    : : : MemberServiceInfo = MemberServiceInfoAL.Item(0)
    : : :
    : : :
    : : : With cmbIndustryNumber
    : : : .DisplayMember = "IndustryReference"
    : : : .ValueMember = "IndustryReference"
    : : : .DataSource = ReferenceNumberAL
    : : : End With
    : : :
    : : : ''THESE ARE THE BINDINGS FOR The Header ON TOP OF FORM
    : : :
    : : : txtFund.Text = M01Member001Info.FundCode
    : : : txtEmployer.Text = M01Member001Info.EmployerCode
    : : : txtReturnPeriod.Text = M00HeaderInfo.ReturnPeriod
    : : : txtFileVersion.Text = M00HeaderInfo.Version
    : : : txtReturnDate.Text = M00HeaderInfo.ReturnDate
    : : : txtHeaderDescription.Text = M00HeaderInfo.Comments '& cmbIndustryNumber.SelectedValue
    : : :
    : : : ''THESE ARE THE BINDINGS FOR Member Detail(M01/002/001)
    : : :
    : : : txtStatus5.Text = M01Member001Info.StatusCode
    : : : txtIdentityNumber3.Text = M01Member001Info.IDNumber
    : : : txtDateOfBirth3.Text = M01Member001Info.BirthDate
    : : : txtSurname.Text = M01Member001Info.Surname
    : : : txtInitials.Text = M01Member001Info.Initials
    : : : txtFirstName1.Text = M01Member001Info.FirstName1
    : : : txtFirstName2.Text = M01Member001Info.FirstName2
    : : : txtFirstName3.Text = M01Member001Info.FirstName3
    : : : txtTitle.Text = M01Member001Info.Title
    : : : txtLanguage.Text = M01Member001Info.Language
    : : : txtGender.Text = M01Member001Info.Gender
    : : : txtMaritalStatus.Text = M01Member001Info.MaritalStatus
    : : : txtPassportNumber.Text = M01Member001Info.PassportReference
    : : : txtNRA.Text = M01Member001Info.PensionAge
    : : : txtPopulationGroup.Text = M01Member001Info.PopulationGroup
    : : :
    : : : ''THESE ARE THE BINDINGS FOR Member Detail(M01/002/002)
    : : :
    : : : txtStatus6.Text = M01Member002Info.StatusCode
    : : : txtIdentityNumber4.Text = M01Member002Info.IDNumber
    : : : txtDateOfBirth4.Text = M01Member002Info.BirthDate
    : : : txtPostalAddressL1.Text = M01Member002Info.PostalAddress1
    : : : txtPostalAddressL2.Text = M01Member002Info.PostalAddress2
    : : : txtPostalAddressL3.Text = M01Member002Info.PostalAddress3
    : : : txtPostalAddressL4.Text = M01Member002Info.PostalAddress4
    : : : txtPostalCode.Text = M01Member002Info.PostalCode
    : : : txtContactPhoneNumber.Text = M01Member002Info.ContactPhone
    : : :
    : : : ''THESE ARE THE BINDINGS FOR Member Detail(M01/002/003)
    : : :
    : : : txtStatus7.Text = M01Member003Info.StatusCode
    : : : txtIdentityNumber5.Text = M01Member003Info.IDNumber
    : : : txtDateOfBirth5.Text = M01Member003Info.BirthDate
    : : : txtPostalAddressL1b.Text = M01Member003Info.EmployerAddress1
    : : : txtPostalAddressL2b.Text = M01Member003Info.EmployerAddress2
    : : : txtPostalAddressL3b.Text = M01Member003Info.EmployerAddress3
    : : : txtIndustryType.Text = M01Member003Info.IndustryType
    : : : txtMagistrateDistrict.Text = M01Member003Info.MagistrateDistrict
    : : :
    : : : ''THESE ARE THE BINDINGS FOR Member Service(M02/002/001)
    : : :
    : : : txtStatus8.Text = MemberServiceInfo.StatusCode
    : : : txtIdentityNumber6.Text = MemberServiceInfo.IDNumber
    : : : txtDateOfBirth6.Text = MemberServiceInfo.BirthDate
    : : : txtEngagementDate.Text = MemberServiceInfo.EngagementDate
    : : : txtDischargeDate.Text = MemberServiceInfo.DischargeDate
    : : : txtLeaveStartDate.Text = MemberServiceInfo.LeaveStartDate
    : : : txtLeaveEndDate.Text = MemberServiceInfo.LeaveEndDate
    : : : txtReasonCode.Text = MemberServiceInfo.ReasonCode
    : : :
    : : :
    : : [red]*********************************************************[/red]
    : :
    : : Hello jade:
    : :
    : : The combobox's text property is populated with the selection made from the drop down list. Have you tried running your process from combobox.text instead of textbox.text? Hope this works for you.
    : :
    : : btseb
    :
    : hi well the things is that i have one textbox called txtRunNumber that
    : kick's off the whole process , so i will enter a valid run number and based on this run number it will populate all my other textboxes on my form.Ok so now after all my textboxes are populated my one combobox called cmdIndustryReference is also populatd with a industry reference number that i need to repopulate my form.So what i am saying is that my run number will run and based on my run number there can be lets say 10 industry references , now i wanna click on one of these references to repopulate my textboxes as this is the only way to distinguish bewtween my members.
    : :
    : :
    :
    :
    :
    :
    [blue]Hey jade:

    It just appears that you need to run an additional query or process based on the selection form the combobox, then re-assign the labels on the from to the new results.[/blue]
Sign In or Register to comment.

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories