vb_net函数库数组 vb中数组怎么定义

vb.net 函数或者过程作为数组

thr_test(i) = New System.Threading.Thread(New System.Threading.ParameterizedThreadStart(Sub()

成都创新互联致力于互联网网站建设与网站营销，提供成都做网站、网站建设、网站开发、seo优化、网站排名、互联网营销、小程序制作、公众号商城、等建站开发，成都创新互联网站建设策划专家，为不同类型的客户提供良好的互联网应用定制解决方案，帮助客户在新的全球化互联网环境中保持优势。

直接写过程代码

End Sub))

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

public function createstringarr() as string()

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

end function

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

运行效果：