REM ************************************************ REM 整数から日付文字列を取得 REM ************************************************ Function ItoDate( nData ) nData = Fix(nData) ItoDate = Cdate(nData) & "" End function