vb中把字符串转换为数值类型