Как скопировать структуру или сменить указатель новой переменной на ее адрес - VB

Формулировка задачи:

Здравствуйте! У меня есть структура вида:

                    Листинг программы
                
type Struct_inside
    a as long
    b as long
end type
 
type Struct_main
    count as long
    arr() as Struct_inside
end type
 
public BIDS() as Struct_main

Я заполняю ее некоторыми данными, например:

                    Листинг программы
                
sub form_load()
    Redim BIDS(0 to 1) as Struct_main
    Redim BIDS(0).arr(0) as Struct_inside
    BIDS(0).arr(0).a = 11
    BIDS(0).arr(0).b = 22
end sub

И теперь мне тупо лень обращаться к переменным вот так:

                    Листинг программы
                
msgbox BIDS(0).arr(0).a
'я конечно могу сделать вот так:
with BIDS(0).arr(0)
   msgbox .a
end with
'но мне хочется поизвращаться :)

Вместо этого мне хочется создать:

                    Листинг программы
                
Dim SI as Struct_inside
' и скопировать в нее структуру BIDS(0).arr(0)
' чтобы потом обращаться к переменным a и b вот так:
msgbox SI.a
msgbox SI.b

Я конечно могу сделать вот так:

                    Листинг программы
                
SI.a = BIDS(0).arr(0).a
SI.b = BIDS(0).arr(0).b

Но уверен есть более простой способ: 1) скопировать структуру через какую-нибудь CopyMemory. 2) сменить указатель переменной SI на адрес структуры BIDS(0).arr(0) Примерно так я это представляю.

Решение задачи: «Как скопировать структуру или сменить указатель новой переменной на ее адрес»

textual
                            Листинг программы 
                        
SI.a = BIDS(0).arr(0).a
SI.b = BIDS(0).arr(0).b