how to define a string constant in vb