标题:取其他函数里某个变量的值
只看楼主
jiangyawen
Rank: 1
等 级:新手上路
帖 子:49
专家分:0
注 册:2007-8-31
 问题点数:0 回复次数:8 
取其他函数里某个变量的值
大家帮帮我,我是菜鸟


public sub xyz()
If x <= List.ListCount Then
x=x+1
end if
Call insert
end sub

Public Sub insert()
用什么语句可以取得上面x执行完if后的值
end sub
搜索更多相关主题的帖子: 变量 
2007-09-14 14:41
slore
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1108
专家分:0
注 册:2005-7-1
得分:0 
定义x为模块级别的变量……
或者全局类型

快上课了……
2007-09-14 14:45
jiangyawen
Rank: 1
等 级:新手上路
帖 子:49
专家分:0
注 册:2007-8-31
得分:0 
又是你,呵呵,我试试哈

2007-09-14 14:46
jiangyawen
Rank: 1
等 级:新手上路
帖 子:49
专家分:0
注 册:2007-8-31
得分:0 
那我直接就把执行x的函数变成public可以不?

2007-09-14 14:47
simpson
Rank: 3Rank: 3
等 级:论坛游民
威 望:7
帖 子:863
专家分:17
注 册:2006-11-16
得分:0 

Public Sub xyz(ByRef x As Integer)
If x <= List.ListCount Then
x=x+1
End if
Call insert
End sub

Public Sub insert()
Dim y As Integer
Call xyz(y)
Print y '//得到你要得结果
End sub


全国最大的 Java专业电子书免费分享[url]http:///in.asp?id=xrmao[/url]
2007-09-14 14:54
slore
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1108
专家分:0
注 册:2005-7-1
得分:0 

Public Sub xyz()
If x <= List.ListCount Then
x = x + 1
End If
Call
insert(x)
End Sub

Public Sub insert(y As Integer)
Print y
End Sub


快上课了……
2007-09-14 15:04
jiangyawen
Rank: 1
等 级:新手上路
帖 子:49
专家分:0
注 册:2007-8-31
得分:0 

如果xyz是个普通的函数就可以
但如果xyz是个按钮的click事件呢?编译就说过程声明与同名事件或过程描述不匹配
这可怎么办啊?


2007-09-14 15:16
simpson
Rank: 3Rank: 3
等 级:论坛游民
威 望:7
帖 子:863
专家分:17
注 册:2006-11-16
得分:0 


两个都是控件的事件

就将x定义全局变量,或者模块级变量

[此贴子已经被作者于2007-9-14 15:24:03编辑过]


全国最大的 Java专业电子书免费分享[url]http:///in.asp?id=xrmao[/url]
2007-09-14 15:21
multiple1902
Rank: 8Rank: 8
等 级:贵宾
威 望:42
帖 子:4881
专家分:671
注 册:2007-2-9
得分:0 

过程内的变量是不公开也是不可能公开的。可以尝试让别的变量公开然后进行修改。

2007-09-14 16:46



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-169947-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.341451 second(s), 9 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved