锐客网

  1. 首页 > 生活百科 > it技术 > >

vb.net编写数组函数 vbscript 数组

IT技术数组

vb.net 编写一个函数注意：参数为动态数组；
Private Function MyF(ByRef d() As Integer)
ReDim d(4, 13) As Integer
Dim i As Integer
Dim j As Integer
Dim n As Integer
Dim MyNum(4) As Integer
For i = 1 To 4
MyNum(i) = 0
Next i
Randomize
【vb.net编写数组函数 vbscript 数组】For i = 1 To 4
For j = 1 To 13
n = Int(Rnd * 41)
Do While MyNum(n) = 13
n = Int(Rnd * 41)
Loop
d(i, j) = n
MyNum(n) = MyNum(n)1
Next j
Next i
End Function
vB.net语言编写N个数字数组排序可自定义数组长度的Dim d() As Integer
Dim n As Integer
Dim i As Integer
Dim j As Integer
Dim T As Integer
n = Val(InputBox("请输入n，确定数组的元素个数"))
ReDim d(n)
'用随机函数生成正整数数组
Randomize
For i = 1 To n
d(i) = Int(Rnd * 1001)
Next i
'输出
Print
For i = 1 To n
Print d(i),
Next i
'从小到大排序
For i = 1 To n - 1
For j = i1 To n
If d(i)d(j) Then
T = d(i)
d(i) = d(j)
d(j) = T
End If
Next j
Next i
'输出
Print
For i = 1 To n
Print d(i),
Next i
vb.net 函数或者过程作为数组thr_test(i) = New System.Threading.Thread(New System.Threading.ParameterizedThreadStart(Sub()
直接写过程代码
End Sub))
VB.net 如何编写一个可以返回数组的函数（过程）？public function createstringarr() as string()
return new string(){"d1","d2","d3","d4"}
end function
关于vb.net编写数组函数和vbscript 数组的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

    推荐阅读


    上一篇：html5公共页面提取，如何从html提取数据

    下一篇：电脑文件更换日期怎么修改，电脑文件修改日期怎么改