VB string转换成Int