سلام خدمت دوستان
می خواستم در QB گرافیک کار کنم وقتی از دستور screen 12 استفاده می کنم صفحه سیاه میشه و هیچ کدوم از دستورات گرافیکی که در متن برنامه هست ( مثل رسم دایره ووو) کار نمیکنه. علت چیه ؟ لطفا راهنمایی بفرمایید .
ممنون![]()
DIM r AS INTEGER, i AS INTEGER
SCREEN 12
r = 3
FOR i = 1 TO 14
r = r + r / 3
CIRCLE (320, 240), r, i + 1
NEXT
SLEEP