Código específico: | <% Subestmain () Dim a: a = 5 Ligue para o testby (a) Response.Write a Final sub Subestby (byval t) T = t+1 Final sub Ligue para testmain () %> | <% Subestmain () Dim a: a = 5 Ligue para o testby (a) Response.Write a Final sub Subestby (byref t) T = t+1 Final sub Ligue para testmain () %> |