vfpro中如何取一个数的个位,十位……分别取出来比如X变量的值
比如X变量的值为123, 我要如何能把1,2,3这三个数单独取出来呢!!先谢了!
x=12345 Dimension a(100) &&100是随便写的,这里就是定义一个数组,存放所有的数。比如你只有3位数,可以定义a(3) a=-1 i=1 Do While .T. If Int(x/10)> 0 a(i)=x-Int(x/10)*10 x=Int(x/10) i=i+1 Else a(i)=x Exit Endif Enddo For i=100 To 1 Step -1 If a(i) >=0 ??a(i) Endif Endfor Return