Vb Declare Function Example