• 大小: 117KB
    文件类型: .rar
    金币: 1
    下载: 0 次
    发布日期: 2021-05-05
  • 语言: Matlab
  • 标签: matlab  成绩管理  

资源简介

用matlab自带的GUI界面设计了一个成绩管理界面,可进行成绩的载入、查询、绘图、求平均分和存储!可直接用!

资源截图

代码片段和文件信息

function varargout = chengji(varargin)
gui_Singleton = 1;
gui_State = struct(‘gui_Name‘       mfilename ...
                   ‘gui_Singleton‘  gui_Singleton ...
                   ‘gui_OpeningFcn‘ @chengji_OpeningFcn ...
                   ‘gui_OutputFcn‘  @chengji_OutputFcn ...
                   ‘gui_LayoutFcn‘  []  ...
                   ‘gui_Callback‘   []);
if nargin && ischar(varargin{1})
    gui_State.gui_Callback = str2func(varargin{1});
end
if nargout
    [varargout{1:nargout}] = gui_mainfcn(gui_State varargin{:});
else
    gui_mainfcn(gui_State varargin{:});
end
% End initialization code - DO NOT EDIT

% --- Executes just before chengji is made visible.
function chengji_OpeningFcn(hobject eventdata handles varargin)

handles.output = hobject;
Hc_grid=uicontrol(gcf‘style‘‘toggle‘‘string‘‘Grid‘‘position‘[650 165 60 29]‘callback‘‘grid‘);%在图形窗口画网格线

guidata(hobject handles);

function varargout = chengji_OutputFcn(hobject eventdata handles) 
varargout{1} = handles.output;

% --- Executes on selection change in listbox1.
function listbox1_Callback(hobject eventdata handles)
value=get(hobject‘value‘)-1;
if(value==0)
  set(handles.edit1‘string‘‘please choose a name‘); %显示成绩 
else
set(handles.edit1‘string‘num2str(handles.chengji(value:)));%确保edit1中是数字
end
% --- Executes during object creation after setting all properties.
function listbox1_CreateFcn(hobject eventdata handles)
if ispc && isequal(get(hobject‘BackgroundColor‘) get(0‘defaultUicontrolBackgroundColor‘))
    set(hobject‘BackgroundColor‘‘white‘);
end

function edit1_Callback(hobject eventdata handles)
function edit1_CreateFcn(hobject eventdata handles)
if ispc && isequal(get(hobject‘BackgroundColor‘) get(0‘defaultUicontrolBackgroundColor‘))
    set(hobject‘BackgroundColor‘‘white‘);
end


function edit2_Callback(hobject eventdata handles)
function edit2_CreateFcn(hobject eventdata handles)
if ispc && isequal(get(hobject‘BackgroundColor‘) get(0‘defaultUicontrolBackgroundColor‘))
    set(hobject‘BackgroundColor‘‘white‘);
end

% --- Executes on button press in pushbutton1.
function pushbutton1_Callback(hobject eventdata handles)
[FileName PathName]=uigetfile({‘*.xls‘‘Excel Files(*.xls)‘;‘*.txt‘‘Text Files(*.txt)‘;‘*.*‘‘All Files(*.*)‘}‘Choose a file‘);%uigetfile用来选择读入的文件
L=length(FileName);
if(L<5)
    errordlg(‘请选择正确文件‘‘File Open Error‘);%建立一个默认参数的错误对话框
    return;
end
test=FileName(1end-3:end);%定义一个变量test用于文件类型的确定
str=[PathName FileName];
set(handles.edit2‘string‘str);%使打来的文件路径和文件名显示在edit2
global len;global ave1;global ave2;global ave3;
global d1;global d2;global d3;
switch test
    case ‘.txt‘ %当文件为记事本时
    fin=fopen(‘chengji.txt‘‘r‘);
    str=fgetl(fin);%按行从文件中读取数据,但不读取换行符
    [str1 str2 str3 str4]=strread(str‘%s %s %s %s‘‘delimiter‘‘ ‘);%delimiter用于指定分隔符;%s:输出字符串
    xingming(1)=str1;%就是单词name
    counter=2;
    h=waitbar(0‘please wai

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      11324  2009-11-06 21:30  任宝平(07通一)\chengji.asv

     文件       7083  2009-12-08 15:02  任宝平(07通一)\chengji.fig

     文件      11324  2009-11-06 21:36  任宝平(07通一)\chengji.m

     文件      10752  2009-06-09 21:02  任宝平(07通一)\chengji.xls

     文件       9728  2009-06-09 15:59  任宝平(07通一)\chengji2.xls

     文件      10240  2009-06-11 12:36  任宝平(07通一)\Matlab大作业论文(封面).wps

     文件     220431  2009-06-11 12:36  任宝平(07通一)\Matlab大作业论文(正文).doc

     目录          0  2009-12-28 11:09  任宝平(07通一)

----------- ---------  ---------- -----  ----

               280882                    8


评论

共有 条评论