vb实现strconv每次生成的 都相同