vb字符串长度取值