Foxtable(狐表)用户栏目专家坐堂 → 内部函数的参数不可以是集合或者数组吗?


  共有3068人关注过本帖树形打印复制链接

主题:内部函数的参数不可以是集合或者数组吗?

帅哥哟,离线,有人找我吗?
东坡一剑
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:366 积分:2478 威望:0 精华:0 注册:2013/1/13 23:43:00
内部函数的参数不可以是集合或者数组吗?  发帖心情 Post By:2015/1/12 21:42:00 [只看该作者]

想把一个排序算法封装成内部函数,代码如下,但是没通过,请教!

方案A:

Dim lst As new List(Of Integer) = Args(0)
Dim n As Integer = lst.count
Dim i,j,temp As Integer

For i  = 0 To n -1
    For j  = 0 To n -1-i
        If lst(j) > lst(j+1) Then
            temp = lst(j)
            lst(j) = lst(j+1)
            lst(j+1) = temp
        End If
    Next
Next

方案B:

Dim n As Integer = Args(1)
Dim lst(n) As Integer = Args(0)
Dim i,j,temp As Integer

For i  = 0 To n -1
    For j  = 0 To n -1-i
        If lst(j) > lst(j+1) Then
            temp = lst(j)
            lst(j) = lst(j+1)
            lst(j+1) = temp
        End If
    Next
Next
[此贴子已经被作者于2015-1-12 21:43:37编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/12 21:45:00 [只看该作者]

1、

 

Dim lst As List(Of Integer) = Args(0)
Dim n As Integer = lst.count
Dim i,j,temp As Integer


For i  = 0 To n -1
    For j  = 0 To n -1-i
        If lst(j) > lst(j+1) Then
            temp = lst(j)
            lst(j) = lst(j+1)
            lst(j+1) = temp
        End If
    Next
Next


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/12 21:46:00 [只看该作者]

2、

 

Dim lst() As Integer = Args(0)
Dim n As Integer = lst.length
Dim i,j,temp As Integer


For i  = 0 To n -1
    For j  = 0 To n -1-i
        If lst(j) > lst(j+1) Then
            temp = lst(j)
            lst(j) = lst(j+1)
            lst(j+1) = temp
        End If
    Next
Next


 回到顶部
帅哥哟,离线,有人找我吗?
东坡一剑
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:366 积分:2478 威望:0 精华:0 注册:2013/1/13 23:43:00
  发帖心情 Post By:2015/1/12 21:58:00 [只看该作者]

用New和不用New的区别是什么呢?
函数又该return 什么呢?


[此贴子已经被作者于2015-1-12 21:58:43编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/12 21:59:00 [只看该作者]

以下是引用东坡一剑在2015-1-12 21:58:00的发言:
用New和不用New的区别是什么呢?

 

new 就是给变量赋值了


 回到顶部