User Defined Functions In Vb