Subject About the returning value of MsgBox
From Ivan Benttini <benttini2@gmail.com>
Date Wed, 07 Aug 2019 10:05:29 -0400
Newsgroups dbase.getting-started

here is the code of my form:

function PUSHBUTTON18_onClick
      // SPECIAL NOTES ...Check to see if you have permission to Open this private INFORMATION.
      // # 4 means YES-NO  for MSGBOX() returns.  

      local cAnswer
      //cAnswer = " "
      cAnswer = msgBox("Enter special OPTION to view private information","Are you sure?",4+32)
    
      ?cAnswer
      
      
      DO CASE
         CASE cAnswer = 6  // returning by clicking YES
              form.rowset.editor1.visible = true          // equals YES to show EDITOR1 information by it becaming visible.
              
                            
         CASE cAnswer = 7  // returning by clicking NO                                
              form.rowset.editor1.visible = false         // DO NOT show EDITOR1 content info. end continue invisible.
      ENDCASE                                             //
      return