vb 判断一个数是否为整数要怎么写