利用EXCEL的VBA调用网络第三方API接口 查询快递 并且获得JSON的信息 应用简单的split函数进行解析 为VB6.0/VBA开发 提供了一个简单的实例~
2021-11-17 15:32:01
44KB
1
'示例:=myget(srg,1,3)'从第 3 位开始取出中文字符'
=myget(srg,2)'从第 1 位开始取出英文字母，第 3个参数省略默认为 1'
=myget(srg,,5)'从第 5 位开始取出数字，第 2个参数省略默认为 0'
=myget(srg) '第 2、3 个参数都省略，默认为从第 1 位取出所有数字
2021-11-15 15:11:02
632B
1
本代码基于CAD VBA进行开发，用于提取填充图案（"AcDbHatch"）和面域（"AcDbRegion"）的坐标，当填充图案没有关联环的情况下，能自动创建关联环。
网上这类功能的例子很少，但在数据建库、图形分析以及CAD与ARCMAP进行数据转换中很重要的内容。代码中使用了大量的中文变量，加上注解，有较强的可读性。
2021-11-15 10:51:25
14KB
1