hmm thx for replies Jabbir but I can't succeed in writing this in VB