VB里面定义function函数设的参数到底有什么用 5
1个回答
展开全部
可以用啊
比如
Public Function sort(ByRef a() As Integer)
Dim temp As Integer
Dim x As Integer
x = UBound(a)
For i = 1 To x
For j = 1 To x - i
If a(j) > a(j + 1) Then
temp = a(j + 1)
a(j + 1) = a(j)
a(j) = temp
End If
Next j
Next i
Return 0
End Function
这个函数
引用的时候直接代入一个数组就可以对其进行排序了
比如
Public Function sort(ByRef a() As Integer)
Dim temp As Integer
Dim x As Integer
x = UBound(a)
For i = 1 To x
For j = 1 To x - i
If a(j) > a(j + 1) Then
temp = a(j + 1)
a(j + 1) = a(j)
a(j) = temp
End If
Next j
Next i
Return 0
End Function
这个函数
引用的时候直接代入一个数组就可以对其进行排序了
追问
可这两个程序我都要重新定义a,b才能用
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
