Gdzhou-CSDN博客

转载 wegwegweg

http://write.blog.csdn.net/postlisthttp://write.blog.csdn.net/postlisthttp://write.blog.csdn.net/postlisthttp://write.blog.csdn.net/postlisthttp://write.blog.csdn.net/postlisthttp://write.blog.csdn.ne

2015-01-19 20:54:35 369

翻译 wegwg

http://write.blog.csdn.net/postlisthttp://write.blog.csdn.net/postlisthttp://write.blog.csdn.net/postlisthttp://write.blog.csdn.net/postlisthttp://write.blog.csdn.net/postlisthttp://write.blog.csdn.ne

2015-01-19 20:54:17 406

转载 TIN不规则三角网连接程序

转自一个成都山地所的同学：） Imports System.DataImports ESRI.MapObjects2.CoreImports System.DrawingImports System.IOImports System.Data.OleDbImports System.MathPublic Structure dVertexDim x A

2012-09-11 21:14:54 2064 1

转载获取字符串中的汉字拼音首字母

public class CLetter 2{ 3 private string _string; 4 public CLetter(string IndexTxt) 5 { 6 _string = string.Empty; 7 if (IndexTxt.Length == 0) return; 8

2012-09-11 21:11:38 964

转载 AE矢量数据裁剪（群：64150589，群友大鹏实现的）

使用IBasicGeoprocessor接口就可以实现的呵呵代码如下所示：//Using IBasicGeoprocessing to Clip two shapefile //2009.2.11 IBasicGeoprocessor pBGeop = new BasicGeoprocessorClass();

2012-09-11 21:00:36 2065

转载地图裁剪程序（转贴）

看到篇文章，马上要用，先贴过来再说：）地图的裁减，主要功能是通过一个任意形状的裁减多边形，可以将目标要素类，无论是点、线、多边形还是标注图层，都可以进行裁减。裁减后的要素类形状与多边形一致。在这个过程中，需要裁减所有在多边形内部的要素，还要处理在多边形边界的polyline或polygon。为了实现这个功能，我找到了三种方式：1.使用ESRI自己提供的IBasicGeoproce

2012-09-11 20:59:11 842

原创日文系统下在MS中半角转全角宏源代码

sub main() ########################################### ####Convert the half Char to Wide Char##### ########################################### Dim elemSet as New MbeElementSet Dim el

2009-04-02 17:50:00 745

原创已知三角形三个顶点的坐标a(x1,y1),b(x2,y2),c(x3,y3)求三角形中心点即内接圆的圆心

已知三角形三个顶点的坐标a(x1,y1),b(x2,y2),c(x3,y3)求三角形中心点即内接圆的圆心设线段bc的中点为d(x4,y4)、线段ac的中心为e(x5,y5)其中d点 x4=(x1+x2)/2、y4=(y1+y2)/2e点 x5=(x1+x3)/2、y5=(y1+y3)/2则直线cd与直线be的交点即为所求根据直线方程式y=kx+b分别求出直线be、cd的常数项k1,b1

2009-04-02 17:48:00 7146 1

转载三角网及绘等高线函数

[转帖]三角网及绘等高线函数,0,数据结构：Private Const M_Count_Const = 100 初始分配内存Private Const M_Point_Const = 20 初始两排点分配内存Private Type Line 自定义类型X() As Single x坐标列Y() As Single y坐标列Count As Long 当前个数M_Cou

2009-04-02 17:43:00 2107

转载 VB资源文件的使用

调用资源文件中资源的函数有：　　LoadResString 返回一个文本字符串。语法：LoadResString(index) index必需是一个整数，它用来指定资源文件中数据的标识符（即经常提到的ID号），如果ID号为1的资源保留给应用程序图标。　　LoadResPicture 用以从资源 (.res) 文件装载位图、图标或光标。它的语法：　　LoadResPicture(

2008-10-18 14:27:00 865

转载读取DXF格式文件

读取DXF格式文件OpenGL是美国SGI公司最新推出的一套开放式的三维图形软件接口，适用于广泛的计算机环境，从个人计算机到工作站，OpenGL都能实现高性能的三维图形功能。OpenGL本身不仅提供对简单图元的操作和控制，还提供了许多函数用于复杂物体的建模。但是，我们通常喜欢使用AutoCAD和3DS及3Dmax等工具来建立模型，并且我们已经有了很多这样的模型，那么我们如何才能资源共享，避免

2008-10-18 14:25:00 802

转载 ADODB.Stream组件Charset属性值

2008-10-18 14:24:00 808

原创 JIS编码转换(DM格式与JIS)

Function JisToStr(ByVal Str As String, Nbr As Integer) As StringOn Error Resume NextDim Stm As ADODB.StreamDim StrByt() As ByteDim n01 As IntegerDim m01 As IntegerDim Asr01Str As StringSet Stm = Ne

2008-10-18 14:21:00 2097

转载 VB_Format自定义格式

用户自定义数值格式 (Format 函数) 下面表格标识了一些可用来创建用户自定义数值格式的字符：字符说明无显示没有格式的数值。 (0) 数字占位符。显示一位数字或是零。如果表达式在格式字符串中 0 的位置上有一位数字存在，那么就显示出来；否则，就以零显示。如果数值的位数少

2008-10-18 14:05:00 2730 3

转载 CAD变量说明

STANDARDSVIOLATION 指定当创建或修改非标准对象时，是否通知用户当前图形中存在标准违规。STARTUP 控制当使用 NEW 和 QNEW 命令创建新图形时是否显示“创建新图形”对话框。SURFTAB1 为 RULESURF 和 TABSURF 命令设置生成的列表数目。SURFTAB2 为 REVSURF 和 EDGESURF 命令设置在 N 方向上的网格密度。SUR

2008-10-18 13:58:00 795

Gdzhou的专栏