现需要把表中的数据由10进制转换成34进制,但excel中只有10进制和2、8、16进制之间的转换,所以请高手帮个忙,先谢谢了!

解决方案 »

  1.   

    自己写个程序循环的div mod就可以了
      

  2.   

    function IntToX(AValue,x:Integer):string;
    var i:Integer;
    begin
      Result:='';
      i:=AValue;
      repeat
        Result:=IntToStr(i mod x)+Result;
        i:=i div x
      until i=0;
    end;function IntToBin(AValue:Integer):string;
    var i:Integer;
    begin
      Result:='';
      i:=AValue;
      repeat
        Result:=IntToStr(i mod 2)+Result;
        i:=i div 2
      until i=0;
    end;试试看,能不能用?
      

  3.   

    SuperTitan005 
    请问怎么写呀,我对这个是一窍不通的,谢谢