本页主题: ASP编程问题:怎么把数组作为子过程参数来传递? 打印 | 加为IE收藏 | 复制链接 | 收藏主题 | 上一主题 | 下一主题

bbsriver
杀人游戏MVP勋章I 杀人游戏MVP勋章II
级别: 管理员


精华: 52
发帖: 17392
威望: 8730 点
金钱: 7074 静电币
支持度: 11401 点
在线时间:13725(小时)
注册时间:2002-11-21
最后登录:2016-12-22

 ASP编程问题:怎么把数组作为子过程参数来传递?

前面定义了一个动态数组myArr()

set tempRs=Server.CreateObject("Adodb.Recordset")
tempRs.open "select * from sheet1 where id=123",conn,1,1  '读取Sql数据库
    dim myArr()  '定义数组
    Redim myArr(tempRs.recordcount-1)  '数组元素个数等于数据库中的记录条数
    i=0
        do while not tempRS.eof
            myArr(i)=tempRS("name")  '把数据库中的记录逐条赋值给数组的每个元素
            tempRS.movenext
            i=i+1
        loop
tempRS.close
set tempRS=nothing

后面有个子过程,假设名字就叫sub deal_myArr,需要调用这个数组当参数。语句应该怎么写呢?就像普通变量当参数一样写可以吗?
Posted: 2010-11-15 14:46 | [楼 主]
galilette
级别: 嘉宾


精华: 30
发帖: 2139
威望: 1382 点
金钱: 0 静电币
支持度: 0 点
在线时间:3011(小时)
注册时间:2002-05-01
最后登录:2015-05-25

 

Posted: 2010-11-15 15:42 | 1 楼
galilette
级别: 嘉宾


精华: 30
发帖: 2139
威望: 1382 点
金钱: 0 静电币
支持度: 0 点
在线时间:3011(小时)
注册时间:2002-05-01
最后登录:2015-05-25

 

google搜索 passing dynamic array as parameter
Posted: 2010-11-15 15:42 | 2 楼
天堂有令
☆圣风
级别: 嘉宾


精华: 0
发帖: 4347
威望: 2769 点
金钱: 69140 静电币
支持度: 42 点
在线时间:2889(小时)
注册时间:2006-03-31
最后登录:2014-07-14

 

似乎和ASP么啥关系,是不是VB函数参数传数组的问题?

网上抄了段代码,据说调试能过
Copy code
Private  Sub  Command1_Click()
Dim  x(9)  As  Integer
Dim  i  As  Integer

For  i  =  0  To  9
    x(i)  =  i
Next

    Call  iArr(x)

End  Sub


Private  Function  iArr(arr()  As  Integer)  As  Integer
   
  Dim  i  As  Integer

  For  i  =  0  To  UBound(arr)
        Debug.Print  arr(i)
  Next
   
End  Function
Posted: 2010-11-15 16:28 | 3 楼
飞甩鸡毛2
赚狗币还是亏狗币的一个月
级别: 光明使者


精华: 0
发帖: 2155
威望: 2085 点
金钱: 155 静电币
支持度: 0 点
在线时间:2550(小时)
注册时间:2009-02-01
最后登录:2017-11-15

 

你的数组定义在哪个区间啊,是不是可以对那个子过程可用
Posted: 2010-11-16 23:53 | 4 楼
bbsriver
杀人游戏MVP勋章I 杀人游戏MVP勋章II
级别: 管理员


精华: 52
发帖: 17392
威望: 8730 点
金钱: 7074 静电币
支持度: 11401 点
在线时间:13725(小时)
注册时间:2002-11-21
最后登录:2016-12-22

 

可用。子过程放在#including当中。
Posted: 2010-11-17 09:23 | 5 楼
bbsriver
杀人游戏MVP勋章I 杀人游戏MVP勋章II
级别: 管理员


精华: 52
发帖: 17392
威望: 8730 点
金钱: 7074 静电币
支持度: 11401 点
在线时间:13725(小时)
注册时间:2002-11-21
最后登录:2016-12-22

 

嗯,我终于看明白上面几楼给的几个例子了……
Posted: 2010-12-02 22:47 | 6 楼
帖子浏览记录 版块浏览记录
狗狗静电BBS - wwW.DoGGiEhoMe.CoM » 电脑全方位 Computer Guide

沪ICP备05008186号
Powered by PHPWind Styled by MagiColor