Das deutsche QBasic- und FreeBASIC-Forum

[brundie]

DECLARE SUB MySub ()

DIM SHARED x AS INTEGER
DIM y AS INTEGER

x = 10
y = 5
PRINT "x ist:";x
PRINT "y ist:";y
PRINT

MySub

SUB MySub
PRINT "x ist: "; x
PRINT "y ist: "; y
END SUB

muss es richtig heißen! Es fehlte ein SUB!

Danke

[Mao]

Danke für die Mitarbeit, brundie! Der Fehler ist jetzt behoben.

In Zukunft kannst du auch gleich den dafür bereits erstellten Thread benutzen: FB-Referenz Bugreports hier rein.

Grüße,
Mao
_________________
Eine handvoll Glück reicht nie für zwei.
--