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

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


精华: 52
发帖: 17392
威望: 8730 点
金钱: 7074 静电币
支持度: 19001 点
在线时间: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 点
在线时间:3012(小时)
注册时间:2002-05-01
最后登录:2019-03-12

 

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


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

 

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


精华: 0
发帖: 4348
威望: 2770 点
金钱: 0 静电币
支持度: 42 点
在线时间:2889(小时)
注册时间:2006-03-31
最后登录:2019-04-04

 

似乎和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
发帖: 2157
威望: 2087 点
金钱: 2564 静电币
支持度: 0 点
在线时间:2555(小时)
注册时间:2009-02-01
最后登录:2020-12-18

 

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


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

 

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


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

 

嗯,我终于看明白上面几楼给的几个例子了……
Posted: 2010-12-02 22:47 | 6 楼
miwaep
级别: 新手上路


精华: 0
发帖: 10
威望: 11 点
金钱: 101 静电币
支持度: 0 点
在线时间:1(小时)
注册时间:2023-01-07
最后登录:2023-04-22

 

梦想是一个"双面人":在年少的时候,它离人们那么远,那么渺茫,那么不真实;而在壮年时,它离人们那么近,那么清晰,那么令人振奋。因为,壮年时的人们取得了成就,已经超越了自我,而在那成功的背后,洒下的是数不尽的汗滴与血泪。
幸运飞艇走势图福彩双色球走势图幸运时时彩走势图
Posted: 2023-01-07 10:25 | 7 楼
帖子浏览记录 版块浏览记录
狗狗静电BBS - wwW.DoGGiEhoMe.CoM » 电脑全方位 Computer Guide

沪ICP备05008186号
Powered by PHPWind Styled by MagiColor