LoadShapeFile メソッド(ActiveX)

シェイプ ファイル(.shx)をロードします。

サポートされているプラットフォーム: Windows のみ

構文と要素

VBA:

object.LoadShapeFile FullName

object

タイプ: Document

このメソッドが適用されるオブジェクト。

FullName

アクセス: 入力のみ

タイプ: 文字列

ロードするシェイプ ファイルの絶対パスと名前。

戻り値(RetVal)

戻り値はありません。

注意

このメソッドを使用すると、シェイプ ファイル内のすべてのシェイプを現在の図面で利用できるようになります。シェイプを図面に追加するには、AddShape メソッドを使用します。

最初に必要となった時点で、シェイプ ファイルをロードしておきます。それ以後は AutoCAD がシェイプ ファイルをロードします。シェイプ ファイルを使用する図面を編集するたびに、シェイプ ファイルが必要になります。

例

VBA:

Sub Example_LoadShapeFile()
    ' This example loads a shape file
    
    Dim shapeFileToLoad As String
    shapeFileToLoad = "C:/AutoCAD/Support/ltypeshp.shx"
    
    ' Load the shape file
    On Error GoTo ERRORHANDLE
    ThisDrawing.LoadShapeFile shapeFileToLoad
    Exit Sub
ERRORHANDLE:
    MsgBox Err.Description, Title:="LoadShapeFile"
    
End Sub

Visual LISP:

(vl-load-com)
(defun c:Example_LoadShapeFile()
    ;; This example loads a shape file
    (setq acadObj (vlax-get-acad-object))
    (setq doc (vla-get-ActiveDocument acadObj))
  
    (setq shapeFileToLoad (findfile "ltypeshp.shx"))
    
    ;; Load the shape file
    (vla-LoadShapeFile doc shapeFileToLoad)
)