放大多行文字对象 AutoCAD
Zoom on MTEXT object AutoCAD
我有一个访问数据库，其中包含有关在我们的地形上具有静态位置的对象的记录，因此我们可以通过查询数据库找到它们。
例如：代码 描述 位置
"E1-050505" "Concrete Posts" "Street #"
现在我的困难是要真正知道在我们的地形上去哪里（因为它很大），我必须参考 AutoCAD 地图，在那里我将通过搜索文本 "Street #" 来检查位置 "E1-050505"。我找到了 vba 能够打开 autocad 文件的代码，然后是文档。但是我没有找到任何方法或命令来将焦点设置在特定的控件或对象上。
程序是这样的：
单击 Access 窗体上的按钮，VBA 将启动我的 CAD 文件，搜索文本 "E1-050505"，然后将视图设置为该对象在 autocad 绘图中的可视位置。
我能够搜索并找到 MTEXT 对象，但我还没有找到移动 "camera" 或查看焦点的方法。
我需要一个命令或代码来将视图移动到 MTEXT 对象。
您可以使用 Zoom 命令的 Object 选项：
AcadApp.ActiveDocument.SendCommand "_ZOOM" & vbCr & "_O" _
& vbCr & "(handent """ & mtext.Handle & """)" & vbCr & vbCr
我有一个访问数据库，其中包含有关在我们的地形上具有静态位置的对象的记录，因此我们可以通过查询数据库找到它们。
例如：代码 描述 位置
"E1-050505" "Concrete Posts" "Street #"
现在我的困难是要真正知道在我们的地形上去哪里（因为它很大），我必须参考 AutoCAD 地图，在那里我将通过搜索文本 "Street #" 来检查位置 "E1-050505"。我找到了 vba 能够打开 autocad 文件的代码，然后是文档。但是我没有找到任何方法或命令来将焦点设置在特定的控件或对象上。
程序是这样的： 单击 Access 窗体上的按钮，VBA 将启动我的 CAD 文件，搜索文本 "E1-050505"，然后将视图设置为该对象在 autocad 绘图中的可视位置。
我能够搜索并找到 MTEXT 对象，但我还没有找到移动 "camera" 或查看焦点的方法。
我需要一个命令或代码来将视图移动到 MTEXT 对象。
您可以使用 Zoom 命令的 Object 选项：
AcadApp.ActiveDocument.SendCommand "_ZOOM" & vbCr & "_O" _
& vbCr & "(handent """ & mtext.Handle & """)" & vbCr & vbCr