Dim rb = ft.getMyRequestBySearch(id,"","","")
For i As Integer = 0 To rb.Length - 1 For j As Integer = 0 To rb(i).Length - 1
msgbox(12345)
NextNext
------------------
Dim a(1) As objectDim b() As String = {"1", "2"}a(0) = ba(1) = b
msgbox(a(1)(0))msgbox(a(1)(1))
For i As Integer = 0 To a.Length - 1 For j As Integer = 0 To a(i).length - 1
msgbox(a(i)(j) )