How do u define function in VB6 - MPGH