VBS中函数返回数组值是怎么做的,希望能给举个例子。谢谢
下边是个简单的例子,示例如何在Function过程中返回数组x=GetArr(9) '调用getarr过程返回10(0-9)个元素的数组,并赋值给xFor i = 0 To UBound(x) '枚举刚才返回的数组 arrstr=arrstr & "GetArr(" & i & ")=" & x(i) & vbCrLfNextMsgbox arrstr '显示结果Function GetArr(x) ReDim f(x) '动态根据变量调整数组大小 For i = 0 To x f(i)= rnd '生成随机变量 NextGetArr=f '数组赋给返回值End Function
不能返回数组
Private Function GetArr(x)Dim f(0 To 9) As IntegerFor i = 0 To 9f(i) = i + 5Next iGetArr = f(x)End Function
答:桁架中内力为零的杆件称为零杆。如上例的杆6。零杆的判断对桁架内力的计算具有积极的意义。利用节点法不难得到判断零杆的结论: 1. 一节点上有三根杆件,如果节点上无...详情>>
答:我建议你去--天下网吧联盟 这里面都是网吧业主和网管交流的论坛,你可以自己注册一个用户进去看看,你可以和他们交流也可以寻求他们的帮助,我想没有你解决不了的问题,...详情>>
答:格式化文本区域的段落标记,用于规定文本和层的属性和位置等。比如: 新浪网 用来规定 新浪网 这三个字居中显示。 文本中心(CENTER)、左(LEFT)或右(R...详情>>