vb.net程序

fscanf(fp,"作者:周纯钢 班级： 信息023 学号：11 \n");
fscanf(fp,"-----------------------------------------\n");
strcpy(t,max->name);
strcpy(max->name,p1->name);
strcpy(p1->name,t);
/*交换前后结点中的姓名，使之与学号相匹配*/
fen=max->yuwen;
repeat1: printf("请输入学生学号(学号应大于0)：");/*输入学号，学号应大于0*/
scanf("%d",&p1->number);
while(p1->number<0)
{getchar();
printf("输入错误，请重新输入学生学号:");
if(max->number>p1->number)
{
k=max->number;
max->number=p1->number;
p1->number=k;
/*交换前后结点中的学号值，使得学号大者移到后面的结点中*/
char name[10];/*姓名*/
float yuwen;/*语文成绩*/
float yingyu;/*英语成绩*/
float shuxue;/*数学成绩 */
struct scorenode *next;
};
typedef struct scorenode score;
int n,k;/*n,k为全局变量，本程序中的函数均可以使用它*/
if(n>0)
{for(i=0;i<n;i++)
{if(p1->number!=p3->number)
p3=p3->next;
else
{printf("学号重复,请重输!\n");
goto repeat1;
/*当输入的学号已经存在，程序报错，返回前面重新输入*/
while(p1->yingyu<0||p1->yingyu>100)
{getchar();
printf("输入错误，请重新输入英语成绩");
scanf("%f",&p1->yingyu);}/*输入错误，重新输入英语成绩直到正确为止*/
printf("请输入数学成绩(0~100)：");
/*==============================================================================================*/
score *creat2311(void)
/*函数creat2311,功能：创建链表，此函数带回一个指向链表头的指针*/
}
}
}
}
printf("请输入学生姓名：");
scanf("%s",&p1->name);/*输入学生姓名*/
printf("请输入语文成绩(0~100)：");/*输入语文成绩，成绩应在0-100*/
p1->yingyu=fen;
/*交换前后结点中的英语成绩，使之与学号相匹配*/
fen=max->shuxue;
max->shuxue=p1->shuxue;
p1->shuxue=fen;
/*交换前后结点中的数学成绩，使之与学号相匹配*/
max->yuwen=p1->yuwen;
p1->yuwen=fen;
/*交换前后结点中的语文成绩，使之与学号相匹配*/
fen=max->yingyu;
max->yingyu=p1->yingyu;
}
/*==============================================================================================*/
/*==============================================================================================*/
}
}
max=head;p1=head;/*重新使max,p指向链表头*/
}
p2->next=NULL;/*链表结尾*/
printf("输入的学生数为:%d个!\n",n);
return(head);
scanf("%d",&p1->number);}
/*输入学号为字符或小于0时，程序报错，提示重新输入学号*/
if(p1->number==0)
goto end;/*当输入的学号为0时，转到末尾，结束创建链表*/
else
{
p3=head;
scanf("%f",&p1->yuwen);
while(p1->yuwen<0||p1->yuwen>100)
{getchar();
printf("输入错误，请重新输入语文成绩");/*输入错误，重新输入语文成绩直到正确为止*/
scanf("%f",&p1->yuwen);}
scanf("%s",filepn);/*输入文件路径及名称*/
if((fp=fopen(filepn,"r+"))==NULL)
{
printf("不能打开文件!\n");
return 0; Fra bibliotek } fscanf(fp," 考试成绩管理系统 \n");
scanf("%d",&p1->number);/*输入学号，学号应大于0*/
while(p1->number<0)
{getchar();
printf("输入错误,请重新输入学生学号:");
scanf("%d",&p1->number);}
scanf("%f",&p1->shuxue);/*输入数学成绩，成绩应在0-100*/
while(p1->shuxue<0||p1->shuxue>100)
{getchar();
printf("输入错误，请重新输入数学成绩");
scanf("%f",&p1->shuxue);}/*输入错误，重新输入数学成绩直到正确为止*/
/*输入学号为字符或小于0时，程序报错，提示重新输入学号*/
if(p1->number==0)
goto end;/*当输入的学号为0时，转到末尾，结束创建链表*/
else
{
p3=head;
if(n>0)
{for(i=0;i<n;i++)
{if(p1->number!=p3->number)
if(n==1)
head=p1;
else
p2->next=p1;
p2=p1;
p1=(score *)malloc(LEN);
printf("请输入学生资料，输0退出!\n");
repeat2:printf("请输入学生学号(学号应大于0)：");
score *load2311(score *head)
/*函数load2311，功能:从文件读入学生记录*/
{ score *p1,*p2;
int m=0;
char filepn[10];
FILE *fp;
printf("请输入文件路径及文件名:");
printf("请输入英语成绩(0~100)：");/*输入英语成绩，成绩应在0-100*/
scanf("%f",&p1->yingyu);
while(p1->yingyu<0||p1->yingyu>100)
{getchar();
printf("输入错误，请重新输入英语成绩");/*输入错误，重新输入英语成绩直到正确为止*/
p3=p3->next;
else
{printf("学号重复,请重输!\n");
goto repeat2;
/*当输入的学号已经存在，程序报错，返回前面重新输入*/
}
}
}
}
printf("请输入学生姓名：");
scanf("%f",&p1->yingyu);}
printf("请输入数学成绩(0~100)：");/*输入数学成绩，成绩应在0-100*/
scanf("%f",&p1->shuxue);