qb45advr.hlp (Topic list)
Important Notice
The pages on this site contain documentation for very old MS-DOS software, purely for historical purposes. If you're looking for up-to-date documentation, particularly for programming, you should not rely on the information found here, as it will be woefully out of date.
Selected Example Procedures
  Selected Programs   Example Procedures   Contents   Index
──────────────────────────────────────────────────────────────────────────────
Procedures
 
The following programming examples illustrate how to code and combine
small logical components of programs. There are examples for boths SUBs
and functions.
 
Programming example 1 - using functions
 
Corresponding variables must have the same type in both the argument and
parameter lists for a function, as shown in the following example.
In this example, two arguments are passed to the FUNCTION procedure.
The first is an integer specifying the length of the string returned
by the FUNCTION, while the second is a character that is repeated
to make the string.
 
  FUNCTION CharString$(A AS INTEGER, B$) STATIC
    CharString$ = STRING$(A%, B$)
  END FUNCTION
 
  DIM X AS INTEGER
  INPUT "Enter a number (1 to 80): ", X
  INPUT "Enter a character: ", Y$
 
' Print a string consisting of the Y$ character, repeated
' X number of times:
  PRINT CharString$(X, Y$)
  END
 
Sample output
 
Enter a number (1 to 80): 21
Enter a character: #
#####################