#39 P1Print #39 Next End Sub Private Sub Command1_Clickn = InputBoxquot请输入人数quotEnd Sub Private Sub Command2_ClickReDim xmnCall lrxm， n， quot姓名quotEnd Sub Private Sub Command3_ClickReDim gaoshunCall lrgaoshu， n， quot高数成绩quotEnd Sub Private Sub。

* case 6Tongjilbreak *统计记录* case 7Sortlbreak *排序记录* case 8Savelbreak *学生记录* case 9systemquotclsquotDispbreak *显示学生记录* default Wronggetcharbreak *按键有误，必须为数值09* 已赞过 已踩过lt 你对。

whilechoose ！= 1 choose ！= 2 choose ！= 3 choose ！=4 choose ！= 5 choose ！=6 choose ！=7 return choose 添加联系人CONT *AddContaxtint n CONT *p，*q，*head int i systemquotCLSquot p = CONT *mallocsizeofCONT cout ltlt quot开始添加联系人。