【VB开源代码栏目提醒】：网学会员--在 VB开源代码编辑为广大网友搜集整理了：VB编程 汽车租赁管理系统源代码 - 经营企划绩等信息，祝愿广大网友取得需要的信息，参考学习。

    

/money management system/include stdio.hinclude dos.hmainFILE fpstruct date dfloat sumchm0.0int lenij0int cchar ch4ch116chtime12chshop16chmoney8pp: clrscrsum0.0gotoxy11printf---------------------------------------------------------------------------gotoxy12printf money management systemC1.0 2000.03 gotoxy13printf---------------------------------------------------------------------------gotoxy14printf -- money records -- -- today cost list -- gotoxy15printf ------------------------ -------------------------------------gotoxy16printf date: -------------- gotoxy17printf gotoxy18printf -------------- gotoxy19printf thgs: ------------------ gotoxy110printf gotoxy111printf ------------------ gotoxy112printf cost: ---------- gotoxy113printf gotoxy114printf ---------- gotoxy115printf gotoxy116printf gotoxy117printf gotoxy118printf gotoxy119printf gotoxy120printf gotoxy121printf gotoxy122printf gotoxy123printf---------------------------------------------------------------------------i0getdatedsprintfchtime4d.02d.02dd.da_yeard.da_mond.da_dayforgotoxy324printf Tab __browse cost list Esc __quitgotoxy1310printf gotoxy1313printf gotoxy137printfschtimej18ch0getchifch027breakstrcpychshopstrcpychmoneyifch09mm:i0fpfopenhome.datrgotoxy324printf gotoxy64printf list records gotoxy15printf-------------------------------------gotoxy414printf gotoxy415printf whilefscanffp10s14sfnchtimechshopchmEOF ifi36 getchi0if i3616 gotoxy414i-17printf gotoxy424i-17isumsumchmprintf10s -14s 6.1fnchtimechshopchmgotoxy123printf---------------------------------------------------------------------------gotoxy124printf gotoxy125printf---------------------------------------------------------------------------gotoxy1024printftotal is 8.1fsumfclosefpgotoxy4924printfpress any key to.....getchgoto ppelsewhilech0r ifj15 lenlen1 j11strcpych1jj-2strncatch1chtimelenstrcpychtimestrncatchtimech1len-1gotoxy137printf gotoxy137printfschtimech0getchifch09goto mmifch027exit1gotoxy324printf gotoxy1310j0ch0getchwhilech0r if j