vb.net数组函数 vb 遍历数组

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

public function createstringarr() as string()

创新互联建站始终致力于在企业网站建设领域发展。秉承“创新、求实、诚信、拼搏”的企业精神，致力为企业提供全面的网络宣传与技术应用整体策划方案，为企业提供包括“网站建设、响应式网站建设、手机网站建设、微信网站建设、小程序制作、商城网站建设、平台网站建设秉承"和谐、参与、激情"的文化，与客户和合作伙伴齐心协力一起成长，共同发展。

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

end function

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

运行效果：

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

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

直接写过程代码

End Sub))