رمز محدد: | <٪ Sub Testmain () DIM A: A = 5 استدعاء testby (أ) الرد. الكتابة أ نهاية الفرعية testby الفرعي (Byval t) t = t+1 نهاية الفرعية استدعاء testmain () ٪> | <٪ Sub Testmain () DIM A: A = 5 استدعاء testby (أ) الرد. الكتابة أ نهاية الفرعية testby الفرعي (byref t) t = t+1 نهاية الفرعية استدعاء testmain () ٪> |