中文SpanishEnglish會(huì)員社區(qū)注冊登錄 您好,歡迎來(lái)到3DMine!
歡迎您注冊成為(wèi)3DMine用戶!
請(qǐng)仔細閱讀下面的協議,隻有(yǒu)接受協議才能繼續進行(xíng)注冊。
1.服務條款的确認和(hé)接納
用戶服務的所有(yǒu)權和(hé)運作(zuò)權歸北京心創達科技有限公司擁有(yǒu)。所提供的服務将按照有(yǒu)關章程、服務條款和(hé)操作(zuò)規則嚴格執行(xíng)。用戶通(tōng)過注冊程序點擊“我同意” 按鈕,即表示用戶與達成協議并接受所有(yǒu)的服務條款。
2.服務簡介
通(tōng)過國際互聯網為(wèi)用戶提供新聞及文章浏覽、圖片浏覽、軟件下載、網上(shàng)留言和(hé)BBS論壇等服務。
用戶必須:
1)購置設備,包括個(gè)人(rén)電(diàn)腦(nǎo)一台、調制(zhì)解調器(qì)一個(gè)及配備上(shàng)網裝置。
2)個(gè)人(rén)上(shàng)網和(hé)支付與此服務有(yǒu)關的電(diàn)話(huà)費用、網絡費用。
用戶同意:
1)提供及時(shí)、詳盡及準确的個(gè)人(rén)資料。
2)不斷更新注冊資料,符合及時(shí)、詳盡、準确的要求。所有(yǒu)原始鍵入的資料将引用為(wèi)注冊資料。
3)用戶同意遵守《中華人(rén)民共和(hé)國保守國家(jiā)秘密法》、《中華人(rén)民共和(hé)國計(jì)算(suàn)機信息系統安全保護條例》、《計(jì)算(suàn)機軟件保護條例》等有(yǒu)關計(jì)算(suàn)機及互聯網規定的法律和(hé)法規、實施辦法。在任何情況下,合理(lǐ)地認為(wèi)用戶的行(xíng)為(wèi)可(kě)能違反上(shàng)述法律、法規,可(kě)以在任何時(shí)候,不經事先通(tōng)知終止向該用戶提供服務。用戶應了解國際互聯網的無國界性,應特别注意遵守當地所有(yǒu)有(yǒu)關的法律和(hé)法規。
3. 服務條款的修改
會(huì)不定時(shí)地修改服務條款,服務條款一旦發生(shēng)變動,将會(huì)在相關頁面上(shàng)提示修改內(nèi)容。如果您同意改動,則再一次點擊“我同意”按鈕。 如果您不接受,則及時(shí)取消您的用戶使用服務資格。
4. 服務修訂
保留随時(shí)修改或中斷服務而不需知照用戶的權利。行(xíng)使修改或中斷服務的權利,不需對用戶或第三方負責。
5. 用戶隐私制(zhì)度
尊重用戶個(gè)人(rén)隐私是的 基本政策。不會(huì)公開(kāi)、編輯或透露用戶的注冊信息,除非有(yǒu)法律許可(kě)要求,或在誠信的基礎上(shàng)認為(wèi)透露這些(xiē)信息在以下三種情況是必要的:
1)遵守有(yǒu)關法律規定,遵從合法服務程序。
2)保持維護的商标所有(yǒu)權。
3)在緊急情況下竭力維護用戶個(gè)人(rén)和(hé)社會(huì)大(dà)衆的隐私安全。
4)符合其他相關的要求。
6.用戶的帳号,密碼和(hé)安全性
一旦注冊成功成為(wèi)用戶,您将得(de)到一個(gè)密碼和(hé)帳号。如果您不保管好自己的帳号和(hé)密碼安全,将對因此産生(shēng)的後果負全部責任。另外,每個(gè)用戶都要對其帳戶中的所有(yǒu)活動和(hé)事件負全責。您可(kě)随時(shí)根據指示改變您的密碼,也可(kě)以結束舊(jiù)的帳戶重開(kāi)一個(gè)新帳戶。用戶同意若發現任何非法使用用戶帳号或安全漏洞的情況,立即通(tōng)知。
7. 免責條款
用戶明(míng)确同意網站(zhàn)服務的使用由用戶個(gè)人(rén)承擔風險。   
不作(zuò)任何類型的擔保,不擔保服務一定能滿足用戶的要求,也不擔保服務不會(huì)受中斷,對服務的及時(shí)性,安全性,出錯發生(shēng)都不作(zuò)擔保。用戶理(lǐ)解并接受:任何通(tōng)過服務取得(de)的信息資料的可(kě)靠性取決于用戶自己,用戶自己承擔所有(yǒu)風險和(hé)責任。
8.有(yǒu)限責任
對任何直接、間(jiān)接、偶然、特殊及繼起的損害不負責任。
9. 不提供零售和(hé)商業性服務
用戶使用網站(zhàn)服務的權利是個(gè)人(rén)的。用戶隻能是一個(gè)單獨的個(gè)體(tǐ)而不能是一個(gè)公司或實體(tǐ)商業性組織。用戶承諾不經同意,不能利用網站(zhàn)服務進行(xíng)銷售或其他商業用途。
10.用戶責任
用戶單獨承擔傳輸內(nèi)容的責任。用戶必須遵循:
1)從中國境內(nèi)向外傳輸技(jì)術(shù)性資料時(shí)必須符合中國有(yǒu)關法規。
2)使用網站(zhàn)服務不作(zuò)非法用途。
3)不幹擾或混亂網絡服務。
4)不在論壇BBS或留言簿發表任何與政治相關的信息。
5)遵守所有(yǒu)使用網站(zhàn)服務的網絡協議、規定、程序和(hé)慣例。
6)不得(de)利用本站(zhàn)危害國家(jiā)安全、洩露國家(jiā)秘密,不得(de)侵犯國家(jiā)社會(huì)集體(tǐ)的和(hé)公民的合法權益。
7)不得(de)利用本站(zhàn)制(zhì)作(zuò)、複制(zhì)和(hé)傳播下列信息:
1、煽動抗拒、破壞憲法和(hé)法律、行(xíng)政法規實施的;
2、煽動颠覆國家(jiā)政權,推翻社會(huì)主義制(zhì)度的;
3、煽動分裂國家(jiā)、破壞國家(jiā)統一的;
4、煽動民族仇恨、民族歧視(shì),破壞民族團結的;
5、捏造或者歪曲事實,散布謠言,擾亂社會(huì)秩序的;
6、宣揚封建迷信、淫穢、色情、賭博、暴力、兇殺、恐怖、教唆犯罪的;
7、公然侮辱他人(rén)或者捏造事實诽謗他人(rén)的,或者進行(xíng)其他惡意攻擊的;
8、損害國家(jiā)機關信譽的;
9、其他違反憲法和(hé)法律行(xíng)政法規的;
10、進行(xíng)商業廣告行(xíng)為(wèi)的。
用戶不能傳輸任何教唆他人(rén)構成犯罪行(xíng)為(wèi)的資料;不能傳輸長國內(nèi)不利條件和(hé)涉及國家(jiā)安全的資料;不能傳輸任何不符合當地法規、國家(jiā)法律和(hé)國際法 律的資料。未經許可(kě)而非法進入其它電(diàn)腦(nǎo)系統是禁止的。若用戶的行(xíng)為(wèi)不符合以上(shàng)的條款,将取消用戶服務帳号。
11.網站(zhàn)內(nèi)容的所有(yǒu)權
定義的內(nèi)容包括:文字、軟件、聲音(yīn)、相片、錄象、圖表;在廣告中全部內(nèi)容;電(diàn)子郵件的全部內(nèi)容;為(wèi)用戶提供的商業信息。所有(yǒu)這些(xiē)內(nèi)容受版權、商标、标簽和(hé)其它财産所有(yǒu)權法律的保護。所以,用戶隻能在和(hé)廣告商授權下才能使用這些(xiē)內(nèi)容,而不能擅自複制(zhì)、篡改這些(xiē)內(nèi)容、或創造與內(nèi)容有(yǒu)關的派生(shēng)産品。
12.附加信息服務
用戶在享用提供的免費服務的同時(shí),同意接受提供的各類附加信息服務。
13.解釋權
本注冊協議的解釋權歸北京心創達科技有限公司所有(yǒu)。如果其中有(yǒu)任何條款與國家(jiā)的有(yǒu)關法律相抵觸,則以國家(jiā)法律的明(míng)文規定為(wèi)準。
 
關 閉

VBA一問一答(dá)

1.問:什麽版本能用VBA?
 
答(dá):3DMine軟件2011.6版本以上(shàng)的都能用。
 
2.問:怎麽打開(kāi)vba
答(dá):首先得(de)安裝vba程序,安裝完成後,打開(kāi)3DMine軟件,啓動工具—宏—VBA編輯器(qì),則可(kě)開(kāi)始寫代碼。
 
3.問:如何運行(xíng)已經寫好的宏?
答(dá):工具—宏—運行(xíng)宏,選擇要運行(xíng)的宏,點擊運行(xíng)即可(kě)。
 
4.問:如何找到3DMine的函數(shù)?
答(dá):打開(kāi)視(shì)圖—對象浏覽器(qì),基本上(shàng)3dmine的函數(shù)都能在VisualMine裏找到。
 
5.如何在代碼中添加注釋?
答(dá):直接添加注釋符 (')。這個(gè)符号告訴 Visual Basic,忽略該符号後面的內(nèi)容。注釋可(kě)以和(hé)語句在同一行(xíng)并寫在語句的後面,也可(kě)占據一整行(xíng)。您可(kě)以通(tōng)過選中兩行(xíng)或多(duō)行(xíng)代碼并在“編輯”工具欄上(shàng)通(tōng)過選擇“注釋塊”或“删除注釋塊”按鈕來(lái)對該代碼塊添加或删除注釋符号。
 
6.問:如何引用其他應用程序的類型庫?
答(dá):工具—引用,找到需要引用的類型庫在前打勾,點擊确定即可(kě)。
 
7.問:如何創建點?
答(dá):Sub 創建點()
         Dim pointAs MineDPoint
         Set point= Library.CreatePoint(1, 2, 3)  
        ThisDrawing.ModelSpace.AddPointEntity point
EndSub
 
8.問:如何創建一根直線?
答(dá):Sub 創建線()
             Dimpoly As Mine3DPolyline
              Dimpointss As MineDPoints
             Setpointss = Library.CreatePoints   ‘創建點集
              pointss.Add2, 3, 4, 0
              pointss.Add5, 6, 7, 0
             Setpoly = ModelSpace.Add3DPoly(pointss)  
End sub
 
9.問:如何創建圓?
答(dá):Sub 創建圓()
             Dimpt1 As MineDPoint, pt2 As MineDPoint
             Setpt1 = Library.CreatePoint (1, 2, 3)
            Dimcir As MineCircle
             Setcir = ModelSpace.AddCircle (pt1, 2)
      Endsub
 
10.問:如何創建單行(xíng)文字?
答(dá):Sub 創建單行(xíng)文字()
        DimtextObj As MineSText
        Dim point As MineDPoint
        Set point =ThisDrawing.Library.CreatePoint(1, 2, 3)
        Set textObj =ThisDrawing.ModelSpace.AddSText("hello, welcome to 3dmine", point,0.5)
End Sub  
 
11.問:如何創建多(duō)行(xíng)文字?
答(dá): Sub 創建多(duō)行(xíng)文字()
           Dimdhwz As MineMText
           Dimpoint As MineDPoint
           Setpoint = ThisDrawing.Library.CreatePoint(1, 2, 3)
           Setdhwz = ThisDrawing.ModelSpace.AddMText(point, 0.5, "hello the world")
End Sub
 
12.問:如何創建面?
答(dá): Sub 創建面1()
     Dim face As Mine3DFace
    Dim pt As MineDPoints
    Set pt = Library.CreatePoints
    pt.Add 1, 2, 3, 0
    pt.Add 12, 5, 9, 0
    pt.Add 4, 15, 7, 0
    pt.Add 8, 8, 14, 0
     Dim fList(0 To 7)  '定義數(shù)組
    fList(0) = 3
    fList(1) = 0
    fList(2) = 1
    fList(3) = 2
    fList(4) = 3
    fList(5) = 0
    fList(6) = 1
    fList(7) = 3
    Set face =ThisDrawing.ModelSpace.Add3DFace(pt, fList) 'flist為(wèi)數(shù)組
    face.Color = 255
    face.Update
End Sub
 
13.問:如何寫出對話(huà)框?
答(dá):在VBA編輯器(qì)中,插入—用戶窗體(tǐ),然後按照需求在窗體(tǐ)中插入書(shū)簽,文字框,複合框,命令按鈕等。
 
14.問:如何獲取打開(kāi)的數(shù)據庫?
答(dá):Dim dbs As MineDrillHoleDbs
    Set dbs = ThisDrawing.DrillHoleDbs  注意:這裏的數(shù)據庫可(kě)以是多(duō)個(gè)數(shù)據庫。
 
15.問:如何獲取加載的塊體(tǐ)模型?
答(dá):Dim blk As MineBlockModel
    Set blk = BlockModel               注意:這裏的塊體(tǐ)模型隻能是一個(gè)。
 
16.問:3DMine中基本的對象有(yǒu)哪些(xiē)?
答(dá):有(yǒu):點(MinePointEntity)、線(Mine3DPolyline)、面(Mine3DFace)、圓(MineCircle)、圓弧(MineArc)、單行(xíng)文字(MineSText)、多(duō)行(xíng)文字(MineMText)、圖層(MineLayer)、填充(MineHatch)、數(shù)據庫(MineAcGeDrillDb)、塊體(tǐ)模型(MineBlockModel)。
 
17.問:3DMine常用的VBA接口有(yǒu)哪些(xiē)?
答(dá):有(yǒu):MineApplication、MineLibrary、MineModelSpace、MineUtility、Drawing
 
18.問:能否在VBA裏讀寫txt,word,excel等格式?
答(dá):可(kě)以的。 
版權所有(yǒu):北京心創達科技有限公司     地址:北京市石景山(shān)區(qū)八角東街(jiē)融科創意中心A座902室    電(diàn)話(huà):010-88684762    郵箱:3dmine@3dmine.com.cn

京公網安備:11010702000728