Welcome to SPN

Register and Join the most happening forum of Sikh community & intellectuals from around the world.

Sign Up Now!

Make fields Visible IF Check38 = 1

Discussion in 'Information Technology' started by cw via AccessMonster.com, Nov 1, 2005.

  1. cw via AccessMonster.com

    cw via AccessMonster.com
    Expand Collapse
    Guest

    I have this code behind my Option box frame:
    ------------------------------------------------
    Private Sub Frame35_AfterUpdate()
    If MsgBox("Have you verified this change with the Customer?", vbYesNo,
    "Confirm") <> vbYes Then
    Cancel = True
    Me.Undo
    End If
    End Sub
    ----------------------------------------------

    I need to add the following code to Enable certain fields when a user chooses
    Yes (Check38) in my Option group.

    Me.Combo49.Enabled = True
    Me.CardholdersNameAuPy.Enabled = True
    Me.CardholdersName.Enabled = True
    Me.Combo57.Enabled = True
    Me.Combo59.Enabled = True
    Me.CreditCardAuthorizationNumberAuPy.Enabled = True

    Thanks for your help on this one,
    cw


    --
    Message posted via http://www.accessmonster.com
     
  2. Loading...

    Similar Threads Forum Date
    US Defense Department Hiring Resident Aliens in Medical and Language Fields Business, Lifestyle & Leisure Dec 6, 2008
    Sikh News Women more vulnerable to cancer in Punjab's cotton fields (New Kerala) Breaking News Apr 1, 2008
    Sikh News Women more vulnerable to cancer in Punjab's cotton fields (Calcutta News) Breaking News Apr 1, 2008
    Sikh News Punjab's killing fields (The Times of India) Breaking News Feb 24, 2008
    Sikh News MQM fields 218 candidates in Punjab (The Pakistan Link) Breaking News Feb 1, 2008

  3. Allan Murphy

    Allan Murphy
    Expand Collapse
    Guest

    Try this

    Private Sub Frame35_AfterUpdate()

    If MsgBox("Have you verified this change with the Customer?", vbYesNo,
    "Confirm") <> vbYes Then
    Cancel = True
    Me.Undo
    else
    Me.Combo49.Enabled = True
    Me.CardholdersNameAuPy.Enabled = True
    Me.CardholdersName.Enabled = True
    Me.Combo57.Enabled = True
    Me.Combo59.Enabled = True
    Me.CreditCardAuthorizationNumberAuPy.Enabled = True
    End If

    End Sub

    --
    Allan Murphy

    Email: allanmurphy@unwired.com.au
    "cw via AccessMonster.com" <u9891@uwe> wrote in message
    news:56ae32fd18fa3@uwe...
    > I have this code behind my Option box frame:
    > ------------------------------------------------
    > Private Sub Frame35_AfterUpdate()
    > If MsgBox("Have you verified this change with the Customer?", vbYesNo,
    > "Confirm") <> vbYes Then
    > Cancel = True
    > Me.Undo
    > End If
    > End Sub
    > ----------------------------------------------
    >
    > I need to add the following code to Enable certain fields when a user

    chooses
    > Yes (Check38) in my Option group.
    >
    > Me.Combo49.Enabled = True
    > Me.CardholdersNameAuPy.Enabled = True
    > Me.CardholdersName.Enabled = True
    > Me.Combo57.Enabled = True
    > Me.Combo59.Enabled = True
    > Me.CreditCardAuthorizationNumberAuPy.Enabled = True
    >
    > Thanks for your help on this one,
    > cw
    >
    >
    > --
    > Message posted via http://www.accessmonster.com
     

Share This Page