189 8069 5689
新建一个类，然后使用类的实例来创建数组。
我们提供的服务有：成都网站建设、做网站、微信公众号开发、网站优化、网站认证、临翔ssl等。为上1000+企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务，是有科学管理、有技术的临翔网站制作公司
下面代码放在申明处，类的里面，比如Class Form1的下面
‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘（分隔线，你懂的）’’’’’’’’’’’’’’’’’’’’’
Dim person() As New member
‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘（分隔线，你懂的）’’’’’’’’’’’’’’’’’’’’’
下面一段的在该文件的最下面插入
‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘（分隔线，你懂的）’’’’’’’’’’’’’’’’’’’’’
Class member
Dim name As string
Dim male As Boolean '这里True表示男，False表示女
Dim age As Integer
Dim birthym As Long
End Class
‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘‘（分隔线，你懂的）’’’’’’’’’’’’’’’’’’’’’
然后如果你想要调用一个年龄，比如第一个人的，就用
person(0).age
来表示
That's all
你只是定义了一个对象，类而已
首先要给对象设置变量，这个还不是数组
Public class As Single的class 应该是关键字请换一个名字
Dim KidsX(1 to 100) as kids
KidsX(1).classx=1
KidsX(1).grade=1
KidsX(1).name=”张某"
KidsX(2).classx=1
KidsX(2).grade=2
KidsX(2).name=”王某"
……
先把strA排序，
ind = 2
if len(strA) = 0 then return
strB(1) = strA(1)
for each s in strA
if (strA(ind) strA(ind - 1) then
count = 0
strB(ind) = strA(ind)
else
strB(ind) = strA(ind - 1)
end if
ind = ind + 1
next s
vb语法忘了。。。大概是这么个意思吧。。。。 排序N LOG N，后面是线性的N，所以总共是NLOGN
array(2,2)是多维数组的访问方式，其数组的定义和初始化方法为：
Dim array As Integer(,) = {{1, 2, 3}, {4, 5, 6}}
每一行的元素数量是固定且相等的。
array(2)(2)是交错数组（即数组的数组）的访问方式。也就是，你有一个数组，这个数组的每个元素也是数组。其数组的定义和初始化方法为：
Dim array As Integer()() = {New Integer() {1, 2, 3}, New Integer() {4, 5, 6, 7, 8}}
由于每个元素是独立的数组，所以交错数组每一行的元素数量不固定，且可以不等。