fixed strict standard vb