自己做的.mns的文件内容如下
//
// AutoCAD 菜单文件 - C:\Documents and Settings\wuyp\Local Settings\Application Data\Autodesk\AutoCAD 2004\R16.0\chs\FD04Menu.mns
//
***MENUGROUP=wyp
***POP1
**WYP
ID_COMPUTE [富地2004(&C)]
ID_TongXin [通信... CTRL+SHIFT+A]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/通信.dvb!Module1.TongXin
ID_WorkAffiliation [工作联系单...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/AcadVBA.dvb!ModWorkAffiliation.WorkAffiliation
ID_StyleBook [样本查询...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/AcadVBA.dvb!ModStyleBook.StyleBook
ID_DRAW [->绘图工具]
ID_ZISZERO [多义线各节点Z轴设为零]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/Z轴为0.dvb!Module1.SetZIs0
ID_LuoXuanXian [三维螺旋线...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/螺旋线.dvb!Module1.LuoXuanXian
ID_JKX [<-渐开线齿轮...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/渐开线.dvb!jkx.jkx
ID_DesignTools [->设计工具]
ID_MXB [导出明细表...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/AcadVBA.dvb!ModMXB.mxb
ID_YGXCKDGS [圆管型材宽度估算...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/圆管型材宽度估算.dvb!Module1.YGXCKDGS
ID_BKJQJS [圆管型材宽度精算... CTRL+SHIFT+S]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/圆管型材宽度精算.dvb!Module1.BKJQJS
ID_NDJS [挠度计算... CTRL+SHIFT+C]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/挠度计算.dvb!Module1.NDJS
ID_BULK1 [体积... CTRL+SHIFT+Z]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/体积.dvb!Module1.bulk
ID_LianLun [链轮参数]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/链轮参数.dvb!Module1.LianLun
ID_YLGBHJS [压力管壁厚计算...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/压力管壁厚计算.dvb!Module1.YLGBHJS
ID_GTBHJS [缸筒壁厚计算...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/缸筒壁厚计算.dvb!Module1.GTBHJS
ID_Bearing [
轴承型号大全...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/AcadVBA.dvb!ModBearing.Bearing
ID_LiuLiang [油缸流量计算]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/流量计算.dvb!Module1.LiuLiang
ID_YYZHDJGL [液压站电机功率计算]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/AcadVBA.dvb!modYYZHDJGL.YYZHDJGL
id_GearMatching [<-齿轮幅齿数匹配...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/AcadVBA.dvb!modGearMatching.GearMatching
ID_CADSysOption [->CAD系统设置]
ID_MButton [->鼠标中键控制]
ID_MButtonPan [鼠标中键平移]^C^C_setvar mbuttonpan 1
ID_MButtonMenu [<-鼠标中键菜单]^C^C_setvar mbuttonpan 0
ID_ANGDIR [->设置正角度的方向]
ID_anticlockwise [逆时针]^C^C_setvar ANGDIR 0
ID_deasil [<-顺时针]^C^C_setvar ANGDIR 1
ID_extendMode [->隐含边延伸模式]
ID_extend [延伸(&E)]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/AcadVBA.dvb!ModExtendMode.extend
ID_NoExtend [<-不延伸(&N)]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/AcadVBA.dvb!ModExtendmode.noextend
ID_filedia [->显示文件对话框]
ID_filediaON [显示]^C^C_setvar filedia 1
ID_filediaOFF [<-不显示]^C^C_setvar filedia 0
ID_PROJMODE [->设置修剪和延伸的当前“
投影”模式]
ID_PROJMODE0 [真三维模式(无投影)]^C^C_setvar PROJMODE 0
ID_PROJMODE1 [投影到当前UCS的XY平面上]^C^C_setvar PROJMODE 1
ID_PROJMODE2 [<-投影到当前
视图平面]^C^C_setvar PROJMODE 2
ID_RASTERPREVIEW [->预览图像是否随图形一起保存]
ID_RASTERPREVIEWOFF [不创建预览图像]^C^C_setvar RASTERPREVIEW 0
ID_RASTERPREVIEWON [<-创建预览图像]^C^C_setvar RASTERPREVIEW 1
ID_REPORTERROR [->寄出错误报告到]
ID_REPORTERRORON [显示]^C^C_setvar REPORTERROR 1
ID_REPORTERROROFF [<-不显示]^C^C_setvar REPORTERROR 0
ID_PICKSTYLE [->双击鼠标编辑对象]
ID_PICKSTYLE_OK [使用]^C^C_setvar PICKSTYLE 0
ID_PICKSTYLE_NO [<-不使用]^C^C_setvar PICKSTYLE 1
ID_ANGBASE [基准角置零,图案为Ansi31]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/AcadVBA.dvb!modCADSysVariant.AngBaseIs0
ID_ZOOMFACTOR [鼠标辊抡缩放速度...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/鼠标辊抡缩放速度.dvb!Module1.SFSD
ID_HPNAME [设置默认填充图案为ANSI31]^C^C_setvar HPNAME ansi31
ID_CELTSCALE [设置当前对象的线型比例因子为1]^C^C_setvar CELTSCALE 1
ID_QLHCHBC [<-清理、核查、缩放并保存CTRL+ALT+Q]^C^C-purge a * n _audit y zoom e qsave
ID_WinOption [->Windows系统工具]
ID_CALC [计算器... CTRL+SHIFT+ALT+Z]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/winsystools.dvb!Module1.calc
ID_Mspaint [画笔... ]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/winsystools.dvb!Module1.mspaint
ID_CALC1 [实用计算器...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/winsystools.dvb!Module1.calc1
ID_ChangeWPaper [<-更换系统桌面...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/WallPaperChanger.dvb!Module1.WallPaperChanger
ID_Tel [->电话表]
ID_FDTel [公司电话表...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/AcadVBA.dvb!modTel.FDTel
ID_ZHGTel [<-重工电话表...]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/AcadVBA.dvb!modTel.ZHGTel
ID_Menu [->菜单]
ID_Update [CAD2002菜单更新]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/UpdateFDMenu.dvb!Module1.Update02menu
ID_Update04 [<-CAD2004菜单更新]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/UpdateFDMenu.dvb!Module1.Update04menu
***TOOLBARS
**TOOLBARWYP
ID_ToolbarWYP_0 [_Toolbar("ToolbarWyp", _Top, _Show, 0, 2, 1)]
ID_OsnapCent [_Button("捕捉到圆心", "RCDATA_16_OSNCEN", "RCDATA_16_OSNCEN")]_cen
ID_OsnapTang [_Button("捕捉到切点", "RCDATA_16_OSNTAN", "RCDATA_16_OSNTAN")]_tan
ID_PCCAD_PCZXX_0 [_Button("中心线 ZX", "//Ca.bmp", "ZXX.bmp")]^P^C^CPC_zXX T
[--]
ID_Circle2pt_0 [_Button("圆 两点", "RCDATA_16_CIR2PT", "RCDATA_16_CIR2PT")]^C^C_circle _2p
ID_3dpoly_0 [_Button("三维多段线", "RCDATA_16_3DPOLY", "RCDATA_16_3DPOLY")]^C^C_3dpoly
ID_Hatchedit_0 [_Button("编辑图案填充", "RCDATA_16_HATEDI", "RCDATA_16_HATEDI")]^C^C_hatchedit
ID_Region_0 [_Button("面域", "RCDATA_16_REGION", "RCDATA_16_REGION")]^C^C_region
[--]
ID_Sphere_0 [_Button("球体", "RCDATA_16_SPHERE", "RCDATA_16_SPHERE")]^C^C_sphere
ID_Extrude_0 [_Button("拉伸", "RCDATA_16_EXTRUD", "RCDATA_16_EXTRUD")]^C^C_extrude
ID_Revolve_0 [_Button("旋转", "RCDATA_16_REVOLV", "RCDATA_16_REVOLV")]^C^C_revolve
ID_Slice_0 [_Button("剖切", "RCDATA_16_SLICE", "RCDATA_16_SLICE")]^C^C_slice
[--]
ID_Union_0 [_Button("并集", "RCDATA_16_UNION", "RCDATA_16_UNION")]^C^C_union
ID_Subtract_0 [_Button("差集", "RCDATA_16_SUBTRA", "RCDATA_16_SUBTRA")]^C^C_subtract
ID_Intersect_0 [_Button("交集", "RCDATA_16_INTERS", "RCDATA_16_INTERS")]^C^C_intersect
ID_FaceExtru_0 [_Button("拉伸面", "RCDATA_16_EXTRUD", "RCDATA_16_EXTRUD")]^C^C_solidedit _face _extrude
ID_Shell_0 [_Button("抽壳", "RCDATA_16_SHELL", "RCDATA_16_SHELL")]^C^C_solidedit _body _shell
[--]
ID_Massprop_0 [_Button("面域/质量特性", "RCDATA_16_MASSPR", "RCDATA_16_MASSPR")]^C^C_massprop
ID_UBBulk_0 [_Button("体积", "ICON.bmp", "ICON_16_BLANK")]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/体积.dvb!Module1.bulk
[--]
ID_2doptim_0 [_Button("二维线框", "RCDATA_16_2DOPTIM", "RCDATA_16_2DOPTIM")]$M=$(if,$(and,$(eq,$(getvar,tilemode),0),$(eq,$(getvar,cvport),1)),^C^C_shademode,^C^C_shademode _2)
ID_Wireframe_0 [_Button("三维线框", "RCDATA_16_WIREFRAME", "RCDATA_16_WIREFRAME")]$M=$(if,$(and,$(eq,$(getvar,tilemode),0),$(eq,$(getvar,cvport),1)),^C^C_shademode,^C^C_shademode _3)
ID_Hidden_0 [_Button("消隐", "RCDATA_16_HIDDEN", "RCDATA_16_HIDDEN")]$M=$(if,$(and,$(eq,$(getvar,tilemode),0),$(eq,$(getvar,cvport),1)),^C^C_shademode,^C^C_shademode _h)
ID_Gouraud_0 [_Button("体着色", "RCDATA_16_GOURAUD", "RCDATA_16_GOURAUD")]$M=$(if,$(and,$(eq,$(getvar,tilemode),0),$(eq,$(getvar,cvport),1)),^C^C_shademode,^C^C_shademode _g)
ID_UBZIs0 [_Button("User Defined Button", "ICON1286.bmp", "ICON_16_BLANK")]^C^C-vbarun F:/编程/作品/CAD二次开发/二次开发/Vba计算/Z轴为0.dvb!Module1.SetZIs0
[--]
ID_Dimlinear [_Button("线性标注", "RCDATA_16_DIMLIN", "RCDATA_16_DIMLIN")]^C^C_dimlinear
ID_DimUpdate [_Button("标注更新", "RCDATA_16_DIMUPD", "RCDATA_16_DIMUPD")]^C^C_-dimstyle _apply
[--]
ID_TbViewpoi_0 [_Flyout("视图", RCDATA_16_DDVIEW, RCDATA_16_DDVIEW, _OtherIcon, ACAD.TB_VIEWPOINT)]
ID_ZoomExten_0 [_Button("范围缩放", "RCDATA_16_ZOOEXT", "RCDATA_16_ZOOEXT")]'_zoom _e
[--]
ID_UserButton_1 [_Button("清理、核查、缩放并保存", "RCDA0986.bmp", "RCDATA_16_BLANK")]^C^C-purge a * n _audit y zoom e qsave
[--]
ID_3darray_0 [_Button("三维阵列", "RCDA9985.bmp", "RCDATA_16_BLANK")]^C^C_3darray
ID_Mirror3d_0 [_Button("三维镜像", "RCDA3513.bmp", "RCDATA_16_BLANK")]^C^C_mirror3d
ID_Rotate3d_0 [_Button("三维旋转", "RCDA5650.bmp", "RCDATA_16_BLANK")]^C^C_rotate3d
***ACCELERATORS
ID_BULK1 [CONTROL+SHIFT+"Z"]
ID_PCCAD_PCZXX_0 [CONTROL+ALT+TOOLBAR+"Z"]
ID_BKJQJS [CONTROL+SHIFT+"S"]
ID_CALC [CONTROL+SHIFT+ALT+"Z"]
ID_UserButton_1 [CONTROL+SHIFT+TOOLBAR+"X"]
ID_QLHCHBC [CONTROL+ALT+"Q"]
ID_TongXin [CONTROL+SHIFT+"A"]
***HELPSTRINGS
ID_UPDATE [更新计算菜单]
ID_GTBHJS [缸筒管壁厚计算...]
ID_REVOLVE_0 [绕轴旋转二维对象以创建实体: REVOLVE]
ID_SHELL_0 [以指定的厚度在实体对象上创建中空的薄壁: SOLIDEDIT]
ID_BULK1 [计算基本几何体的体积]
ID_SLICE_0 [用平面剖切一组实体: SLICE]
ID_SUBTRACT_0 [用差集创建组合面域或实体: SUBTRACT]
ID_DIMLINEAR [创建线性标注: DIMLINEAR]
ID_UBZIS0 [将多义线各节点Z轴设为零]
ID_SPHERE_0 [创建三维实心球体: SPHERE]
ID_JKX [渐开线...]
ID_HATCHEDIT_0 [修改现有的图案填充对象: HATCHEDIT]
ID_UBBULK_0 [计算基本几何体的体积]
ID_FACEEXTRU_0 [按指定高度或沿路径拉伸实体对象的选定面: SOLIDEDIT]
ID_CIRCLE2PT_0 [用直径的两个端点创建圆: CIRCLE]
ID_REGION_0 [将包含封闭区域的对象转换为面域对象: REGION]
ID_ZISZERO [将多义线各节点Z轴设为零]
ID_HIDDEN_0 [将视口设置为隐藏线: SHADEMODE]
ID_INTERSECT_0 [从实体或面域的交集创建组合实体或面域: INTERSECT]
ID_DIMUPDATE [更新标注的样式: DIMSTYLE]
ID_NDJS [挠度计算... CTRL+SHIFT+C]
ID_2DOPTIM_0 [将视口设置为二维线框: SHADEMODE]
ID_OSNAPCENT [捕捉到圆弧、圆、椭圆或椭圆弧的中心点: CEN]
ID_OSNAPTANG [捕捉到圆弧、圆、椭圆、椭圆弧或样条曲线的切点: TAN]
ID_MIRROR3D_0 [创建对象相对于某一平面的镜像图像副本: MIRROR3D]
ID_3DARRAY_0 [创建三维阵列: 3DARRAY]
ID_LIANLUN [链轮参数计算...]
ID_MASSPROP_0 [计算并显示面域或实体的质量特性: MASSPROP]
ID_ZOOMEXTEN_0 [显示图形范围: ZOOM]
ID_LUOXUANXIAN [三维螺旋线...]
ID_YGXCKDGS [圆管型材宽度估算...]
ID_BKJQJS [圆管型材宽度精算... CTRL+SHIFT+S]
ID_USERBUTTON_0 [用户定义的按钮]
ID_WIREFRAME_0 [将视口设置为三维线框: SHADEMODE 3]
ID_YLGBHJS [压力管壁厚计算...]
ID_EXTRUDE_0 [通过拉伸现有二维对象来创建三维实体: EXTRUDE]
ID_USERBUTTON_1 [清理、核查、缩放并保存]
ID_ROTATE3D_0 [绕三维轴转动对象: ROTATE3D]
ID_CALC1 [实用计算器...]
ID_3DPOLY_0 [在三维空间中创建多段线: 3DPOLY]
ID_UNION_0 [用并集创建组合面域或实体: UNION]
ID_TBVIEWPOI_0 [“视点”工具栏]
ID_CALC [计算器... CTRL+SHIFT+ALT+Z]
ID_GOURAUD_0 [将视口设置为体着色: SHADEMODE]
ID_WorkAffiliation [打开工作联系单...]
//
// AutoCAD 菜单文件结尾 - C:\Documents and Settings\wuyp\Local Settings\Application Data\Autodesk\AutoCAD 2004\R16.0\chs\FD04Menu.mns
//
