vb字符串 半角类型指定