如果可以的話請把分給我
創新互聯網站建設公司一直秉承“誠信做人,踏實做事”的原則,不欺瞞客戶,是我們最起碼的底線! 以服務為基礎,以質量求生存,以技術求發展,成交一個客戶多一個朋友!專注中小微企業官網定制,做網站、成都做網站,塑造企業網絡形象打造互聯網企業效應。
以下是cad2007版的,引用autocad 2007 type library 和autocad/objectdbx common 17如果是04或者版本更低的只要引用autocad 2007 type library,代碼的話大同小異,思路是一樣的
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
On Error Resume Next
Dim acadapp As Autodesk.AutoCAD.Interop.AcadApplication
acadapp = GetObject(vbNullString, "autoCAD.application")
Dim acaddoc As Autodesk.AutoCAD.Interop.AcadDocument
acaddoc = acadapp.ActiveDocument
Dim Ms As Autodesk.AutoCAD.Interop.Common.AcadModelSpace
Ms = acaddoc.ModelSpace
Dim acadObjectI As Autodesk.AutoCAD.Interop.Common.AcadObject
Dim Linei As Autodesk.AutoCAD.Interop.Common.AcadLine
Dim Circlei As Autodesk.AutoCAD.Interop.Common.AcadCircle
Dim Polylinei As Autodesk.AutoCAD.Interop.Common.AcadPolyline
Dim pt As Autodesk.AutoCAD.Interop.Common.AcadPoint
For Each acadObjectI In Ms
Debug.Print(acadObjectI.ObjectName)
Select Case acadObjectI.ObjectName
Case "AcDbLine"
Linei = acadObjectI
Debug.Print("X =" Linei.StartPoint(0).ToString)
Debug.Print("Y =" Linei.StartPoint(1).ToString)
Case ""
Case ""
End Select
Next
End Sub
CheckedListBox1.CheckOnClick = True
指示復選項是否應在首次單擊時更改狀態
CheckListBox.GetItemChecked
返回復選框是否被選中的真假項
要用代碼賦是否勾選某項的值應該用setitemchecked
在C#中有 靜態類 的概念 自然里邊全部的方法都是靜態的 這意味著你可以直接通過 類名 方法名 去調用(例如System的Math類就是典型) 在VB NET中 沒有 靜態類 的概念(當然你可以用 單例模式 把構造函數弄成Private的方式 其它方法都是靜態的)如果某些方法需要被其它地方頻繁使用 可以創建 模塊 在VB NET中一旦創建了模塊 其中任何方法 屬性或者變量都可以被其它地方引用 因此適合全局情況下頻繁交互的情況(比如初始化加載的參數 可能后續程序要使用)等
現在問題在于 如果你把一個類似以下的模塊代碼封裝成DLL類庫 無論在C#或者是VB NET中都無法引用到其方法
Module A
Public Sub Test()
End Sub
End Module
或許你感到很奇怪——不是在VB NET中這樣定義一個Module就直接可以使用其內部方法了么?為什么封裝成類庫就不可以了呢?上網問了一些人 眾說紛紜 后來我在他人協助下終于成功解決了這個問題——解決方法很簡單——只要在Module前加Public
理由是 為了兼容C# VB NET由Module封裝成類庫中這個模塊不再是 模塊 而是一個標準的類了 如果這樣寫 那么在 NET中被理解成(C#)
internal A
{
public void Test()
{
}
}
整個模塊變成Internal的了!當然你到其它程序集中去引用就引用不到!而把類庫中的Module的修飾符改為Public就可以了 這就是MSDN那位友人給我最好的提示
雖然這個提示不是令我太滿意(因為要知道VB NET中可以直接不通過 類名 方式直接使用方法名) 但是這給了我很大的暗示 得出重要的結論
)VB NET中Module在制作成類庫時候等同于VB NET中的類的規則(里邊的方法都是靜態的) 默認情況下是Friend(C#是internal)
)根據結論 那么我們知道引用該DLL類庫的方法一定是 i)引用命名空間? ii)C#中直接 類名 方法名 對于VB NET 直接可以引用到方法名
lishixinzhi/Article/program/net/201311/12502
網站欄目:vb.net選擇集塊 vba選擇集
分享路徑:http://m.kartarina.com/article6/doggdog.html
成都網站建設公司_創新互聯,為您提供云服務器、搜索引擎優化、標簽優化、營銷型網站建設、、動態網站
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯