added character literal in vb