子例程参数传递的问题！ - VB.NET论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → .NET专区 → 『 VB.NET论坛』 → 子例程参数传递的问题！

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 667 人关注过本帖

标题：子例程参数传递的问题！

只看楼主加入收藏

lanyong_he

等　级：新手上路
帖　子：211
专家分：0
注　册：2006-7-12

楼主

问题点数：0 回复次数：2

子例程参数传递的问题！

<%@ 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，我想问下为什么没有增加啊？能否详细教我一下，初学者！

搜索更多相关主题的帖子: 例程　参数　 Sub　Increment　

2007-01-08 14:31

Kendy123456

等　级：贵宾
威　望：62
帖　子：2720
专家分：0
注　册：2007-1-3

第 2 楼

得分:0

你用了一个sub，sub是不返回结果的 vb默认的是参数是byval形式除非你显氏使用byref指定。
也就是说要么你定义 sub increment (byref number as integer) 这时候传递的是number在内存中的地址（也就是A）
要么定义成函数 function increment (number as integer) as integer
number+=1
return number
end function