<%@Page Language="VB" %>
<script runat="server">
sub Page_Load(obj as object,e as eventargs)
Response.Write(MultiplyNumbers(8,9)&"<br>")
Response.Write(MultiplyNumbers(4,12)&"<br>")
Response.Write(MultiplyNumbers(38,23)&"<br>")
end sub
function MultiplyNumbers(intA as integer,intB as integer) _
as Integer
Return intA *intB
end function
</script>
<html><body>
</body></html>
|