SUB Add ( Value AS String [ , Index AS Integer ] )