SUB Insert ( Text AS String )