Visual Basic Function Return Multiple Values Stored