"WITH" keyword

[madscijr]

Just don't make it so long or shorten it when you are working in a sub or function where the work gets done.


Type areallyridiculosulylongUDTthathasaridiculouslynamedtype_type
x as long
y as long
end type
dim thevariabelewithareallyridiculosulylongUDTthathasaridiculouslynamedtype(100) as  areallyridiculosulylongUDTthathasaridiculouslynamedtype_type

....
addtoX 12, thevariabelewithareallyridiculosulylongUDTthathasaridiculouslynamedtype(i)
...

sub addtoX(N as long,v as  areallyridiculosulylongUDTthathasaridiculouslynamedtype_type)
v.x=v.x+N
end sub

That'll work too!
:-D