2022年MATLAB学生成绩管理系统 .pdf

function varargout = untitled1(varargin) gui_Singleton = 1; gui_State = struct(gui_Name, mfilename, . gui_Singleton, gui_Singleton, . gui_OpeningFcn, untitled1_OpeningFcn, . gui_OutputFcn, untitled1_OutputFcn, . gui_LayoutFcn, , . gui_Callback, ); if nargin & ischar(varargin1) gui_State.gui_Callback = str2func(varargin1); end if nargout varargout1:nargout = gui_mainfcn(gui_State, varargin:); else gui_mainfcn(gui_State, varargin:); end function untitled1_OpeningFcn(hObject, eventdata, handles, varargin) 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 1 页，共 8 页 - - - - - - - - - handles.output = hObject; %取数handles.data=; %生成 data 空数组handles.text=; %生成 text空数组guidata(hObject, handles); %保存更新数据handles.output = hObject; guidata(hObject, handles); function varargout = untitled1_OutputFcn(hObject, eventdata, handles) varargout1 = handles.output; % excel表格入口function daoru_Callback(hObject, eventdata, handles) %可编辑信息表格导入文本框function daoru_CreateFcn(hObject, eventdata, handles) if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white); end function sure_Callback(hObject, eventdata, handles) %导入数据确定按钮FileName,PathName=uigetfile(*.xls,Choose a file); str=PathName,FileName; set(handles.daoru,string,str); %显示入可编辑数据导入文本框 data,text_data=xlsread(str); %读取 str并生成新的数组 mess1=data(:,1); %访问 excel 表格第一列 set(handles.showI,string,mess1) %把字符串显示在显示学号列表 mess3=data(:,3); %访问 excel 表格第三列 set(handles.showc,string,mess3) %把字符串显示在显示语文列表 mess4=data(:,4); %访问 excel 列表第四列 set(handles.showm,string,mess4) %把字符串显示在显示数学列表名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 2 页，共 8 页 - - - - - - - - - mess5=data(:,5); %访问 excel 列表第五列 set(handles.showe,string,mess5) %把字符串显示在显示英语列表 mess2=text_data(2:end,2); %访问 excel 列表第二列 set(handles.shown,string,mess2) %把字符串显示在显示名字列表 handles.mess2=mess2 handles.data=data; %保存数据 handles.text=text_data; guidata(hObject, handles); % 信息查询显示口function searchz_Callback(hObject, eventdata, handles) %可编辑总分输出文本框function searchz_CreateFcn(hObject, eventdata, handles) if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white); end function searche_Callback(hObject, eventdata, handles) %可编辑英语输出文本框function searche_CreateFcn(hObject, eventdata, handles) if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white); end function searchm_Callback(hObject, eventdata, handles) %可编辑数学输出文本框function searchm_CreateFcn(hObject, eventdata, handles) if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white); 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 3 页，共 8 页 - - - - - - - - - end function searchc_Callback(hObject, eventdata, handles) %可编辑语文输出文本框function searchc_CreateFcn(hObject, eventdata, handles) if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white); end function searchp_Callback(hObject, eventdata, handles) %可编辑名次输出文本框function searchp_CreateFcn(hObject, eventdata, handles) if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white); end % 信息输入口function ID_Callback(hObject, eventdata, handles) %可编辑学号输入信息文本框function ID_CreateFcn(hObject, eventdata, handles) if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white); end function name_Callback(hObject, eventdata, handles) %可编辑名字输入信息文本框function name_CreateFcn(hObject, eventdata, handles) if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white); end 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 4 页，共 8 页 - - - - - - - - - function searchso_Callback(hObject, eventdata, handles) %搜索确定按钮str=get(handles.ID,string); %学号字符串信息输入查找if length(str)=0 %空字符串str_temp=str2double(str); %字符串转换为数值l1=handles.data(:,1); l2=length(l1); l3=l2+201200; if (201200str_temp)&(str_temp=l3) %学号查询范围 set(handles.name,string,) %名字输入框为空 index=find(handles.data(:)=(str_temp); %查找全元素与学号数值相等的数据 i,j=ind2sub(size(handles.data),index); %把单序号转换成全下表编号 str1=handles.data(i,:); %生成只访问i 行的数组 str11=; %生成新的空数组str11 for i=1:size(handles.data,2) %for语句，初始值为 1，步长为1，最大值为size值end str11=strcat(str11,num2str(str1(i); %横向连接字符串 set(handles.searchc,string,num2str(str1(3); %把字符串显示在显示语文列表 set(handles.searchm,string,num2str(str1(4); %把字符串显示在显示数学列表 set(handles.searche,string,num2str(str1(5); %把字符串显示在显示英语列表 set(handles.searchz,string,num2str(str1(6); %把字符串显示在显示总分列表 i=handles.data(:,6); %总分升序 i=flipud(sort(i); %总分降序 val=find(i=str1(6); %总分名次 val=val(1); %总分名次显示 set(handles.searchp,string,num2str(val) %总分名次显示else set(handles.searchc,string,Nothing); %显示无数据 set(handles.searchm,string,Nothing); set(handles.searche,string,Nothing); set(handles.searchz,string,Nothing); set(handles.searchp,string,Nothing); end 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 5 页，共 8 页 - - - - - - - - - else name1=get(handles.name,string); %获得信息入口名字 name2=char(handles.text(2:end,2); %名字字符串转换 name11=name1(1) %只显示姓 name12=name1(2) %只显示名 name21=char(name2(:,1) %只显示姓 name22=name2(:,2) %只显示名 i,j=find(name21=name11) %姓位置查找 m,n=find(name22=name12) %名位置查找 if i=m %行标确定 str1=handles.data(i,:); %查找全部数据 set(handles.searchc,string,num2str(str1(3) %把字符串显示在显示语文列表 set(handles.searchm,string,num2str(str1(4) %把字符串显示在显示数学列表 set(handles.searche,string,num2str(str1(5) %把字符串显示在显示英语列表 set(handles.searchz,string,num2str(str1(6) %把字符串显示在显示总分列表 i=handles.data(:,6); %总分升序 i=flipud(sort(i); %总分降序 val=find(i=str1(6); %总分名次 val=val(1); set(handles.searchp,string,num2str(val) %总分名次显示 else set(handles.searchc,string,Nothing); %显示无数据 set(handles.searchm,string,Nothing); set(handles.searche,string,Nothing); set(handles.searchz,string,Nothing); set(handles.searchp,string,Nothing); end end function showI_Callback(hObject, eventdata, handles) %学号显示列表框function showI_CreateFcn(hObject, eventdata, handles) 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 6 页，共 8 页 - - - - - - - - - if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white); end function shown_Callback(hObject, eventdata, handles) %名字显示列表框function shown_CreateFcn(hObject, eventdata, handles) if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white); end function showc_Callback(hObject, eventdata, handles) %语文显示列表框function showc_CreateFcn(hObject, eventdata, handles) if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white); end function showm_Callback(hObject, eventdata, handles) %数学显示列表框function showm_CreateFcn(hObject, eventdata, handles) if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white); end function showe_Callback(hObject, eventdata, handles) %英语显示列表框function showe_CreateFcn(hObject, eventdata, handles) 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 7 页，共 8 页 - - - - - - - - - if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white); end 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 8 页，共 8 页 - - - - - - - - -