转自chanyinhelv原文AE属性表操作 实现的操作包括:1.打开属性表:2.编辑属性表:3.增加属性列:4.数据排序:5.字段计算…… 嗯,实现的功能目前就这些吧,后续还会继续跟进,还望大家多多关注……下面就分功能说说我的实现方式吧…… 1.打开属性表 属性表的打开是在TOC的右键菜单中打开的,首先新建一个类OpenAttribute,继承BaseCommand,OpenAttribute类的源码如下: using System; using System.Collections.Gene…
获取Excel文件工作表Sheet的名称 '产生Excel文档 Dim xlapp, xlbook As Object Dim sSheetName As String Set xlapp = CreateObject("Excel.Application") 'Excel对象 Set xlbook = xlapp.Workbooks.Open(Me.txtFileName.Text) '打开已经存在的EXCEL文件 xlapp.Visible = False '设置EXCEL对象可见…