作业管理系统源码
⑴ 医药连锁店java程序
基于asp语言的测试项目
学生信息管理系统的设计与实现
基于ASP.NET的社区人口管理系统
基于ASP.NET的课程教学网站设计
公司会议网站
C高校工资管理系统
C在线点歌系统
《数据库原理》精品课程网站设计
教师住房管理系统
《计算机网络》学习网站的设计与实现
《模式识别》精品课程网站的设计与实现
asp个人博客
asp网上书店
微型计算机学习网站的设计与实现
成绩分析系统的设计与实现
宠物管理系统
基于3G通信的视频医药系统设计
基于web的图书馆图书信息查询系统
离散数学网上教学系统
企业进销存管理系统分析与设计
人力资源管理信息系统
学生作业管理系统
社区论坛
在线课题系统
《数据库技术及应用》精品课程建设网站
职业中介信息管理系统
自来水收费管理系统
会员制漫画店(连锁)管理系统
基于CSCW的大学生就业平台
基于WEB方式的视频监控系统设计与开发
旅游网站
健康网站的设计与实现
新闻管理系统设计与实现
工会信息发布系统的设计与开发
模式识别与智能研究所网站
互联网计费系统
C毕业生信息管理就业招聘系统
体育用品在线商店系统
网站群信息管理系统
员工绩效考核系统
学生档案信息管理C
基于ASP.NET技术的动态IT培训网站的设计与实现
《软件测试技术》精品课程网站的建设与开发
网上二手房交易系统设计与实现
ASP131企业进销存管理系统
ASPc语言教学系统+论文
ASP（交友录）
asp+sqlServer网上书店系统＋论文
ASP+sql精品在线试题库设计+论文
ASP+SQL图书管理系统＋论文
<dir>asp+sql玉林旅游管理系统+论文＋答辩PPT＋开题报告＋屏幕录相
ASPAC软件信息发布系统
ASPAC学生论坛
asp办公系统
ASP毕业设计选题管理系统(asp+sql)
asp毕业生信息管理系统源码+论文+开题+文献+外文翻译
ASP产品销售
ASP窗帘网站平台
200ASP电子商务系统
ASP电子政务档案管理系统+论文
ASP服装销售系统论文+答辩PPT+源代码+翻译+开题报告漏圆盯+任务书+实习报告)
20ASP关于奥运网站专题
ASP基于WEB的办公自动化管理系统+可执行源代码+论文
ASP家教信息管理系统
asp教师档案管理系统+论文
asp教师信息管理系统
ASP教学互动系统
asp酒店房间预约系统设计
ASP客户关系管理系统ASP+SQL+可执行文件+论文
asp旅游信息管理系统
ASP企业进销存管理系统ASP+SQL+可执行文件+论文
ASP企业物流返和管理
ASP企业物流平台的设计与实现论文+源程序可执行+ASP+ACCESS数据库
ASP求职招聘网站设计(ASP)
ASP人才招聘系统
asp人力资源管理系统ASP+SQL+论文+源程序可执行
asp上网导航(论文+源码)
ASP售后服务管理系统
ASP同学录
ASP同学录asp+sql
ASP投票系统
asp图书出售图书发行系统
ASP图书管理系统
asp图书管理系统+论文＋开题＋PPT
asp图书管理系统+论文＋开题＋PPT.rar
ASP网络办公系统
ASP网络办公系统(源码加论文)
ASP网络购物系统
ASP网络硬盘文件资源管理系统(论文+代码+译
ASP网上购书
ASP网上购物系统
ASP网上考试系统
asp网上聊天室系统设计与开发带论文
ASP网上人才管理系统+可执行源代码+论文
ASP网上售房管理系统
ASP网上书店的
ASP网上贴吧系统
asp网上选课系统+论文
ASP物流系统设计
ASP物资管理系统的设计与实现+可执行源代码+数据库+论文
ASP校友录
ASP新闻管理系统
ASP新闻网程序＋论文
asp信息查询系统
ASP学生管理
ASP学生信息管理系统
ASP药店信息管理系统
asp医药连锁店管理系统ASP+源代码+可执行程序+论文
ASP影片租赁系统
asp员工信息管理系统
ASP原创交友网设计
Asp原创网上书店
ASP原创信息管理系统
ASP在线exam
ASP在线花店系统
ASP在线教育系统
asp在线考试系腔迟统+论文
asp在线学习系统
asp自动化测试工具论文.net
ASP作业提交与批改系统（毕业论文+配套中英文对照翻译+源代码+执行结果）
原创教师信息管理系统
asp.net及.net
基于.net技术的校园新闻发布系统全套
asp.netERP系统(毕业设计+论文
asp.net+sql人才网站
Asp.net2.0,C)在线考勤系统研发+论文
ASP.NET报名管理信息系统
ASP.NET电子购物商城系统＋论文
asp.net电子书城系统+论文
asp.net很好的美容院管理系统加论文
ASP.NET通用作业批改系统设计+论文
ASP.NET图书馆管理信息系统
ASP.NET网络考试系统.net
ASP.NET网上书店(源程序+论文+答辩PPT)
ASP.net校友录毕业设计＋论文
asp.net学生成绩管理系统+论文
asp.net学生管理系统
asp.net在线考试统加论文
ASP.NET智能评教系统,内含论文智能教评
asp.net中图像的检索技术毕业设计(论文,源码,任务书,开题报告,答辩ppt)
net邮件收发系统的设计+论文
VB.net+SQL房地产评估系统
vb.net酒店管理系统+论文
VB.NET网吧计费系统软件
人事管理系统+论文＋答辨PPT
复件(2)delphi列车时刻查询决策系统课程设计论文+源代码
复件delphi列车时刻查询决策系统课程设计论文+源代码
三层图书管理系统
商品销售管理系统(毕业设计)最新版下载
题库系统与试卷生成
java论坛管理系统，包括论文和程序
java图书管理系统毕业设计+源码
Java游戏设计打飞机程序＋论文
java作业管理系统
java五子棋的开发
JAVA论坛管理数据库开发
JSP+SQL计算机等级考试查询系统
jsp仓储管理系统+论文
jsp操作系统课程教学网站的设计与实现论文+源代码
jsp高校学生考勤管理系统
jsp高校智能排课系统+论文
JSP教学管理系统
JSP考试管理系统
jsp网上购书系统源代码
jsp网上书店程序＋论文
jsp网上书店系统
jsp物流中心仓储信息管理系统
jsp学生课绩管理系统+论文
JSP作业管理
教学管理系统
php+SQL公共课平时成绩查询系统
PHP教材管理系统+论文
PHP课程设计＋论文
SQL数据库课程设计学生选课
168VBAC房屋销售管理信息系统
dekphi贸易公司信息管理系统+论文
VBATM自动银行+论文
VB+ACCESS高校题库管理系统附原代码+程序+1万字论文
VB+Access酒店客房管理系统(源码+论文).rar(3475
VB065IC卡管理系统001
VB班级管理系统vb+access源代码+可执行程序+论文+开题报告+外文翻译+答辩ppt
VB本科毕业论文-工资管理系统毕业论文+源码
vb仓库管理系统（包括可执行程序源码开题报告答辩稿）
VB超市管理系统+论文
vb超市管理系统+论文
vb超市进销存管理系统vb+access源代码+可执行文件+论文+开题报稿+外文翻译+答辩ppt.rar(768
vb车辆管理系统vb+access源代码+可执行程序+论文+开题报告+外文翻译+答辩ppt
vb地籍登记管理系统vb+access源代码+论文+开题报告+外文翻译+答辩ppt
vb电表管理系统vb+access源代码+可执行程序+论文
VB俄罗斯方块系统＋论文
VB俄罗斯方块游戏课程设计
vb高速公路票据管理系统vb+access源代码+可执行文件+论文+开题报告+外文翻译+答辩ppt
VB工资管理系统
VB工资管理系统（论文＋开题报告＋源代码）
VB工资管理系统vb+access源代码+可执行程序+论文+开题报告+外文翻译+答辩ppt
vb公交车查询系统vb+access源代码+可执行程序+论文+开题报告+外文翻译+答辩ppt
VB计算机自动出卷系统vb版（含开题报告＋外文翻译＋源程序＋可执行程序＋论文正文＋答辩ppt）
VB教师管理系统vb+access含源代码+可执行程序+论文+开题报告+外文翻译+答辩稿
vb教师管理系统vb+access含源代码+可执行程序+论文+开题报告+外文翻译+答辩稿(2)
VB教务管理系统vb+access源代码+论文+开题报告+外文翻译+答辩ppt
vb教学辅助系统VB+access源代码+可执行文件+论文
VB客房管理系统全套(带源码)
vb课程设计医药管理系统（VB+SQL)应要求源文件＋代码＋论文打包上传
vb库存管理系统（论文＋开题报告＋源代码）
VB库存管理系统2（论文＋开题报告＋源代码）
VB评语管理系统vb+access源代码+可执行程序+论文+开题报告+外文翻译+答辩ppt
vb企业人事工资管理系统+论文
vb企业人事管理系统
vb企业人事管理信息系统+论文
VB人才管理系统
vb人事工资管理系统毕业设计（论文）
VB人事管理系统
vb人事管理系统（VB毕设成品）毕业论文
VB人事管理系统sql＋论文
vb人事管理源程序+论文
vb人事资源管理系统+论文
vb设备管理系统+论文
vb试题库自动组卷系统
vb题库管理系统+论文
vb通讯录管理信息系统vb+access源代码+可执行程序+论文+开题报告+外文翻译
vb图书馆管理系统＋论文
vb图书管理系统
vb图书管理系统(文档+源代码)
vb图书管理系统vb+access版论文+源代码+开题报告+外文翻译+答辩ppt
vb图书管理系统源代码论文
vb图书销售信息系统+论文
VB文档管理系统+论文
vb小区物业管理系统
vb校园网交换机节点管理系统＋论文
vb学籍管理系统带论文
VB学生档案
vb学生档案管理系统
vb学生档案管理系统+论文
VB学生公寓管理系统
vb学生评语生成系统论文
VB学生信息管理系统
vb学生信息管理系统(VB+sql)+毕业论文2万字
vb学生信息管理系统(代码+论文+开题报告)
vb药品库房管理系统vb+access源代码+可执行程序+论文+开题报告+外文翻译+答辩ppt
vb一个考试管理系统。带论文的
VB医药管理系统
vb音像制品出租及销售管理系统
VB员工管理系统
VB原创库存管理系统开题报告+外文翻译+论文正文+源代码+可执行程序
vb原创图书管理系统)毕业设计+论文
vb源代码加可执行文件加论文
vb智能排课系统+论文
vb中介管理系统vb+access源代码+论文+开题报告+外文翻译+答辩ppt
学生宿舍管理系统
VC++
C++003指纹识别系统
C++课程设计报告(人事管理系统)
VC++003指纹识别系统
VC++06全国天气信息管理系统
vc++24点游戏的开发和实现
VC++车辆调度
vc++航空检票系统+论文
vc++航空客运订票系统+论文
VC++基于校园网的学院教学质量监测评估系统
vc++简单几何图形的识别和编辑系统＋论文
VC++经济管理出版社期刊书目信息管理系统
vc++局域网的数据包监听及数据分析毕业论文+源代码
VC++开发GIS项目程序＋论文
vc++可视化图像处理系统+论文
vc++库存管理
vc++图书馆管理系统
vc++网上寻呼QICQ源代码（附带论文）
vc++象棋程序+论文
VC++学生成绩统计分析系统
vc++医药管理系统+论文
vc++用遗传算法解决车辆优化调度问题论文+源代码+任务书
vc++运动会成绩管理系统（源码+论文）
VC+ACCESS开发的酒店管理+论文
vc数据挖掘在客户关系管理中的
vc中国象棋软件（程序+源码+论文）下载
VC做的聊天室＋论文
浏览器（论文+源码）
一个VC++做的手机话费参考程序，有设计报告
vfp现代物流企业管理系统+论文
vfp现代物流企业管理系统＋论文
VF财务管理系统（论文＋开题报告＋源代码＋答辩PPT）
vf仓库管理系统（论文+源文件）
VF地税局工资管理系统（论文＋开题报告＋答辩PPT＋源代码＋程序清单）
vf简单的酒店管理源码+文论
VF教职工信息管理毕业设计
vf教职工信息管理毕业设计+论文
vf路政管理系统（论文＋开题报告＋答辩PPT＋源代码＋程序清单）
VF企业人事档案管理系统全套(带源码)
vf图书管理系统（VFP）(包括程序文档)
VF系统的学生成绩管理系统+论文
vf职员信息系统+论文
vf做的学生管理系统+论文
ASP+ACCESS深水蓝文学网站
ASP+ACCESS文学网站
ASP+SQL美食网站
ASP人才招聘系统
delphi书店辅助进书系统
JSP028学生学籍管理系统
JSP科研处管理信息系统+论文
JSP学生学籍管理系统
JSP在线学习系统
my美食网站
php+mysql学生成绩查询
PHP学生成绩查询
vb数控加工技术教学素材资源库的构建
VB文档管理系统+论文
百瑞通公司网站
报名系统
多媒体课程答疑系统
高校固定资产管理系统
公司办公信息管理系统
恒华贸易有限公司网站
基于局域网的聊天室系统
科研项目网上申报管理系统
两个网站
企业电子投票系统
人才网内容管理系统
商品配送中心库存仿真软件设计
社区网络（含在线影院）
施甸县旅游咨询网
同校二手电子产品交易网
外观专利图像检索平台
网络实验教学网站
网上教学资源共享系统
小区门户网站
学科建设
学科建设系统
医疗器械公司网站客户服务系统设计
政府采购管理信息系统
中国节能环保科技网站
计算机论文
ASP动态网站建设论文.doc
java网络5子棋代码.doc
工商管理毕业论文
基于Web的网上评教系统.doc
计算机局域网组建与互连毕业设计论文.doc
嵌入式系统开发要素的选择分析.doc
嵌入式系统在多点温度控制中的应用.doc
校园网络工程综合布线方案
人事管理系统
现代物流企业管理系统
企业数据信息管理系统
航空公司管理系统
成本费用计算系统
VCD租借管理系统
毕业生招聘信息的发布与管理系统
宾馆客房管理系统
《计算机专业英语》网上教学系统设计与实现
《软件工程》精品课程教学网站的设计与实现ASP+SQLSever2000
《数据库原理及应用技术》课程指导平台的开发
《新闻发布系统》
《信息论与编码》在线考试系统
3G的AKA协议中F1至F5的UE端的实现
3G的AKA协议中F1至F5的服务网络端实现
ASP.NET技术在网站开发设计中的研究与开发ASP.NET+SQLSever2000
BBS系统开发与帐户安全保护的实现
BS结构的城市酒店入住信息管理系统的设计
BS结构下的OA流程可视化的研究与实现
BS结构下的邮件系统设计开发
BS模式的计算机等级考试管理系统的设计与实现ASP.NET+SQLSever2000
C语言教学网站及网上考试系统的设计与实现ASP.NET+SQLSever2000
C语言试题生成与考试系统
Delaunay算法的实现与应用
Excel条件格式化工具的设计与实现
FTP客户端的设计与实现
FTP客户端设计与开发
多种排序算法动态演示软件的设计和开发
基于JSP学生成绩管理系统软件的开发
清除履历表、日志表、月购买额
多语种视频音频播放器的设计与实现
创建会员信息文件
Win32平台下的PE文件病毒的研究及实现
一种多商家网络商店的设计与实现
权限管理模块
积分添加和通票回收
网上选课系统的设计与实现
泡泡堂网络游戏的设计与实现
权限及公共模块设计与开发
某企业信息管理系统的设计与实现
H2003032045程富超_一种远程管理linux系统工具的设计与实现
多语种网络硬盘系统的设计
系统框架设计与开发
小型证券术语解释及翻译系统的设计与开发
权限管理与日志记录模块的设计与开发
考试管理及成绩查询模块的设计与开发
OA子系统的设计与开发
题库及试卷管理模块的设计与开发
考试监控及阅卷模块的设计与开发
某店积分更新记录管理
教务平台—学籍管理模块开发与设计
H2003032197王蕾-基于Java的两个通用安全模块的设计与实现
销售情况，会员卡再发行数据生成
教务信息管理系统的设计与实现
高校学生宿舍管理系统的设计与实现
网络商店销售管理系统的设计与实现
商品分类，交易状况统计
IA32逻辑功能仿真实现
Iptables图形管理工具的设计与实现
Ipv6环境下FTP系统的设计与实现Java+SQLServer2000
IT产品网上物流管理信息系统的设计与实现
J2ME手机游戏的开发-BeckhamGoal
Java打飞机游戏设计
Java多线程与线程安全实践-基于ri算法的关联规则挖掘系统的设计与实现
基于ASP.NET的班级风采网站的设计
基于ASP.NET的公司网站的设计与实现
基于ASP.NET的企业网站的研究与开发ASP.NET+SQLSever2000
基于ASP.NET的网上书店的设计与实现ASP.NET+SQLSever2000
基于ASP.NET的校友录管理系统的研究与实现ASP.NET+SQLSever2000
基于ASP.NET的学生成绩报表系统的设计与实现ASP.NET+SQLSever2000
基于ASP.NET的学生成绩管理系统的设计与实现ASP.NET+SQLSever2000
基于ASP.NET的学生成绩合成系统的设计与实现ASP.NET+SQLSever2000
基于ASP.NET简易博客网站的设计与实现
基于ASP.NET教学辅助系统设计与实现
基于ASP的笔记本销售网站的设计与实现
基于ASP的博客网站设计与实现ASP+Access
基于ASP的反垃圾邮件管理系统的设计
基于ASP的房屋租售信息管理系统的设计
基于ASP的公交查询系统的设计与实现
基于ASP的淮工学生购物网的设计与实现ASP+SQLSever2000
基于ASP的旅游网站的设计与实现
基于ASP的某学校校园BBS的设计与实现
基于ASP的企业人事管理系统的设计与实现
基于asp的搜索引擎开发
基于ASP的网络聊天室的设计和实
⑵ c语言程序学生成绩管理系统源代码
头文件:::
#ifndef H_STUDENT_HH
#define H_STUDENT_HH
#include "stdio.h"
#include "string.h"
#include "malloc.h"
#define LEN sizeof(struct message_student) /*一个结构体数组元素的长度*/
#define numsubs 5 /*学科数目*/
typedef struct message_student /*结构体定义*/
{
char number[6];
char name[20];
char sex[4];
float subject[numsubs];
float score;
float average;
int index;
}student;
extern int numstus; /*学生数目*/
extern student *pointer; /*指向结构体数组*/
extern int lens;
int menu_select(); /*函数声明*/
int openfile(student stu[]);
int findrecord(student stud[]);
int writetotext(student stud[]);
void welcome();
void display1();
void showtable();
void sort(student stu[]);
void deleterecord(student stu[],int i);
void addrecord(student stud[]);
void display(student stud[],int n1,int n2);
void amendrecord(student stud[]);
void count(student stud[]);
void sortnum(student stud[]);
void sortnum2(student stud[]);
void sortname(student stud[]);
void sortname2(student stud[]);
void sortcount(student stud[]);
void sortcount2(student stud[]);
void statistic(student stud[]);
void display1();
#endif
#include "head.h"
int menu_select()
{
char c;
printf("\n\n");
printf(" | 1. 增加学生记录 5.统计信息 |\n");
printf(" | 2. 查询学生记录 6.打开文件 |\n");
printf(" | 3. 修改学生记录 7.保存文件 |\n");
printf(" | 4. 学生纪录排序 8.显示记录 |\n");
printf(" | 0.退出系统 |\n");
printf("\n\n");
printf("请选择(0-8):");
c=getchar();
getchar();
return (c-'0');
}
#include "head.h"
int findrecord(student stud[]) /*查找信息*/
{
char str[2];
int i,num;
if(numstus==0)
{
printf("没有可被查找的记录\n");
return -1;
}
else
{
printf("以何种方式查找？\n1.学号\t2.姓名\t3.名次\n");
gets(str);
if(str[0]=='1') /*按学号查找*/
{
printf("请输入学号:");
gets(str);
for(i=0;i<=numstus;i++)
if(strcmp(str,stud[i].number)==0)
{
display(stud,i,i);
break;
}
else continue;
}
else if(str[0]=='2') /*按姓名查找*/
{
printf("请输入姓名:");
gets(str);
for(i=0;i<=numstus;i++)
if(strcmp(str,stud[i].name)==0)
{
display(stud,i,i);
break;
}
else continue;
}
else if(str[0]=='3') /*按名次查找*/
{
printf("请输入名次:");
scanf("%d",&num);
getchar();
for(i=0;i<=numstus;i++)
if(num==stud[i].index)
{
display(stud,i,i);
break;
}
else continue;
}
if(i>numstus)
{
printf("没有查找所要的信息。\n");
return -1;
}
return i;
}
}
#include"head.h"
int openfile(student stu[])
{
int i=0,j;
FILE *fp;
char filename[20],str[2];
if(numstus!=0)
{
printf("已经有记录存在，是否保存?(y/n)");
gets(str);
if(str[0]=='y'||str[0]=='Y')
writetotext(stu);
}
printf("请输入文件名:");
gets(filename);
numstus=0;
if((fp=fopen(filename,"rb+"))==NULL)
{
printf("无法打开该文件\n");
return(-1);
}
fscanf(fp,"%d",&numstus);
fgetc(fp);
while(i<numstus)
{
fscanf(fp,"%s",stu[i].number);
fscanf(fp,"%s",stu[i].name);
fscanf(fp,"%s",stu[i].sex);
for(j=0;j<numsubs;j++)
fscanf(fp,"%f",&stu[i].subject[j]);
fscanf(fp,"%f",&stu[i].score);
fscanf(fp,"%f",&stu[i].average);
fscanf(fp,"%d",&stu[i].index);
i++;
}
fclose(fp);
printf("文件读取成功\n");
printf("是否显示纪录?(y/n)");
gets(str);
if(str[0]=='y'||str[0]=='Y')
display(stu,0,numstus-1);
return(0);
}
#include "head.h"
void sort(student stud[])
{
int i,j=0;
char str[5];
student *p;
p=stud;
if(numstus==0)
{
printf("没有可供查询的记录!");
}
while(1)
{
for(i=0;;i++)
{
printf(" 请输入查询方式:");
printf("（直接输入回车则结束查询操作）\n");
printf("1.按照学号\t");
printf("2.按照姓名\t");
printf("3.按照名次\n");
gets(str);
if(strlen(str)==0) break;
if(str[0]=='1')
{
printf("请输入排序次序：\n");
printf("1.升序排列\t");
printf("2.降序排列\n");
gets(str);
if(str[0]=='1')
sortnum2(p);
else
sortnum(p);
display(stud,0,numstus-1);
}
else if(str[0]=='2')
{
printf("请输入排序次序：\n");
printf("1.升序排列\t");
printf("2.降序排列\n");
gets(str);
if(str[0]=='1')
sortname2(p);
else
sortname(p);
display(stud,0,numstus-1);
}
else if(str[0]=='3')
{
printf("请输入排序次序：\n");
printf("1.升序排列\t");
printf("2.降序排列\n");
gets(str);
if(str[0]=='1')
sortcount2(p);
else
sortcount(p);
display(stud,0,numstus-1);
}
else printf("请输入1~3");
printf("是否退出排序?(y/n)");
gets(str);
if(str[0]=='y'||str[0]=='Y') break;
}
return;
}
}
void sortnum(student stud[])
{
int i,j;
student temp;
student *p;
p=stud;
for(i=0;i<numstus;i++)
for(j=0;j<numstus-i-1;j++)
{
if(strcmp(stud[j+1].number,stud[j].number)>0)
{
temp=*(p+j);
*(p+j)=*(p+j+1);
*(p+j+1)=temp;
}
}
}
void sortnum2(student stud[])
{
int i,j;
student temp;
student *p;
p=stud;
for(i=0;i<numstus;i++)
for(j=0;j<numstus-i-1;j++)
{
if(strcmp(stud[j].number,stud[j+1].number)>0)
{
temp=*(p+j);
*(p+j)=*(p+j+1);
*(p+j+1)=temp;
}
}
}
void sortname(student stud[])
{
int i,j;
student temp;
student *p;
p=stud;
for(i=0;i<numstus;i++)
for(j=0;j<numstus-i-1;j++)
{
if(strcmp(stud[j+1].name,stud[j].name)>0)
{
temp=*(p+j);
*(p+j)=*(p+j+1);
*(p+j+1)=temp;
}
}
}
void sortname2(student stud[])
{
int i,j;
student temp;
student *p;
p=stud;
for(i=0;i<numstus;i++)
for(j=0;j<numstus-i-1;j++)
{
if(strcmp(stud[j].name,stud[j+1].name)>0)
{
temp=*(p+j);
*(p+j)=*(p+j+1);
*(p+j+1)=temp;
}
}
}
void sortcount(student stud[])
{
int i,j;
student temp;
student *p;
p=stud;
for(i=0;i<numstus;i++)
for(j=0;j<numstus-i-1;j++)
{
if(stud[j+1].index>stud[j].index)
{
temp=*(p+j);
*(p+j)=*(p+j+1);
*(p+j+1)=temp;
}
}
}
void sortcount2(student stud[])
{
int i,j;
student temp;
student *p;
p=stud;
for(i=0;i<numstus;i++)
for(j=0;j<numstus-i-1;j++)
{
if(stud[j].index>stud[j+1].index)
{
temp=*(p+j);
*(p+j)=*(p+j+1);
*(p+j+1)=temp;
}
}
}
#include"head.h"
void statistic(student stud[]) /*新增功能，输出统计信息*/
{
int i,j=0,k=0;
char c1,str[2];
float average[numsubs],sum=0;
if(numstus==0)
printf("没有可被查找的记录\n");
else
{
while(1)
{
printf("下面将统计考试成绩\n");
printf("请选择你要统计哪科的成绩 1.A\t2.B\t3.C\t4.D\t5.E\n");
c1=getchar();
printf("\t一共有个%d记录\n",numstus); /*总共记录数*/
switch(c1)
{
case '1':
for(i=0;i<numstus;i++) /*循环输入判断*/
{
sum+=stud[i].subject[0];
if(stud[k].subject[0]>stud[i].subject[0]) k=i;
if(stud[j].subject[0]<stud[i].subject[0]) j=i;
}
average[0]=sum/numstus;
printf("\t科目A的最高分:\n"); /*最高分*/
printf("\t\t学号:%s 姓名:%s 分数:%.2f\n",stud[j].number,stud[j].name,stud[j].subject[0]);
printf("\t科目A的最低分是:\n"); /*最低分*/
printf("\t\t学号:%s 姓名:%s 分数:%.2f\n",stud[k].number,stud[k].name,stud[k].subject[0]);
printf("\t科目A的平均分是 %5.2f\n",average[0]); /*平均分*/
break;
case '2':
for(i=0;i<numstus;i++) /*循环输入判断*/
{
sum+=stud[i].subject[1];
if(stud[k].subject[1]>stud[i].subject[1]) k=i;
if(stud[j].subject[1]<stud[i].subject[1]) j=i;
}
average[1]=sum/numstus;
printf("\t科目B的最高分:\n"); /*最高分*/
printf("\t\t学号:%s 姓名:%s 分数:%.2f\n",stud[j].number,stud[j].name,stud[j].subject[1]);
printf("\t科目B的最低分是:\n"); /*最低分*/
printf("\t\t学号:%s 姓名:%s 分数:%.2f\n",stud[k].number,stud[k].name,stud[k].subject[1]);
printf("\t科目B的平均分是 %5.2f\n",average[1]); /*平均分*/
break;
case '3':
for(i=0;i<numstus;i++) /*循环输入判断*/
{
sum+=stud[i].subject[2];
if(stud[k].subject[2]>stud[i].subject[2]) k=i;
if(stud[j].subject[2]<stud[i].subject[2]) j=i;
}
average[2]=sum/numstus;
printf("\t科目C的最高分:\n"); /*最高分*/
printf("\t\t学号:%s 姓名:%s 分数:%.2f\n",stud[j].number,stud[j].name,stud[j].subject[2]);
printf("\t科目C的最低分是:\n"); /*最低分*/
printf("\t\t学号:%s 姓名:%s 分数:%.2f\n",stud[k].number,stud[k].name,stud[k].subject[2]);
printf("\t科目C的平均分是 %5.2f\n",average[2]); /*平均分*/
break;
case '4':
for(i=0;i<numstus;i++) /*循环输入判断*/
{
sum+=stud[i].subject[3];
if(stud[k].subject[3]>stud[i].subject[3]) k=i;
if(stud[j].subject[3]<stud[i].subject[3]) j=i;
}
average[3]=sum/numstus;
printf("\t科目D的最高分:\n"); /*最高分*/
printf("\t\t学号:%s 姓名:%s 分数:%.2f\n",stud[j].number,stud[j].name,stud[j].subject[3]);
printf("\t科目D的最低分是:\n"); /*最低分*/
printf("\t\t学号:%s 姓名:%s 分数:%.2f\n",stud[k].number,stud[k].name,stud[k].subject[3]);
printf("\t科目D的平均分是 %5.2f\n",average[3]); /*平均分*/
break;
case '5':
for(i=0;i<numstus;i++) /*循环输入判断*/
{
sum+=stud[i].subject[4];
if(stud[k].subject[4]>stud[i].subject[4]) k=i;
if(stud[j].subject[4]<stud[i].subject[4]) j=i;
}
average[4]=sum/numstus;
printf("\t科目E的最高分:\n"); /*最高分*/
printf("\t\t学号:%s 姓名:%s 分数:%.2f\n",stud[j].number,stud[j].name,stud[j].subject[4]);
printf("\t科目E的最低分是:\n"); /*最低分*/
printf("\t\t学号:%s 姓名:%s 分数:%.2f\n",stud[k].number,stud[k].name,stud[k].subject[4]);
printf("\t科目E的平均分是 %5.2f\n",average[4]); /*平均分*/
break;
default:printf("输入错误！请输入1~5之间的数\n");
}
sum=0;
getchar();
printf("是否继续进行统计?(y/n)");
gets(str);
if(str[0]=='y'||str[0]=='Y') ;
else break;
}
}
}
#include"head.h"
int writetotext(student stud[]) /*将所有记录写入文件*/
{
int i=0,j;
FILE *fp;
char filename[20];
printf("输入文件名称:");
gets(filename);
fp=fopen(filename,"w");
fprintf(fp,"%d\n",numstus);
while(i<numstus)
{
fprintf(fp,"%s %s %s ",stud[i].number,stud[i].name,stud[i].sex);
for(j=0;j<numsubs;j++)
fprintf(fp,"%f ",stud[i].subject[j]);
fprintf(fp,"%f %f %d ",stud[i].score,stud[i].average,stud[i].index);
i++;
}
fclose(fp);
printf("已成功存储!\n");
display(stud,0,numstus-1);
numstus=0;
return 0;
}
#include"head.h"
void welcome()
{
printf("\t*************************************************************\n");
printf("\t\t\t\t这是一个学生成绩管理系统\n\t\t\t\t 倾情奉献 欢迎使用!\n");
printf("\t*************************************************************\n");
}
void showtable()
{
printf("---------------------------------------------------------------------------------------\n");
printf("学号\t姓名\t性别\tA\tB\tC\tD\tE\t总分\t平均分\t名次\n");
printf("---------------------------------------------------------------------------------------\n");
}
void display(student stud[],int n1,int n2)
{
int i;
showtable(); /*显示表头*/
for(i=n1;i<=n2;i++)
printf("%s\t%s\t%s\t%.2f\t%.2f\t%.2f\t%.2f\t%.2f\t%.2f\t%.2f\t%d\t\n",stud[i].number,stud[i].name,stud[i].sex,stud[i].subject[0],stud[i].subject[1],stud[i].subject[2],stud[i].subject[3],stud[i].subject[4],stud[i].score,stud[i].average,stud[i].index);
/*通过循环输出数据*/
}
void display1()
{
printf("\t\t本系统由计应精英一组亲情制作\n\n");
printf("\t\t制作人员列表: (按比划)\n");
printf("\t\t王庆斌\t\t\t张威\n\t\t李智\t\t\t周在峰\n\t\t杨凯\t\t\t胡杨\n");
printf("\n\n");
getchar();
}
#include"head.h"
#include<string.h>
void amendrecord(student stud[])
{
char str[5]; /*供用户输入*/
int i=-1,j;
if(numstus==0) /*没有记录返回*/
printf("没有可供修改的记录！");
while(i<0)
{
i=findrecord(stud);
if(i>=0)
{
printf("要删除这个学生的信息吗?(y/n)");
gets(str);
if(str[0]=='y'||str[0]=='Y')
{
deleterecord(stud,i);
count(stud);
}
else
{
printf("确定要修改这个学生的信息吗?(y/n)");
gets(str);
if(str[0]=='y'||str[0]=='Y')
{
printf("下面请重新输入学生的信息:\n");
printf("请输入学号:");
gets(stud[i].number);
printf("请输入姓名:");
gets(stud[i].name);
printf("请输入性别(男/女 1/0):");
gets(str);
if(str[0]=='0')
strcpy(stud[i].sex,"女");
else
strcpy(stud[i].sex,"男");
stud[i].score=0;
printf("请按顺序输入成绩:");
for(j=0;j<numsubs;j++)
{
scanf("%f",&stud[i].subject[j]);
stud[i].score+=stud[i].subject[j];
}
getchar();
stud[i].average=stud[i].score/numsubs;
}
count(stud);
}
display(stud,0,numstus-1);
}
printf("是否继续进行其他修改?(y/n)\n");
gets(str);
if(str[0]=='y'||str[0]=='Y')
i=-1;
else i=1;
}
}
void deleterecord(student stu[],int i) /*删除信息*/
{
int j;
while(i>=0)
{
for(j=i;j<numstus;j++)
stu[j]=stu[j+1];
numstus--;
printf("删除成功!\n");
}
}
void count(student stud[])
{
int i,j;
for(i=0;i<numstus;i++)
{
stud[i].index=1;
for(j=0;j<numstus;j++)
if(stud[j].score>stud[i].score)
stud[i].index++;
}
}
#include "head.h"
void addrecord(student stud[])
{
int i=0,j,num;
char str[5];
if(numstus!=0)
{
printf("已有记录存在是否覆盖?(y/n)\n");
gets(str);
if(str[0]=='Y'||str[0]=='y')
i=0;
else i=numstus;
}
printf("请输入增加的学生信息条目数:");
scanf("%d",&num);
if(i==0)
numstus=num;
else numstus+=num;
if(numstus>lens)
{
lens+=50;
pointer=(student *)realloc(pointer,lens*LEN);
}
printf("请输入学生信息:\n");
for(;i<numstus;i++)
{
getchar();
printf("请输入学号:");
gets(pointer[i].number);
printf("请输入姓名:");
gets(pointer[i].name);
printf("请输入性别(男/女 1/0):");
gets(pointer[i].sex);
if(pointer[i].sex[0]=='0') strcpy(pointer[i].sex,"女");
else strcpy(pointer[i].sex,"男");
printf("请输入各科成绩:(按ABCDE的顺序):");
stud[i].score=0;
for(j=0;j<numsubs;j++)
{
scanf("%f",&stud[i].subject[j]); /*计算总分*/
stud[i].score+=stud[i].subject[j];
}
stud[i].average=stud[i].score/numsubs; /*计算平均分*/
}
count(stud); /*附名次*/
display(stud,0,numstus-1);
getchar();
}#include "head.h"
int numstus;
int lens;
student *pointer;
void main()
{
int i=1;
char str[2];
lens=100;
pointer=(student *)malloc(lens*LEN); /*分配内存*/
numstus=0;
welcome(); /*欢迎界面*/
while(i>0)
{
i=menu_select(); /*控制菜单*/
switch(i)
{
case 1:addrecord(pointer);break; /*增加学生信息*/
case 2:findrecord(pointer);break; /*查询学生信息*/
case 3:amendrecord(pointer);break; /*修改学生信息*/
case 4:sort(pointer);break; /*学生信息排序*/
case 5:statistic(pointer);break; /*统计信息*/
case 6:openfile(pointer);break; /*打开文件*/
case 7:writetotext(pointer);break; /*保存文件*/
case 8:display(pointer,0,numstus-1);break; /*显示记录*/
case 0:
if(numstus!=0) printf("是否保存当前记录?(y/n)");
gets(str);
if(str[0]=='y'||str[0]=='Y')
writetotext(pointer);
i=-1;break; /*退出系统*/
default:printf("请输入数字0~8:\n");i=1; /*输入错误*/
}
}
printf("\t\t欢迎再次使用本系统。\n\n");
display1();
}
自己一改就能用,给我加分哈!
⑶ java库存管理系统源码（有谁做过类似这个项目）求源码 谢谢
我有进销存的源码MVC、Hibernate的都有，但是数据库是SQL Server 2000的。开发工具采用Eclipse，开发应用服务器采用Tomcat 。不知可以不？？？
⑷ 急求VB+ACCESS学生信息管理系统源码(一定要可以运行的哦)
学生档案管理系统 vb
——————————————附录程序清单及注释
程序清单6.1
Option Explicit
Dim Fi
leName As String '文件名，用于打开、宴脊保存晌段渗文件
Dim UndoString As String '用于 Undo 操作
Dim UndoNew As String '用于 Undo 操作
Private Sub ImgUndoDisable()
'禁用“Undo”按钮
UndoString = ""
UndoNew = ""
ImgUndo.Enabled = False
ImgUndo.Picture = ImageDisable.ListImages("Undo").Picture
End Sub
Private Sub ImgUndoEnable()
'有效“Undo”按钮
ImgUndo.Enabled = True
ImgUndo.Picture = ImageUp.ListImages("Undo").Picture
End Sub
Private Sub Check_ImgPaste()
'设置粘贴按钮
If Len(Clipboard.GetText) > 0 Then
ImgPaste.Enabled = True
ImgPaste.Picture = ImageUp.ListImages("Paste").Picture
Else
ImgPaste.Enabled = False
ImgPaste.Picture = ImageDisable.ListImages("Paste").Picture
End If
End Sub
Private Sub Check_ImgCutCopy()
'设置剪切、复制按钮
If Text1.SelLength > 0 Then
ImgCut.Enabled = True
ImgCut.Picture = ImageUp.ListImages("Cut").Picture
ImgCopy.Enabled = True
ImgCopy.Picture = ImageUp.ListImages("Copy").Picture
Else
ImgCut.Enabled = False
ImgCut.Picture = ImageDisable.ListImages("Cut").Picture
ImgCopy.Enabled = False
ImgCopy.Picture = ImageDisable.ListImages("Copy").Picture
End If
End Sub
Private Sub BackColor_Click()
CommonDialog1.ShowColor
Text1.BackColor = CommonDialog1.Color
End Sub
Private Sub Box_Click()
'显停工具栏
If Box.Checked Then
'将停显工具栏
Box.Checked = False
CoolBar1.Visible = False
Else
Box.Checked = True
CoolBar1.Visible = True[NextPage]
End If
Form_Resize '重新调整控件位置
End Sub
Private Sub Close_Click()
Dim FileNum As Integer
If Len(FileName) > 0 Then
'有输入文件名
FileNum = FreeFile() '获得可用文件号
Open FileName For Output As FileNum '打开输出文件
'如果无指定文件，则创建新文件燃袭
Print #FileNum, Text1.Text '输出文本
Close FileNum '关闭文件
End If
Text1.Text = ""
FileName = ""
End Sub
Private Sub ComboSize_Click()
Text1.FontSize = Val(ComboSize.Text)
End Sub
Private Sub ComboFont_Click()
Text1.FontName = ComboFont.Text
End Sub
Private Sub Copy_Click()
Clipboard.SetText Text1.SelText '复制文本到剪裁板
End Sub
Private Sub Cut_Click()
Clipboard.SetText Text1.SelText '复制文本到剪裁板
Text1.SelText = "" '清选择的文本
End Sub
Private Sub DataTime_Click()
Text1.SelText = Now
End Sub
Private Sub Delete_Click()
Text1.SelText = "" '清选择的文本
End Sub
Private Sub Edit_Click()
'当程序显示“编辑”子菜单前，触发该程序
If Text1.SelLength > 0 Then
'文本框中有选中的文本
Cut.Enabled = True
Copy.Enabled = True
Delete.Enabled = True
Else
Cut.Enabled = False
Copy.Enabled = False
Delete.Enabled = False
End If
If Len(Clipboard.GetText()) > 0 Then
'剪裁板中有文本数据
Paste.Enabled = True
Else
'没有可粘贴的文本
Paste.Enabled = False
End If
End Sub
Private Sub Exit_Click()
Unload Me
End Sub
Private Sub FindText_KeyPress(KeyAscii As Integer)
Dim BeginPos As Long
If KeyAscii = 13 Then
BeginPos = InStr(1, Text1.Text, FindText.Text, vbTextCompare)
If BeginPos > 0 Then
Text1.SelStart = BeginPos - 1
Text1.SelLength = Len(FindText.Text)
End If
End If
End Sub
Private Sub Fontcolor_Click()
CommonDialog1.ShowColor
Text1.ForeColor = CommonDialog1.Color
End Sub
Private Sub Form_Load()
Dim i As Integer
'加载图像
ImgNew.Picture = ImageUp.ListImages("New").Picture
ImgOpen.Picture = ImageUp.ListImages("Open").Picture
ImgSave.Picture = ImageUp.ListImages("Save").Picture
ImgUndo.Picture = ImageDisable.ListImages("Undo").Picture
Check_ImgPaste
Check_ImgCutCopy
'加载系统字体
For i = 0 To Screen.FontCount - 1
ComboFont.AddItem Screen.Fonts(i)
Next i
End Sub
Private Sub Form_Resize()
Dim TextTop As Long
'修改工具条大小
CoolBar1.Top = Me.ScaleTop
Me.ScaleLeft
Text1.Width = Me.ScaleWidth
If Me.ScaleHeight > CoolBar1.Height Then
Text1.Height = Me.ScaleHeight - TextTop
Else
Text1.Height = 0
End If
End Sub
Private Sub ImgCopy_Click()
Copy_Click '复制
Check_ImgPaste
Check_ImgCutCopy
End Sub
Private Sub ImgCopy_MouseDown(Button As Integer, Shift As Integer,
X As Single, Y As Single)
'“按下”按钮
If Button = 1 Then
ImgCopy.Picture = ImageDown.ListImages("Copy").Picture
End If
End Sub
Private Sub ImgCopy_MouseMove(Button As Integer, Shift As Integer,
X As Single, Y As Single)
Label1 = "将选择的文本复制到剪裁板"
'判断鼠标位置,显示不同图像
If Button = 1 And (X > 0 And X < ImgNew.Width And Y > 0 And Y <
ImgNew.Height) Then
ImgCopy.Picture = ImageDown.ListImages("Copy").Picture[NextPage]
ElseIf Button = 1 Then
ImgCopy.Picture = ImageUp.ListImages("Copy").Picture
End If
End Sub
Private Sub ImgCopy_MouseUp(Button As Integer, Shift As Integer, X
As Single, Y As Single)
If Button = 1 Then
'“抬起”按钮
ImgCopy.Picture = ImageUp.ListImages("Copy").Picture
End If
End Sub
Private Sub ImgCut_Click()
'If Text1.SelLength > 0 Then
Cut_Click '剪切
Check_ImgPaste
Check_ImgCutCopy
'End If
End Sub
Private Sub ImgCut_MouseDown(Button As Integer, Shift As Integer,
X As Single, Y As Single)
If Button = 1 Then
'“按下”按钮
ImgCut.Picture = ImageDown.ListImages("Cut").Picture
End If
End Sub
Private Sub ImgCut_MouseMove(Button As Integer, Shift As Integer,
X As Single, Y As Single)
Label1 = "剪切选择的文字到剪裁板"
'判断鼠标位置,显示不同图像
If Button = 1 And (X > 0 And X < ImgNew.Width And Y > 0 And Y <
ImgNew.Height) Then
ImgCut.Picture = ImageDown.ListImages("Cut").Picture
ElseIf Button = 1 Then
ImgCut.Picture = ImageUp.ListImages("Cut").Picture
End If
End Sub
Private Sub ImgCut_MouseUp(Button As Integer, Shift As Integer, X
As Single, Y As Single)
If Button = 1 Then
'“抬起”按钮
ImgCut.Picture = ImageUp.ListImages("Cut").Picture
End If
End Sub
Private Sub ImgNew_Click()
New_Click
End Sub
Private Sub ImgNew_MouseDown(Button As Integer, Shift As Integer,
X As Single, Y As Single)
If Button = 1 Then
'“按下”按钮
ImgNew.Picture = ImageDown.ListImages("New").Picture
End If
End Sub
Private Sub ImgNew_MouseMove(Button As Integer, Shift As Integer,
X As Single, Y As Single)
Label1 = "创建新文件" '修改提示信息
'判断鼠标位置,显示不同图像
If Button = 1 And (X > 0 And X < ImgNew.Width And Y > 0 And Y <
ImgNew.Height) Then
ImgNew.Picture = ImageDown.ListImages("New").Picture
ElseIf Button = 1 Then
ImgNew.Picture = ImageUp.ListImages("New").Picture
End If
End Sub
Private Sub ImgNew_MouseUp(Button As Integer, Shift As Int
eger, X As Single, Y As Single)
If Button = 1 Then
'“抬起”按钮
ImgNew.Picture = ImageUp.ListImages("New").Picture
End If
End Sub
Private Sub ImgOpen_Click()
Open_Click
End Sub
Private Sub ImgOpen_MouseDown(Button As Integer, Shift As Integer,
X As Single, Y As Single)
'“按下”按钮
If Button = 1 Then
ImgOpen.Picture = ImageDown.ListImages("Open").Picture
End If
End Sub
Private Sub ImgOpen_MouseMove(Button As Integer, Shift As Integer,
X As Single, Y As Single)
Label1 = "选择文件名并打开文件"
'判断鼠标位置,显示不同图像
If Button = 1 And (X > 0 And X < ImgNew.Width And Y > 0 And Y <
ImgNew.Height) Then
ImgOpen.Picture = ImageDown.ListImages("Open").Picture
ElseIf Button = 1 Then
ImgOpen.Picture = ImageUp.ListImages("Open").Picture
End If
End Sub
Private Sub ImgOpen_MouseUp(Button As Integer, Shift As Integer, X
As Single, Y As Single)
If Button = 1 Then
'“抬起”按钮
ImgOpen.Picture = ImageUp.ListImages("Open").Picture
End If
End Sub
Private Sub ImgPaste_Click()
Paste_Click '粘贴
End Sub
Private Sub ImgPaste_MouseDown(Button As Integer, Shift As
Integer, X As Single, Y As Single)
If Button = 1 Then
'“按下”按钮
ImgPaste.Picture = ImageDown.ListImages("Paste").Picture[NextPage]
End If
End Sub
Private Sub ImgPaste_MouseMove(Button As Integer, Shift As
Integer, X As Single, Y As Single)
Label1 = "粘贴文本到当前光标位置"
'判断鼠标位置,显示不同图像
If Button = 1 And (X > 0 And X < ImgNew.Width And Y > 0 And Y <
ImgNew.Height) Then
ImgPaste.Picture = ImageDown.ListImages("Paste").Picture
ElseIf Button = 1 Then
ImgPaste.Picture = ImageUp.ListImages("Paste").Picture
End If
End Sub
Private Sub ImgPaste_MouseUp(Button As Integer, Shift As Integer,
X As Single, Y As Single)
If Button = 1 Then
eName For Output As FileNum '打开输出文件
'如果无指定文件，则创建新文件
Print #FileNum, Text1.Text '输出文本
Close FileNum '关闭文件
ImgUndoDisable
Else
MsgBox "不能保存无名文件" + Chr(13) + Chr(10) + "请选择“文件”菜单
的“保存”项", , "警告"
End If
End Sub
Private Sub ImgSave_MouseDown(Button As Integer, Shift As Integer,
X As Single, Y As Single)
If Button = 1 Then
ImgSave.Picture = ImageDown.ListImages("Save").Picture
End If
End Sub
Private Sub ImgSave_MouseMove(Button As Integer, Shift As Integer,
X As Single, Y As Single)
Label1 = "保存当前文件"
'判断鼠标位置,显示不同图像
If Button = 1 And (X > 0 And X < ImgNew.Width And Y > 0 And Y <
ImgNew.Height) Then
ImgSave.Picture = ImageDown.ListImages("Save").Picture
ElseIf Button = 1 Then
ImgSave.Picture = ImageUp.ListImages("Save").Picture
End If
Private Sub ImgUndo_MouseMove(Button As Integer, Shift As Integer,
X As Single, Y As Single)
Label1 = "取消当前操作"
'判断鼠标位置,显示不同图像
If Button = 1 And (X > 0 And X < ImgNew.Width And Y > 0 And Y <
ImgNew.Height) Then
ImgUndo.Picture = ImageDown.ListImages("Undo").Picture
ElseIf Button = 1 Then
ImgUndo.Picture = ImageUp.ListImages("Undo").Picture
End If
End Sub
Private Sub ImgUndo_MouseUp(Button As Integer, Shift As Integer, X
As Single, Y As Single)
If Button = 1 Then
'“抬起”按钮
ImgUndo.Picture = ImageUp.ListImages("Undo").Picture
End If
End Sub
Private Sub New_Click()
FileName = ""
Text1 = ""
ImgUndoDisable
End Sub
Private Sub Open_Click()
Dim FileNum As Integer
Dim buffer As String
Dim buffer1 As String
Dim FileSize As Long
Dim MaxLen As Long
MaxLen = 32768 '文件最大长度
CommonDialog1.ShowOpen '显示"打开文件"对话框
If Len(CommonDialog1.FileName) > 0 Then
'有输入文件名
FileName = CommonDialog1.FileName '保存文件名
FileSize = FileLen(FileName) '获得文件长度
If FileSize > MaxLen Then[NextPage]
'文件超长
MsgBox "该文件过大，只能显示部分文本", , "警告"
Exit Sub
End If
Screen.MousePointer = 11 '设置鼠标为沙漏
FileNum = FreeFile() '获得可用文件号
Open FileName For Input As FileNum '以顺序输入方式打开文件
Do While Not EOF(FileNum) And Len(buffer) < MaxLen '读必须文本小于
32K
Line Input #FileNum, buffer1 '读一行文字
buffer = buffer + buffer1 + Chr(13) + Chr(10) '加入回车换行符
Loop '循环体
Close FileNum '关闭文件
ImgUndoDisable '取消 Undo 功能
Text1.Text = buffer '显示文本
UndoNew = buffer '保存文本
buffer = "" '释放内存
buffer1 = ""
Screen.MousePointer = 0 '恢复鼠标指针
Me.Caption = "记事本 - " + FileName '修改标题显示
End If
End Sub
Private Sub Paste_Click()
Text1.SelText = Clipboard.GetText
End Sub
Private Sub Picture1_MouseMove(Button As Integer, Shift As
Integer, X As Single, Y As Single)
Label1 = "工具栏"
End Sub
Private Sub Picture1_Resize()
If Picture1.Width > Label1.Left Then
Label1.Width = Picture1.ScaleWidth - Label1.Left
End If
End Sub
Private Sub Save_Click()
Dim FileNum As Integer '文件句柄号
CommonDialog1.ShowSave '显示保存对话框
If Len(CommonDialog1.FileName) > 0 Then
'有输入文件名
FileName = CommonDialog1.FileName '保存文件名
FileNum = FreeFile() '获得可用文件号
Open FileName For Output As FileNum '打开输出文件
'如果无指定文件，则创建新文件
Print #FileNum, Text1.Text '输出文本
Close FileNum '关闭文件
Me.Caption = "记事本 - " + FileName '修改标题显示
ImgUndoDisable
End If
End Sub
Private Sub Text1_Change()
If Not ImgUndo.Enabled Then
'使“Undo”按钮可用
ImgUndoEnable
End If
UndoString = UndoNew
UndoNew = Text1
End Sub
Private Sub Text1_Click()
Check_ImgCutCopy
End Sub
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
Check_ImgCutCopy
End sub
End Sub
Private Sub ImgSave_MouseUp(Button As Integer, Shift As Integer, X
As Single, Y As Single)
If Button = 1 Then
'“抬起”按钮
ImgSave.Picture = ImageUp.ListImages("Save").Picture
End If
End Sub
Private Sub ImgUndo_Click()
Text1.Text = UndoString
End Sub
Private Sub ImgUndo_MouseDown(Button As Integer, Shift As Integer,
X As Single, Y As Single)
If Button = 1 Then
'“按下”按钮
ImgUndo.Picture = ImageDown.ListImages("Undo").Picture
End If
End Sub
⑸ 求学生成绩管理系统的源代码，c语言课程设计作业……
这个我可以帮你改
⑹ 基于Java web 学生管理系统 最简单的就行 要求实现数据库的增删改查 要求个源代码和包
学生管理系统这弯基个非常简单啊, 目前看设计掘睁两个表就行
管理员表埋散谨, 存储管理员密码与用户名
学生表, 存储学生基本信息
servlet+jsp对学生进行增删改查即可, 数据库操作你可以用DBUtisl自己封装一个帮助类, 对减少代码量冗余有很大提升
⑺ 在linux系统里qstat是什么意思
qstat 不是linux命令，此命令用于PBS公开源代码的作业管理系统。x0dx0aqstat 命令—用于查询作业状态信息x0dx0a命令格式：qatat [-f][-a][-i] [-n][-s] [-R] [-Q][-q][-B][-u]x0dx0a参数说明：x0dx0a-f jobid 列出指定作业的信息x0dx0a-a 列出系统所戚拍有作业x0dx0a-i 列出不在运行的作业x0dx0a-n 列出分配给此作业的结点x0dx0a-s 列出队列管理员与scheler 所提供的建议x0dx0a-R 列出磁盘预留信息x0dx0a-Q 操作符是destination id，指明请求的是队列状态x0dx0a-q 列出队列状态，并以alternative 形式显示x0dx0a-au userid 列出指定用户的所有作业x0dx0a-B 列出PBS Server 信息x0dx0a-r 列出所有正在运行的作业x0dx0a-Qf queue 列出指定队列的信息x0dx0a-u 若操作符为作业号，则列出其状态。x0dx0ax0dx0a若操作符为destination id，粗基则列出运行在岩仔谨其上的属于user_list 中用户的作业状态。x0dx0a例：# qstat -f 211 查询作业号为211 的作业的具体信息。
⑻ 求完整的java学生管理系统(包括源代码,数据库，登陆页面)
我这里有，但是是SSH框架，你会部署吗？
⑼ java仓库管理系统源码基于Java的仓库管理系统。求完整的源代码。跪谢!!!只有5币了
给你个流程，自己学着做，做出来你会很有成就感的，对你的技术也有很大帮助：
仓库管理系统流程说明
(一)进货管理
现代商业管理，进货环节尤为重要，要求现场实时下订单（Purchase Order），及时补货。
1、 业务员根据手中的手持终端（Handheld Terminal，简称HHT），调用后台资料，与实际库存资料进行实 时对照，并可通过终端无线驱动打印机打印对照表；
2、 业务员根据实时对照表，现场决定是否应补货或退货，通过终端调用后台数据库制定订单，以最快速度进行补货或退货；维持库存的合理性。
(二)上架
将货物存放到货位上。
(三)交叉驳运
这种作业不对商品进行储存，只处理信息分类。作业接受来自制造商的顾客组合订货，并把他们装运到个别的顾客处去。交叉站台是指多对多的配送体系中的货物调整。直接通过交叉换货后为客户配送，可以避免出入库的麻烦。
(四)收货管理
1、 供货商按照订单要求将货品送到商场收货处；
2、 商场验收人员利用终端调用后台数据库中相应的订单存盘，与供货商送来的商品逐一检查对照，并进行确认，包括：商品编码、商品数量、生产地、品种、规格、包装时间、保质时间、旧价格、新价格、变更时间、条形码标准等信息；
注：终端在系统未授权的情况下无法修改订单。
3、 商场验收人员在终端上按[确认]键，将信息上传到后台服务器，并同时记录收货时间和收货人；
4、 终端可以现场实时调用后台数据库中供货商的历史订单，逐一查验对照核算；
5、 通过终端无线驱动打印机打印收货清单；
6、 在查验过程中出现问题，可以拒收货物。