作業管理系統源碼
⑴ 醫葯連鎖店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、 在查驗過程中出現問題，可以拒收貨物。