【導(dǎo)讀】信息、退出等功能。本系統(tǒng)操作十分簡(jiǎn)單用戶只需按提示選擇所需要執(zhí)行的功能或輸入相應(yīng)信息即可。主功能區(qū)中有1、2、3、0四種選擇。息；選擇0是退出刪除功能區(qū)。if/*從文件讀取信息*/. ifprintf("\t無(wú)該日期的收支信息!

　　

【正文】 刪除全部信息 */ { Delall()。 /*調(diào)用刪除全部收支信息函數(shù) */ } else if(i==0) /*退出刪除 */ { printf(************************************************************************\n)。 break。 } else /*用戶 輸入的信息錯(cuò)誤 */ { printf( 輸入錯(cuò)誤 !\n)。 printf(*********************************************************************\n)。 break。 } } } /*************************************************************************************************************************/ void Delpart() /*按日期刪除部分收支信息函數(shù) */ { FILE *ap。 List *head,*r,*s,*pb。 int n=0,y,m,d,a=0。 head=(List *)malloc(sizeof(List))。 /*創(chuàng)建頭節(jié)點(diǎn) */ headnext=NULL。 r=head。 if((ap=fopen(,r))==NULL) printf(不能打開(kāi) 文件 !\n)。 printf( 輸入要?jiǎng)h除的年 月 日 :)。 scanf(%d%d%d,amp。y,amp。m,amp。d)。 while(fread(amp。RMB,sizeof(struct money),1,ap)0) /*在文件中讀取信息查找要?jiǎng)h除的信息 */ { if(y==amp。amp。m==amp。amp。d==RM) n++。 else { s=(List *)malloc(sizeof(List))。 /*尾插入法創(chuàng)建鏈表并將不需要?jiǎng)h除的信息存在數(shù)據(jù)域 */ sdata=RMB。 rnext=s。 r=s。 } } rnext=NULL。 /*為節(jié)點(diǎn)的next 置為 NULL*/ fclose(ap)。 /*關(guān)閉文件 */ printf( 確定要?jiǎng)h除 %d 年 %d月 %d 日的收支信息嗎 ?\n 1 是 \n 2 否 \n,y,m,d)。 printf(請(qǐng)選擇 :)。 scanf(%d,amp。a)。 if(a==1) { if(n) /*要?jiǎng)h除的信息存在*/ { ap=fopen(,wb)。 /*重新打開(kāi)文件并刪除原全部記錄 */ pb=headnext。 while(pb!=NULL) { fwrite(amp。pbdata,sizeof(struct money),1,ap)。 /*將鏈表數(shù)據(jù)域中的數(shù)據(jù)讀入文件得到刪除后的新文件 */ pb=pbnext。 } fclose(ap)。 /*刪除成功，關(guān)閉文件*/ printf( \n 成功刪除 %d年 %d月 %d日的收支信息 !\n,y,m,d)。 printf(****************************************************************\n)。 } else /*要?jiǎng)h除的信息部存在 */ { printf( \n 無(wú) %d年 %d月 %d日的收支信息 !\n,y,m,d)。 printf(****************************************************************\n)。 } } } /*********************************************************************************************************************/ void Delall() /*刪除全部收支信息函數(shù) */ { FILE *ap。 int a=0。 printf( 確定要?jiǎng)h除全部收支信息嗎 ?\n 1 是\n 2 否 \n)。 printf( 請(qǐng)選擇 :)。 scanf(%d,amp。a)。 if(a==1) { ap=fopen(,wb)。 fclose(ap)。 printf( \n 成功刪除全部收支信息 !\n)。 } printf(*********************************************************************\n)。 } /***************************************************************************************************************************/ void Monput() /*按月查詢收支信息函數(shù) */ { FILE *ap。 int y,m。 float zs=0,zz=0,s=0。 printf(輸入要 查詢的年月 :)。 scanf(%d%d,amp。y,amp。m)。 if((ap=fopen(,r))==NULL) printf(不能打開(kāi) 文件 !\n)。 while(fread(amp。RMB,sizeof(struct money),1,ap)0) { if(y==amp。amp。m==) /*在文件中查找符合條件的信息并輸出 */ { printf(\t%d 年 %d 月 %d 日\(chéng)n,)。 printf(\t 收入 :%g\n\t 收入來(lái)源 :%s\n,)。 printf(\t 支出 :%g\n\t 支出去向 :%s\n,)。 printf(\t 余額 :%g\n\n,)。 zs+=。 /*統(tǒng)計(jì)查詢?cè)路莸目偸杖?、總支出、總余額 */ zz+=。 s+=。 } } fclose(ap)。 printf(\t%d 年 %d 月總收入 :%g\n,y,m,zs)。 /*輸出所查詢?cè)路莸目偸杖?、總支出、總余額 */ printf(\t%d 年 %d月總支出 :%g\n,y,m,zz)。 printf(\t%d 年 %d月總余額 :%g\n,y,m,s)。 printf(******************************************************************************)。 } /***********************************************************************************************************************/ void Yearput() /*按年查詢收支信息函數(shù) */ { FILE *ap。 int y。 float zs=0,zz=0,s=0。 printf(輸入要查詢的年份 :)。 scanf(%d,amp。y)。 if((ap=fopen(,r))==NULL) printf(不能打開(kāi) 文件 !\n)。 while(fread(amp。RMB,sizeof(struct money),1,ap)0) { if(y==) /*輸出符合條件的信息 */ { printf(\t%d 年 %d 月 %d 日\(chéng)n,)。 printf(\t 收入 :%g\n\t 收入來(lái)源 :%s\n,)。 printf(\t 支出 :%g\n\t 支出去向 :%s\n,)。 printf(\t 余額 :%g\n\n,)。 zs+=。 /*統(tǒng)計(jì)查詢年份的總收入、總支出、總余額 */ zz+=。 s+=。 } } fclose(ap)。 printf(\t%d 年總收入 :%g\n,y,zs)。 /*輸出年度總收入、總支出、總余額 */ printf(\t%d 年總支出 :%g\n,y,zz)。 printf(\t%d 年總余額 :%g\n,y,s)。 printf(******************************************************************************\n)。 }