Microstation

  1. 云栖社区>
  2. 博客>
  3. 正文

Microstation

最美的回忆 2017-11-29 15:31:00 浏览1570
展开阅读全文

VBA 项目管理器对话框

用于 MicroStation 的 VBA 集成开发环境 (IDE),允许用户管理 VBA 项目。VBA 宏未嵌入到 DGN 文件中,它们单独存储在 .mvba 文件中。

fmadb_vba_project_manager.jpg

VBA 项目管理器图标

 
fmaic_new_project.jpg 

新建项目

打开“创建 VBA 项目”,其允许用户创建新项目。

 
fmaic_load_project.jpg 

装载项目

打开“装载项目”对话框,用于选择和装载 VBA 项目。

 
fmaic_unload_project.jpg 

卸载项目

卸载或删除所选项目。

 
fmaic_save_as.jpg 

另存为

打开“VBA 项目另存为”对话框,用于以不同名称保存项目副本,保存到不同的目录下或不同的磁盘上。

 
fmaic_visual_basic_editor.jpg 

Visual Basic 编辑器

打开 Microsoft Visual Basic 编辑器,用于创建 Visual Basic 应用程序和宏。

 
fmaic_macro.jpg 

打开“宏”对话框,用于运行所选的宏。

 
fmaic_start_record.jpg 

启动录制

允许用户开始录制新宏。有关录制宏的详细信息,请参见“MicroStation VBA 帮助”。

 
fmaic_stop_record.jpg 

停止录制

停止录制宏。

 
fmaic_pause_record.jpg 

暂停录制

暂停录制。

列表框

显示当前装载的 VBA 项目的名称、描述和位置。如果项目文件在 MS_VBAAUTOLOADPROJECTS 配置变量中,则 MicroStation 启动时“自动装载”将自动装载项目。复选标记指明文件是自动装载的。

网上对.Net下的MSGG二次开发的资料太少了,有的也只是一些VBA,MDL(MicroStation Develop Language or Library)一些资料。据Bentley公司说v9才直接支持.net。而v9要到2006年和longhorn一起出来。这次客户提出非要在MS(特指MicroStation)与.net一起开发。这几天总结了一点点经验,拿出来,以引玉来砸我。 
打开VS2003,新建Windows Application应用程序,然后引用 MS安装目录下的Ustation.exe这个文件。再在命名空间下: 
using MicroStationDGN; 
在Form里放一个Button,双击给出事件。 

None.gifprivate void CallMS_Click(object sender, System.EventArgs e) 
ExpandedBlockStart.gif        

InBlock.gif            MicroStationDGN.Application msApp 
= new
 MicroStationDGN.ApplicationClass(); 
InBlock.gif            msApp.Caption
="环保处GIS操作平台"
;         
InBlock.gif            msApp.Visible
=true

InBlock.gif            
//
以下两种情况下,关闭主图,弹出的图都不会关闭。 
InBlock.gif            
//false意为非只读
 
InBlock.gif
            msApp.OpenDesignFile(@"D:\Company\Bentley\Example\EastCity\DGN\StartUp.dgn",false
,MicroStationDGN.MsdV7Action.msdV7ActionAskUser); 
InBlock.gif
//            msApp.OpenDesignFileForProgram(@"D:\Company\Bentley\Example\EastCity\DGN\StartUp.dgn",false);  //
用这个方法时,dgn文件不被打开,只出现一个背景 
InBlock.gif
            this.label1.Text=msApp.Path;  //Form里的Label得到程序的路径
 
InBlock.gif
            msApp.Width=700;              //设置开启时MS的宽
 
InBlock.gif
            msApp.Height=400
;                //设置开启时MS的高 
InBlock.gif            
this.label1.Text=msApp.UserName; //得到开启此程序的用户 InBlock.gif          
 
InBlock.gif
            msApp.ShowCommand("mdl load edit");  //将"Key In"窗口集成到操作界面上来InBlock.gif            
 
ExpandedBlockEnd.gif    }


如果这里有对GIS的MS在.NET下开发熟悉的(VS里对象浏览器浏览时一大堆方法与属性,不知道哪个才是我要的),希望能交流一下,项目比较紧,网上找不到相关资料,客户在催。

本文转自kenty博客园博客,原文链接http://www.cnblogs.com/kentyshang/archive/2006/09/05/495603.html如需转载请自行联系原作者


kenty

网友评论

登录后评论
0/500
评论