网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

vb.net数组函数,vbnet function

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

给你一个简单的示例:

创新互联是一家专业提供平定企业网站建设,专注与成都网站制作、做网站、H5建站、小程序制作等业务。10年已为平定众多企业、政府机构等服务。创新互联专业网站制作公司优惠进行中。

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 如何编写一个可以返回数组的函数(过程)?

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数组函数,vbnet function
网页链接:http://bjjierui.cn/article/dsscjph.html

其他资讯