<%@ Page Language="VB" %>
sub Page_Load(Sender as object,e as EventArgs)
MultiplyNumbers(8,9)
MultiplyNumbers(4,12)
MultiplyNumbers(38,23)
end sub
sub MultiplyNumbers(intA as integer,intB as integer)
Response.Write(intA *intB &"
")
end sub