遥不可破-CSDN博客

原创用VB.NET实现AUTOCAD中鼠标选中后显示事件

用VB.NET实现AUTOCAD中鼠标选中后显示事件，主要用到document中ImpliedSelectionChanged事件，鼠标选中对象后立即获取对象id，可以方便将对象的属性显示出来。

2015-06-16 17:34:02 1521

原创自动移注记

CAD管线图注记文字整饰神器，AI一键处理，自动将需要处理的文字注记避让处理，避免文字重叠。本软件可使注记文字全部自动调整至空白处，具有AI自动化的功能，不仅省时，而且美观。

2023-08-15 18:46:59 78

原创管线图层控制管理器使用说明

管线图层控制管理器，可以用于控制CAD图形中包含有管线、地形等图层的关闭/显示、选择、删除、置顶等操作，将管线、地形图层分类管理，一键控制。采用VB后期绑定技术，几乎可以匹配所有的CAD版本，Windows操作系统32位64位均可。

2023-05-06 15:21:47 79

原创重叠管线点号避让处理-自动挪点号程序介绍

重叠管线点号避让处理-自动挪点号程序介绍。

2023-03-01 15:35:24 519

原创关于VB6开发Arcgis连接地理数据库总是提示自动化错误的解决办法

在连接地理数据库的代码如下Dim pWorkspaceFactory As esriGeoDataBase.IWorkspaceFactoryDim pWorkspace As esriGeoDataBase.IWorkspace'----------------------------------------------------------------------------------------------------------Set pWorkspaceFact...

2021-11-08 11:44:53 766

转载转载--vb.net函数获取mdb、gdb、shapefile数据

'获取mdblayer Public Function getMDBlayer(ByVal dirpath As String, ByVal layname As String, ByVal strFilter As String) As ILayer Try Dim pWS As IWorkspace Dim pWSF As IWorkspaceFactory pWSF = New ESRI.ArcGI...

2021-11-01 10:30:00 415

转载向WebBrowser控件插入HTML代码

向WebBrowser控件插入HTML代码是要获得鼠标所在的标记？对象．对象型方法（"elementFromPoint"，x，y）这个方法可以获得鼠标所在位置的标记对象。----------还是要在鼠标处插入标记？对象．对象型方法（"createElement"，eTag）创建之后在把返回的对象指定X，Y就行了这样只能算是插入标记

2015-06-16 17:16:38 2834

转载 WinForm实现鼠标悬停显示控件

WinForm实现鼠标悬停显示控件在某些需频繁操作的环节中，为提高效率、减少劳动，可以在操作细节上下功夫，以带来更好的用户体验。今天介绍的鼠标悬停显示功能就是一例，看似仅仅节省了一次点击，实则在繁复操作中能够为用户节约很多体力，提高舒适度。本例中的基本需求是：鼠标移入设置区域后，直接弹出详尽设置内容，并当进行了设置或鼠标移出弹出的设置区域后，自动关闭弹出的设置区域。在这

2015-06-16 17:14:14 8599

CSV文件转SHP文件

不需要安装Arcgis等Gis软件，就能将csv文件转shp文件，比较适合管网管线数据入库等方面。目前借助shape-tools中DOS命令创建shp文件，如有二次开发需要，可将直接采用二进制读写方式，去掉第三方软件，软件进一步精简，通用性更强。压缩包内有测试数据，可按照测试数据格式自行编辑。

2024-02-08

山东正元地下管线数据采集软件Zyspps 提示请先打开由系统生成的管线图形时，加载此文件即可

山东正元地下管线数据采集软件Zyspps 提示请先打开由系统生成的管线图形时，加载此文件即可。操作方式1，直接将此文件拖拽至CAD中，操作方式2，在CAD命令行输入 "AP" 或“APPLOAD”，在弹出的对话框中，选择该文件，点击加载即可。

2023-11-02

管线图层控制管理器专业版V1

2023-05-05

批量重建填充图案的边界线，请用YL-GETHB-PL执行.lsp，demo源码

文件可用记事本直接打开查看源码，必要时可根据需求修改代码。使用方法：在AutoCAD中输入“ap”或“appload”命令，加载该文件，使用YL-GETHB-PL命令执行，可用于恢复或重建填充图案的边界，并且可多选图案进行批量操作。

2022-05-12

仿CASS展点及切换注记

具备类似CASS展点及切换注记功能，适用于任意CAD版本。

2022-04-18

QQ头像列表界面控件VB源码

类QQ头像列表界面控件VB源码

2022-04-06

重叠管线点号避让处理-自动挪点号(第2版).zip

CAD管线图文字整饰神器，一键处理，重叠管线点号自动避让处理，又名自动挪点号。采用VB后期绑定技术，几乎可以匹配所有的CAD版本，Windows操作系统32位64位均可。相对第1版，增加了优化次数，标注引线，避让图层增加了自定义输入等功能，通用性更强，除了管点文字调整外，其他文字也能调整。除此之外，部分系统VB运行库缺少，附件中增加了添加运行库的安装文件及说明。本软件具有试用时间和试用次数限制，请在2024年12月31日前使用，如有二次开发或注册需求，请联系我！

2021-12-02

VBNET程序设计实用教程7

Windows高级界面设计体育彩票摇奖程序简易文本编辑器程序图文浏览器程序

2015-06-16

VBNET程序设计实用教程6

Windows窗体与控件我的电子相册程序剪贴板演示程序石头、剪刀、布游戏程序日历时钟程序课程选择程序

2015-06-16

VBNET程序设计实用教程5

程序调试和异常处理为了方便用户对程序进行调试，VB .NET提供了一组调试工具。可通过“调试”菜单和 “调试”工具栏来调用这些调试工具，“调试”菜单如图5-1所示，“调试”工具栏如图5-2所示。当调试工具栏没有出现时，可执行【视图】→【工具栏】→【调试】使之出现。

2015-06-16

VBNET程序设计实用教程4

过程 1．启动VB.NET，新建一个项目，项目类型为“Windows应用程序”，项目的存放位置为“D:\VBTASK\CH04”，项目名为“Task4_1”。　　　2．把Form1窗体的Text属性值设置为“四则运算测验程序”，把它的Name属性值设置为“frmMaths”。单击“解决方案资源管理器”中的“Form1.VB”窗体，然后在属性窗口中把它文件名属性设置为“frmMath.vb”。然后执行【项目】→【Task4_1属性】命令，在出现的“Task4_1属性页”对话框中把“启动对象”设置为“frmMath”。　　　3．对照程序设计界面，为窗体添加控件并设置控件的属性。控件的属性设置如表4-1所示。

2015-06-16

VBNET程序设计实用教程

数组如假设存放200个学生信息学成绩的数组名为InformationScore，要求出所有学生的信息学的平均分，可使用下列语句： Dim AvgInformationScore As Single Dim InformationScore(199) As Integer AvgInformationScore = 0 For i = 0 To 199 Step 1 AvgInformationScore = AvgInformationScore + InformationScore (i) Next I AvgInformationScore = AvgInformationScore / 300 读者不妨试着使用变量来求信息学课程的平均分，会发现程序编起来非常麻烦。可见与变量相比，使用数组来处理同类的多个数据，优势十分明显。

2015-06-16

VBNET程序设计实用教程2

程序设计基础与结构化程序设计语句双击窗体，将会出现窗体frmGYS的Load事件框架，在事件框架内编写它的事件过程代码，如下。 Private Sub frmGYS_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.Height = 190 '设置窗体的高度，使标准答案不显示出来 Randomize() '随机数初始化 End Sub 说明：代码中的Randomize()函数用来对随机数进行初始化，一般在调用Rnd()函数产生随机数之前需调用该函数。

2015-06-16

VBNET程序设计实用教程1.ppt

Visual Basic.NET编程简介

2015-06-16

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人