vb中如何把ask码转化为0-255的整数