Microstation

 

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.gifContractedBlock.gif        
dot.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里对象浏览器浏览时一大堆方法与属性,不知道哪个才是我要的),希望能交流一下,项目比较紧,网上找不到相关资料,客户在催。

posted on 2006-09-05 19:04 kenty 阅读( ...) 评论( ...) 编辑 收藏

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值