子例程参数传递的问题！
<%@ Page Language="VB" %>
<script runat="server">
Sub Increment(Number as Integer)
Number = Number + 1
End Sub
Sub Page_Load()
Dim A As Integer
A = 1
Increment(A)
Message.Text = A
End Sub
</script>
<html><head></head><body>
<form runat="server">
<asp:Label id="Message" runat="server"></asp:Label>
</form>
</body></html>
代码中用到了一个以整数为参数的子例程，且在该子例程中给参数加了1。然而，当从子例程中使用此子例程时，传递了一个包含数字1的变量，但当显示该变量的内容时，会看到它的值并没有增加1，我想问下为什么没有增加啊？能否详细教我一下，初学者！
