Perche' in VB non funziona come in C ...

Se scrivi

Dim Rect1, Rect2 As RECT

e' come scrivere

Dim Rect1 As Variant, Rect2 As RECT

Devi scrivere

Dim Rect1 As RECT, Rect2 As RECT