Cho đoạn lệnh sau, xác định chức năng của đoạn lệnh?sub Page_Load(obj as object, e as eventArgs)dim strVariable as string'set up some cookie variablesResponse.Cookies("MyASPNETPage")(

Cho đoạn lệnh sau, xác định chức năng của đoạn lệnh?

sub Page_Load(obj as object, e as eventArgs)

dim strVariable as string

'set up some cookie variables

Response.Cookies("MyASPNETPage")("Username") = "Sinhvien"

Response.Cookies("MyASPNETPage")("Password") = "TakeMeHome"

Response.Cookies("MyASPNETPage")("Preference") = "800x640"

Response.Cookies("MyASPNETPage")("UserAgent") = _

Request.ServerVariables("HTTP_USER_AGENT")

for each strVariable in Response.Cookies("MyASPNETPage").Values

lblCookies.Text += "" & strVariable & ": " & _

Request.Cookies("MyASPNETPage")(strVariable) & "

"

next

end sub