如何在VB中设置属性数组?(在线等!!!!!!!!)

来源：百度知道 编辑：UC知道 时间：2024/07/07 20:14:05
例如:
在教室排座位,设置一个数组,用来记录你的前\后\左\右的人的代号,请问这个数组应该如何写代码?在线等!急!!!!!!!!!

当然是由结构体了：
Private Type person
qian As String
hou As String
zuo As String
you As String
End Type

Private Sub Cmd2_Click()
Dim ren(99) As person
ren(0).qian = "你"
ren(99).hou = "他"
...
...
End Sub

如果只记录一个人的，这个数组只要有四个元素就可以了。
如果记录所有人的，需要一个人数×5个元素的数组就可以了
比如5n+0个元素是当前人
5n+1个元素为前一个人
5n+2个元素为后一个人
5n+3个元素为左一个人
5n+4个元素为右一个人
这样就可以了