VB SolidWorks繪製乙個圓

2021-07-26 03:33:02 字數 1688 閱讀 6181

1、繪製乙個圓的**

dim part as object

dim boolstatus as boolean

sub main()

'連線solidworks

'在前視基準面建立乙個圓

boolstatus = part.extension.selectbyid2("前視基準面", "plane", 0, 0, 0, false, 0, nothing, 0)

part.sketchmanager.insertsketch true

'直接繪製乙個圓 格式為 x y z 半徑 代替createcricle

part.createcirclebyradius2 0, 0, 0, 0.04

part.sketchmanager.insertsketch true

dim myfeature as object

set myfeature = part.featuremanager.featureextrusion2(true, false, false, 0, 0, 0.01, 0.01, false, false, false, false, 1.74532925199433e-02, 1.74532925199433e-02, false, false, false, false, true, true, true, 0, 0, false)

end sub

------------------------------------

2、繪製乙個輸入引數的圓**

'cdbl 轉換文字型別為double 型別

depth = cdbl(txtdepth.text) / 1000

'在前視基準面建立乙個圓

boolstatus = part.extension.selectbyid2("前視基準面", "plane", 0, 0, 0, false, 0, nothing, 0)

part.sketchmanager.insertsketch true

'直接繪製乙個圓 格式為 x y z 半徑 代替createcricle

part.createcirclebyradius2 0, 0, 0, diamate

part.sketchmanager.insertsketch true

dim myfeature as object

set myfeature = part.featuremanager.featureextrusion2(true, false, false, 0, 0, depth, 0.01, false, false, false, false, 1.74532925199433e-02, 1.74532925199433e-02, false, false, false, false, true, true, true, 0, 0, false)

end sub

Unity繪製戶型(一)

戶型繪製主要物件資料 點 線 面 部件 門窗 主要難點是通過繪製的點尋找閉合多邊形 多邊形的生成 3d牆體的生成 門窗要在牆體上留下孔洞這四個功能。這篇文章我只寫前兩個問題,後面來兩個問題單獨再寫一篇文章。1.如何尋找閉合多邊形?我的方法是遍歷全部的點,剔除不參與構面計算的點。不參與構面計算的意思是...

繪製圓形,方法一(Canvas,drawOval)

這個方法挺有趣的。private int mradius 6 2 假設有乙個geopoint gp,儲存著衛星座標對 3 4 設定筆刷 5 paint paint new paint 6 paint.setantialias true 抗鋸齒7 paint.setcolor color.blue 8...

繪製圓心 SVG 繪製圓形

本節我們來學習如何在 svg 中繪製圓形,圓形也是 svg 的基本形狀之一,我們可以通過元素來繪製原型。要繪製圓形可以通過元素來實現,在繪製圓形時,我們需要確定這個圓的圓心及半徑。其中確定圓心需要用到cx屬性和cy屬性,半徑需要用到r屬性。除此之外,還可以使用fill屬性圓進行顏色填充,stroke...