Vb Net Format Function In Visual Basic