vb.net数组的方法,vba遍历数组

VB.net 数组的使用

Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click

创新互联公司专业为企业提供凤翔网站建设、凤翔做网站、凤翔网站设计、凤翔网站制作等企业网站建设、网页设计与制作、凤翔企业网站模板建站服务，十余年凤翔做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。

Dim a(15) As Integer

Dim i As Integer

Dim tmpStr As String

Randomize()

For i = 0 To a.Length - 1

a(i) = Int(100 * Rnd() + 1)

Next

TextBox1.Text = ""

tmpStr = ""

For i = 0 To a.Length - 1

tmpStr = tmpStr a(i) " "

'在Textbox中每行显示5个

If (i + 1) Mod 5 = 0 Then

TextBox1.AppendText(tmpStr vbCrLf)

tmpStr = ""

End If

Next

End Sub

vb.net数组

Dim str As String = "", temp, n As Integer

Dim str1 As String = "12,45,2,9,41,31,66,83,2,1,-9,-91,-21"

Dim a() As String = Split(str1, ",")

For i = 1 To UBound(a) Step 1

a(i) = Val(a(i))

Next

temp = 0

n = 0

For i = 1 To UBound(a)

If a(i)  temp Then

temp = a(i)

End If

If a(i)  0 Then

n = n + 1

End If

Next

str = str  "正数的个数为 "  n

str = str  "最大元素的下标为 "

For i = 1 To UBound(a)

If a(i) = temp Then

str = str  i  " "

End If

Next

TextBox6.Text = str

VB中数组怎么定义

是这么定义的：

数组中的第一个元素的下标称为下界，最后一个元素的下标称为上界，其余的元素连续地分布在上下界之间，且数组在内存中也是用连续的区域来存储的，所以数组每维的长度不能超过Long数据类型的最大值，即264—1=263。

把VB．NET数组当作一个对象来处理，就意味着数组类型是单个引用类型，数组变量包括指向构成数组元素、数组维和数组长度等数据的指针，数组之间互相赋值但仅仅是在相互复制指针，数组继承了System名字空间的Array类。

VB．NET中的数组有两种类型：定长数组和动态数组。

扩展资料：

1、数组的使用

在’VB 6．0中，能够用For Each来循环遍历一个数组。

比如：

Dim x As Integer

F0r Each x In arrayl

Console．WriteLine(x)

Next 

2、在VB．NET中能够使用For循环和数组长度来遍历一个数组。

比如：

Dim i As工nteger   

F0r i=0 T0  (arrayl．Length-1)

（此处空一行）

Console．WriteLine(arrayl(1)J

Next i

vb.net 数组的定义方法

1、vb.net的

数组定义与变量定义差不多。可以用

dim

来定义

比如:

dim

a（100）

as

integer。

也可以不定义下标

在程序中

用

redim

来定义。

如：

dim

a()

as

integer

'

'

redim

a(100)

2、vb.net中定义数组可以直接赋值。

如：

dim

a()

as

integer

={1,

2,

3,4}