利用单独的M文件并递归地调用该文件，既可以避免多个M文件的复杂性，又可以利用函数的优点。使用开关 switches或if  elseif语句，可将回调函数装入调用函数内。

通常这样一种函数调用的结构为

function guifunc(switch)。

其中switch确定执行哪一个函数开关的参量，它可以是字符串 ' startup ' ， ' close ' ， ' sectolor ' 等等，也可以是代码或数字。如switch是字符串，则可如下面所示的M文件片段那样将开关编程。

if nargin < 1， switch =  ' startup ' ； end；

if ~isstr(switch)， error( ' Invalid argument ' )， end；

if strcmp(switch， ' startup ' )，

elseif strcmp(switch， ' setcolor ' )，

elseif strcmp(switch， ' close ' )，

end

如果是代码或字符串，开关也可以相同方式编程。

if nargin < 1， switch = 0； end；

if isstr(switch)， error( ' Invalid argument ' )， end；

if switch = = 0，

elseif switch = =1，

elseif switch ==2，

end

下面的例子说明了方位角滑标如何可作为单独的函数M文件来实现：

function setview(switch)

if nargin < 1， switch =  ' startup ' ； end；

if ~isstr(switch)， error( ' Invalid argument. ' )； end；

vw = get(gca， ' view ' )； % This information is needed in both sections

if strcmp(switch， ' startup ' ) % Define the controls and tag them

Hc_az = uicontrol(gcf， ' Style ' ， ' slider ' ，...

' Position ' ，[10 5 140 20]，...

' Min ' ，-90， ' Max ' ，90， ' Value ' vw(1)，...

' Tag ' ， ' AZslider ' ，...

' Callback ' ， ' setview( ' set ' ) ' )；

Hc_min=uicontrol(gcf， ' Style ' ， ' text ' ，...

' Position ' ，[10 25 40 20]，...

' String ' ，num2str(get(Hc_az， ' Min ' )))；

Hc_max = uicontrol(gcf， ' Style ' ， ' text ' ，...

' Position ' ，[110 25 40 20]，...

' String ' ，num2str(get(Hc_az， ' Max ' )))；

Hc_cur =uicontrol(gcf， ' Style ' ， ' text ' ，...

' Position ' ，[60 25 40 20]，...

' Tag ' ， ' AZcur ' ，...

' string ' ，num2str(get(Hc_az， ' Value ' )))；

elseif strcmp(switch， ' set ' ) % Execute the Callback

Hc_az=findobj(gcf， ' Tag ' ， ' AZslider ' )；

Hc_cur-findobj(gcf， ' Tag ' ， ' AZcur ' )；

str = num2str(get(Hc_az， ' Value ' ))；

newview - [get(Hc_az， ' Value ' ) vw(2)]；

set(Hc_cur， ' String ' ， str)

set(gca， ' View ' ，newview)

end

上述的两个例子均设置了 ' tag ' 属性，利用该属性和函数findobj寻找回调函数所需对象的句柄。