Clearing all values in a User Defined Type variable
On way would be to declare a dummy variable as the same type. Then use lset
to reset
sub abc(
b as TPETC_COLS
mydum as TPETC_COLS
' work with b, never touch mydum
' now to reset
lset b = mydum
' b is now reset
End Sub
If you have a fixed array of these variables and you want reset them all,
then you can use erase
sub abc(
b(0 to 10) as TPETC_COLS
' work with b, never touch mydum
' now to reset all the type variables in the array
erase b
' all variables in b are now reset
End Sub
--
Regards,
Tom Ogilvy
"J Streger" wrote:
I have:
Public Type TPETC_COLS
Sort As Integer
AStart As Integer
RStart As Integer
SStart As Integer
RComplete As Integer
SComplete As Integer
End Type
But in the middle of the code I want to ensure all values in the type are
set to 0, I just want to know if there is an easier way to do this rather
than declaring each one as 0. Thanks.
--
*********************
J Streger
MS Office Master 2000 ed.
MS Project White Belt 2003
|