vb 数组,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中数组有3种形式：静态数组 动态数组 和控件数组
1 静态数组
Public | Private | Static | Dim 数组名 （下标 [ 下标]）[as 类型]
例 Dim s(2) as integer
2 动态数组
这类数组指声明数组时未给出数组的大小，使用时，随时用ReDim语句重新指出数组的大小。
首先像静态数组那样，只是不指出下标
然后要使用数组时，用ReDim指出
例 dim a() as integer
........
ReDim a (1 to 10) 重新定义数组 a 为一维数组，有10个元素
3 控件数组
是指一组有共同名称和类型的一个或多个控件，共享同样的事件过程

1.基本概念数组：是同类型变量的一个有序的集合。
如：A（1 To
100），表示一个包含100个数组元素的名为A的数组。

2.数组元素：
即数组中的变量。用下标表示数组中的各个元素。

表示方法：数组名（P1，P2，……）其中P1、P2表示元素在数组中的排列位置，称为“下标”。

如：A（3，2）代表二维数组A中第3行第2列上的那个元素。

3.数组维数：
由数组元素中下标的个数决定，一个下标表示一维数组，二个下标表示二维数组。 VB中有一维数组、二维数组、……最多60维数组。

通过循环的方式比较这个数是否和当前的数组元素一致。 1、定义数组 dim a(3) as integer '定义一个数组(有四个数)，默认上限为a(0)a(0)=2 '为a(0)赋值a(1)=3a(2)=4a(3)=52、在数组中查找4 dim i as Integer '定义一个循环变量for i=0 to UBound(a) '循环数组a，获取里面的每个元素 if a(i)=4 then '4在数组中 end ifnext i

Dim a(1 To 10) As Integer, i As Integer, j As Integer, max As Integer, min As Integer, Aver As Single
Private Sub Form_Click()
a(1) = 15: a(2) = 23: a(3) = 72: a(4) = 43: a(5) = 96: a(6) = 23: a(7) = 3: a(8) = 65: a(9) = 88: a(10) = 17
For i = 1 To 9
For j = i + 1 To 10
If a(i) > a(j) Then
t = a(i)
a(i) = a(j)
a(j) = t
End If
Next
Next
max = a(10)
min = a(1)
Print "最大值：" & max
Print "最小值：" & min
For i = 1 To 10
Sum = Sum + a(i)
Next
Aver = Sum / 10
Print "平均值：" & Aver
End Sub

新建一个工程，在窗体上添加一个按钮，输入以下代码，运行点击按钮就可
Private a1&(1 To 10), a2&(1 To 10)
Private Sub Command1_Click()
Dim b1&, b2&
For b1 = 1 To 10
a1(b1) = Int(Rnd() * 100)
Print a1(b1);
Next
Print
For b1 = 10 To 1 Step -1
Print a1(b1);
Next
Print
Print "下标奇数：";
For b1 = 1 To 10 Step 2
Print a1(b1);
Next
Print
Print "下标偶数：";
For b1 = 2 To 10 Step 2
Print a1(b1);
Next
End Sub

VB定义字符串数组与定义其它数组没大的区别，只是其赋值一般需要通过循环来获取来自某个特定来源的字符串集合。不然其数组任一元素其值都为空字符串。 Dim strSj(100) As String，本句声明一个下标为0，上标为100的共有101个元素的字符串数组。 如字符串数组大小不确定，可先声明动态数组。 Dim strSj() As String 再用 ReDim 语句分配实际的元素个数。ReDim 语句只能出现在过程中。 ReDim 语句支持这样的语法，它与固定数组中使用的语法相同。对于每一维数，每个 ReDim 语句都能改变元素数目以及上下界。但是，数组的维数不能改变。 字符串数组赋值可由For Next循环从数据表中获取字符串数据，或者由 Split函数从已知一长串有固定分割字符（如，或空格字符等）获取一维字符串数组。 For...Next 语句，以指定次数来重复执行一组语句。 Split函数。返回一个下标从零开始的一维数组，它包含指定数目的子字符串。