Keskustelu: Ohjelmointikysymykset: QB: Aliohjelmat

Kuinka saan muuttujien arvot aliohjelmaan?
Olen antanut Muuttujille arvot itse koodissa mutta aliohjelmassa ne on 0.

Esim.

Jos muuttujalla NUM on arvo 5 itse ohjelmassa niin
aliohjelmassa komennolla
PRINT NUM
aliohjelma tulostaa 0

SHARED auttaa:

DIM SHARED foo AS INTEGER
foo = 5

...

SUB bar
  PRINT foo ' tulostaa 5
END SUB

Minä ainakin käytän "COMMON SHARED integer", en tiedä sitten kumpi on parempi.

Se on minun mielestä ihan sama kumpaa käyttää.
Joko COMMON SHARED num AS INTEGER tai DIM SHARED num AS INTEGER.

DIM SHARED riittää kyllä tällaiseen tapaukseen. COMMON SHARED määrittää muuttujan näkyvyysalueen vielä laajemmaksi: muuttuja on käytettävissä muissa ohjelmamoduuleissa tai CHAIN-komennon avulla linkitetyissä ohjelmissa.