VB.net的有关问题，三维数组的使用

VB.net的问题，三维数组的使用
以此为例：一栋楼有多少层（变量一），某层有多少个房间（变量二），然后是房间编号（变量三），我的意思是如何将原始数据存到这个数组，然后又如何从数组里面读取数据，并显示出来！ 小生感激不尽！！！！

[解决办法]

VB.NET code

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load        Dim a(9, 10, 3) As String        Dim 楼层 As Integer        Dim 房号 As Integer        Dim 床号 As Integer        楼层 = 1        房号 = 2        床号 = 1        a(楼层, 房号, 床号) = "有人"        Dim Tpstr As String = ""        For i As Integer = 0 To 8 Step 1            For j As Integer = 0 To 9 Step 1                For k As Integer = 0 To 2 Step 1                    If CStr("" & a(i, j, k)) = "" Then                        Tpstr += ("楼层：" & i & "；房号：" & j & "；床号：" & k & "；这个床位还未被占") & Chr(10)                    End If                Next            Next        Next        MsgBox(Tpstr)    End Sub