Q31822: Structured Programming in QuickBASIC - Subprograms; SHARED

Article: Q31822
Product(s): See article
Version(s): 1.00 1.01 1.02 2.00 2.01 3.00 4.00 4.00b 4.50
Operating System(s): MS-DOS
Keyword(s): ENDUSER | B_BasicCom | mspl13_basic
Last Modified: 30-JUN-1989

Microsoft QuickBASIC for MS-DOS provides structured programming
features that exceed BASICA's FOR/NEXT, WHILE/WEND, and GOSUB
statements. True subprograms with scalar and array parameters are easy
to use in QuickBASIC. All variables in subprograms are local unless
they are declared as shared-global variables in the current module, as
shown in the following example:

         bubbles = 10
         CALL MySort (howbig, Array())     'sort Array()
         END

         SUB MySort (limit, Sieve()) STATIC    'Sieve is 1-dim
         SHARED bubbles               'global variable
           ...  ' MySort subprogram body
         END SUB

Note that the SHARED statement does not share variables across
separately-compiled modules, it only shares with the main program
level ("module level") of the current module. To share variables
across separately-compiled modules, you must use the COMMON SHARED
statement.

THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY.

Copyright Microsoft Corporation 1986-2002.