十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
新建一个类,然后使用类的实例来创建数组。
我们提供的服务有:成都网站建设、做网站、微信公众号开发、网站优化、网站认证、临翔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}}
由于每个元素是独立的数组,所以交错数组每一行的元素数量不固定,且可以不等。