在ArcMap中引用动态链接库 我在VB6下编译生成了一个动态链接库文件VBAPrj.dll，其中有一类模块VBACls，此类模块有一个方法Test(Doc As Object)。常见的方法有三种（作者：张业新）：1.打开VBA编辑器，点"工具"菜单下的"引用"命令，在引用对话框中引用该动态链接库。...
分类：
编程语言 时间：
2015-09-06 12:44:33
阅读次数：
184
VBA 选择使用区域Sub Select_UsedRange()ActiveSheet.Range(ActiveSheet.Cells(1, 1), ActiveSheet.UsedRange).SelectEnd Subrc = .range("a1").CurrentRegion.Rows.Co...
分类：
编程语言 时间：
2015-09-06 12:43:18
阅读次数：
1579
' 打开文件 ROSE 为只读密码 CHECK 为编辑密码 Set wb = Workbooks.Open(file, 0, True, , "ROSE", "CHECK") ' 关闭文件并释放内存 wb.Close Set wb = Nothing
分类：
编程语言 时间：
2015-09-06 12:39:59
阅读次数：
270
一、初识类现在，请打开你的VBE，主菜单-插入-类模块。插入了一个类模块，也就建立了一个类。类模块的名字就是类的名字。你现在看到的，她的名字叫“类1”，这是VBA按她姐妹排行给她取的的，是的，VBA一贯如此，你早就熟悉了这种规则，现在，在标准模块或其它模块中输入Dim …As的时候，提示框中她已经出...
分类：
编程语言 时间：
2015-09-06 12:39:13
阅读次数：
6796
定制模块行为(1) Option Explicit '强制对模块内所有变量进行声明 Option Private Module '标记模块为私有，仅对同一工程中其它模块有用，在宏对话框中不显示 Option Compare Text '字符串不区分大小写 Option Base 1 '指定数组...
分类：
编程语言 时间：
2015-09-06 12:30:42
阅读次数：
189
Function ConTxt(ParamArray args() As Variant) As VariantDim tmptext As Variant, i As Variant, cellv As VariantDim cell As Rangetmptext = ""For i = 0 T...
分类：
编程语言 时间：
2015-09-06 12:26:29
阅读次数：
400
Private Function SelectFile(ByVal strFilter As String) As String Dim FileName As Variant '打开文件对话框返回的文件名，是一个全路径文件名，其值也可能是False，因此类型为Variant Dim sFileNa...
分类：
编程语言 时间：
2015-09-06 12:26:16
阅读次数：
281
Advanced Office Password Recovery中有各种不同的攻击类型，除了暴力破解和字典攻击还有一个独具特色的“VBA后门”功能。那么VBA究竟是什么？确切地说，它是一种自动化语言，可以使常用的程序自动化或者创建自定...
分类：
编程语言 时间：
2015-09-02 10:50:39
阅读次数：
232
access的SQL视图一次只能执行一条SQL语句，那么在VBA中调用或许可以简便一些例如：Public Sub 批量()Dim strsql As String strsql = "INSERT INTO TEACHER(TNO,TNAME,TSEX,TBIRTHDAY,PROF,DEPART)V...
分类：
数据库 时间：
2015-09-01 12:31:55
阅读次数：
196
Advanced Office Password Recovery中有各种不同的攻击类型，除了暴力破解和字典攻击还有一个独具特色的“VBA后门”功能。那么VBA究竟是什么？确切地说，它是一种自动化语言，可以使常用的程序自动化或者创建自定义的解决方案。下文将具体介绍Office密码破解工具中的“VBA...
分类：
编程语言 时间：
2015-09-01 12:09:54
阅读次数：
251
