listing0308.aspx

asp入门到精通的源代码

<%@Page Language="VB" %>

<script runat="server">
sub Page_Load(obj as object,e as eventargs)
MultiplyNumbers(8,9)

MultiplyNumbers(4,12)

MultiplyNumbers(348,23)
end sub

sub MultiplyNumbers(intA as integer,intB as integer)
Response.Write(intA *intB &