VB.NET写DXF组码注意事项

使用VB.NET写DXF组码的时候，需要注意gpcode需要定义为Int16，而不是Integer，应为VB.NET与VB的Integer默认长度是不一样的。另外块参照的组码是INSERT。

示例：

        Dim datavalue(0) As Object
        Dim gpcode(0) As Int16 '注意必须为16位，vb.net的integer和vb不一样
        Dim groupCode As Object
        Dim dataCode As Object

        Dim myss As Object
        myss = acDoc.SelectionSets.Add("TitleCheck")
        gpcode(0) = 0
        datavalue(0) = "INSERT"
        groupCode = gpcode
        dataCode = datavalue
        'myss.Select(AcSelect.acSelectionSetAll, , , groupCode, dataCode)
        myss.Select(5, , , groupCode, dataCode)