如何在MATLAB GUI中通过滑块在轴上移动垂直线？

function myGUI
    % 创建GUI界面
    fig = figure('Position', [100, 100, 400, 300]);
    
    % 添加滑块控件
    slider = uicontrol('Style', 'slider', 'Position', [50, 50, 300, 20],...
        'Min', 0, 'Max', 1, 'Value', 0.5, 'Callback', @sliderCallback);
    
    % 添加绘图区域
    axesHandle = axes('Parent', fig, 'Position', [0.1, 0.3, 0.8, 0.6]);
    
    % 绘制初始图形和垂直线
    x = linspace(0, 2*pi, 100);
    y = sin(x);
    plot(axesHandle, x, y);
    hold(axesHandle, 'on');
    lineHandle = line([pi, pi], ylim(axesHandle), 'Color', 'r');
    hold(axesHandle, 'off');
    
    % 滑块回调函数
    function sliderCallback(hObject, ~)
        % 获取滑块的值
        sliderValue = get(hObject, 'Value');
        
        % 更新垂直线的位置
        x = pi + sliderValue * pi;
        set(lineHandle, 'XData', [x, x]);
    end
end