mam napisać taki programik i chcę sobie ułatwić sprawę i nie pisać dla każdego zdarzenia kazdej kontrolki funkcji

mam parę list i chcę i chciałbym utworzyć klasę która by się tymi listami zajmowała

1 - utworzyłem klasę
2 - stworzyłem tam procedurę sortuj, której argumentem była lista
sortuj (lista as list)
3 - utworzyłem zmienną globalną
Dim obslugaListy as ListaClass
4 - wywołuję sortowanie na kliknieciu w listę

obslugaListy .sortuj (lista1)

i mam błąd TYPE MISMATCH

jak to się robi aby działao?