Property Get/Set

Date: 02-16-2022

Return to Index

 
temp$ = X.zip
X.zip = temp$
 
 
INSTANCE sZip AS STRING
Property Get Zip() As String              :  Property = sZip : End Property
Property Set Zip(ByVal sNewZip As String) :   sZip = sNewZip : End Property
 
   
'gbs_01345
'Date: 05-11-2013                             

created by gbSnippets
http://www.garybeene.com/sw/gbsnippets.htm