main.m

来自「利用ＭＡＴＬＡＢ实现了对测量中的平面网」· M 代码 · 共 14 行

clear all
clc
fsize=[530  300];
figpos=[100 100 fsize(1:2)];
mainfig=figure('Position',figpos,'Color',[0.83 0.81 0.78],'NumberTitle','off','Name','控制网平差程序');
label1=uicontrol(mainfig,'Style','text','Position',[80  220  350  40],'String','控制网平差程序','fontsize',25);
radio1=uicontrol(mainfig,'Style','push','Position',[80 150 100 50],'String','水准网','fontsize',20,'foregroundcolor',[0.0 0.0 1.0],'Value',1,'CallBack','levelnet');
radio2=uicontrol(mainfig,'Style','push','Position',[300 150 100 50],'String','平面网','fontsize',20,'Value',0,'CallBack','controlnet');

button2=uicontrol(mainfig,'Style','push','Position',[200 50 120 50],'String','退出','fontsize',18,'CallBack','close(mainfig)');
set(mainfig,'Menubar','none')