I have

Module modtest
Classmodule clsTest


modtest.FirstCall

Sub FirstCall
StoreValue = 1
Debug.print StoreValue
End sub


modtest.SeondCall
Sub secondCall
Debug.print StoreValue
End sub

in clsTest I have:

Proberty Let StoreValue (newvalue as integer)

m_storeValue = newvalue

End property

Proberty Get StoreValue (newvalue as integer)

StoreValue = m_storeValue

End property



What ever I tried in modTest second call StoreValue in
modtest.SeondCall always has been 0
Is there any help how to Dim m_storeValue in the Classmodule using
static, so that modtest.SeondCall has the same value as in FirstCall

Thanks for help. Gottfried