Welcome to SPN

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

Sign Up Now!

Default to No

Discussion in 'Information Technology' started by Bob, Jul 28, 2006.

Tags:
  1. Bob

    Bob
    Expand Collapse
    Guest

    How do I change the default to "No"

    Dim nRtnValue As Integer
    nRtnValue = MsgBox("Are you sure you want to Distrubte All Invoices ?",
    vbCritical + vbYesNo, "Distribute all Invoices")
    If nRtnValue = vbYes Then
    DoCmd.Hourglass True

    Thanks in advance.........Bob Vance
     
  2. Loading...


  3. Rob Parker

    Rob Parker
    Expand Collapse
    Guest

    .... vbCritical + vbYesNo + vbDefaultButton2 ...

    Rob

    "Bob" <xxx@xx.xx> wrote in message news:e7fjif$19c$1@lust.ihug.co.nz...
    >
    > How do I change the default to "No"
    >
    > Dim nRtnValue As Integer
    > nRtnValue = MsgBox("Are you sure you want to Distrubte All Invoices ?",
    > vbCritical + vbYesNo, "Distribute all Invoices")
    > If nRtnValue = vbYes Then
    > DoCmd.Hourglass True
    >
    > Thanks in advance.........Bob Vance
    >
     
  4. Bob

    Bob
    Expand Collapse
    Guest

    BRILLIANT Rob..........Thanks

    "Rob Parker" <NOSPAMrobpparker@optusnet.com.au.REMOVETHIS> wrote in message
    news:u9JlcCnlGHA.3632@TK2MSFTNGP03.phx.gbl...
    > ... vbCritical + vbYesNo + vbDefaultButton2 ...
    >
    > Rob
    >
    > "Bob" <xxx@xx.xx> wrote in message news:e7fjif$19c$1@lust.ihug.co.nz...
    >>
    >> How do I change the default to "No"
    >>
    >> Dim nRtnValue As Integer
    >> nRtnValue = MsgBox("Are you sure you want to Distrubte All Invoices ?",
    >> vbCritical + vbYesNo, "Distribute all Invoices")
    >> If nRtnValue = vbYes Then
    >> DoCmd.Hourglass True
    >>
    >> Thanks in advance.........Bob Vance
    >>

    >
    >
     

Share This Page