vb.net中的返回数组 vb 函数返回

vb函数返回值是数组如何赋值给数组,我定义的函数的返回值是个数组,想返回给另一个数组好调用

VB规定数组作为参数，只能以传址方式进行调用，也就是自动传递给实际参数的数组了。

相关问答

Q1: vb函数调用返回数组值

Private Sub Form_Load()

Dim i As Integer

Dim returnarray() As Integer

Me.AutoRedraw = True '持久图形的输出

i = 1

returnarray = arrayfunction(i)

Print returnarray(1)

End Sub

Public Function arrayfunction(i As Integer) As Integer()

Dim x(2) As Integer

x(0) = i

x(1) = i + 1

arrayfunction = x '把x赋值给函数arrayfunction

End Function

Q2: vb 输出自定义函数返回的数组值

楼上列位思路都很正确

vb.net中的返回数组你看vb.net中的返回数组你的aa函数：Function aa() As Integer，返回值是Integer变量，而不是Integer数组呀，

所以你dim d 然后d= aa的话，d也是Integer变量，但是dovar的参数要求是Integer数组，

于是VB就报错了呀。

VB里面函数返回值是数组的vb.net中的返回数组我不知道行不行，反正我们都不这么干，直接把参数设成byref不就行了嘛，所以人家帮你改成了Function aa(dd() As Integer) As Boolean，对吧

Q3: VB.net 如何编写一个可以返回数组的函数（过程）？

public function createstringarr() as string()

return new string(){"d1","d2","d3","d4"}

end function

Q4: vb.net 返回一个数组的函数

public function createstringarr() as string()

return new string(){"d1","d2","d3","d4"}

end function

Q5: vb.net中返回一个数组的函数的问题

给你一个简单的示例：

Option Explicit

Private Function GetRndInt() As Integer()

' 返回一个 Integer类型的数组

Dim i As Long, aTemp() As Integer

Randomize

ReDim aTemp(15)

For i = 0 To 15

aTemp(i) = Rnd() * 500

Next

GetRndInt = aTemp

End Function

Private Sub Command1_Click()

Dim aTemp() As Integer

Dim i As Long

Me.Cls

aTemp = GetRndInt

Print "随机产生的数据为："

For i = 0 To UBound(aTemp)

Print i + 1, aTemp(i)

Next

End Sub

运行效果：

关于vb.net中的返回数组和vb 函数返回的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。