一、简介

基于matlab GUI界面之万年历。本程序主要是一个时钟软件，包括一个时钟表和一个日历。程序自动运行时，显示系统当前日期和时间，日期和时间可以由用户自行更改。

二、源代码

function myclock 
    global aa ti hs hm hh;
    aa=1;
    hs=0;hm=0;hh=0;
     hfig=figure('NumberTitle','off','position',[624 118 600 350],...
       'name','日历','MenuBar','none','color',[0.8 0.7 0.8]);
        editdate=['s=clock;',...
           ' p1={''年'',''月 '',''日''};',...
           'A=inputdlg(p1,''日期:'',1);',...
           ' s(1)=str2num(A{1});',...
           ' s(2)=str2num(A{2});',...
           ' s(3)=str2num(A{3});',...
           'rili(s);'  ] 
           function f=ck(ti)
global aa hs hm hh
set(gca,'position',[[0 0 0.5 0.9]]) 
A=linspace(0,6.3,100); 
x1=8*cos(A); 
y1=8*sin(A); 
x2=7*cos(A); 
y2=7*sin(A); 
% plot(x1,y1,'b','linewidth',1.4) 
hold on 
% plot(x2,y2,'b','linewidth',3.5) 
fill(0.4*cos(A),0.4*sin(A),'w'); 
axis off 
axis([-10 10 -10 10]) 
axis equal 
for k=1:12; 
xk=9*cos(-2*pi/12*k+pi/2);
yk=9*sin(-2*pi/12*k+pi/2);
plot([xk/9*8 xk/9*7],[yk/9*8 yk/9*7],'color',[0.8 0.1 0.5]) 
h=text(xk-0.5,yk,num2str(k),'fontsize',13,'color',[0.9 0.3 0.8]); 
end

三、运行结果

【数据分析】基于matlab GUI万年历【含Matlab源码 257期】_当前日期

四、备注

版本：2014a