Private Sub LaySelObj_Click()
Dim lays() As AcadLayer '層面物件
Dim ss1 As AcadSelectionSet '選集物件
Dim i As Integer '計數器
Me.Hide <-----------------hide
vbqa 發表在 痞客邦 留言(3) 人氣(78)
請問有沒有人在玩 AutoCAD VBA
由於使用的人很少 所以想上來交個朋友可以相互討論一下
我現在有一個問題
我將物件炸開後 會產生 聚合線物件
但是這個聚合線物件的型態是 Variant
vbqa 發表在 痞客邦 留言(0) 人氣(76)
在VBA中有這樣的怪問題:
a=0.0185
b=0.018501
得到Round(a,3)=0.018; Round(b,3)=0.019
不知這是什麼原因.請各位大大指點
vbqa 發表在 痞客邦 留言(6) 人氣(120)
vbqa 發表在 痞客邦 留言(1) 人氣(10)
按照給定的年份計算出是否為潤年 潤年的條件為,是4的倍數,而不是100的倍數的年份,但400倍數的仍然是潤年,如果是1000的倍數仍然不是潤年
Private Sub CmdEnter1_Click()
If R Mod 4 <> 0 Then
MsgBox ("不是潤年")
Else
vbqa 發表在 痞客邦 留言(6) 人氣(36)
我實在不知道該如何下筆
請善心人士能夠指導我
感激不盡~~~~~~~
vbqa 發表在 痞客邦 留言(2) 人氣(419)
請問在vba裡
如何能將作好的網頁顯示在自訂保單上
請解答 謝謝
vbqa 發表在 痞客邦 留言(1) 人氣(34)
vba中沒有clipboard物件,我用keybd_event將畫面存入windows clipboard但不知如何存下來,用GetClipboardData也沒辦法(return值為0),可能是因為windows clipboard與office clipboard不同之故,不知各位先進可有解法.
vbqa 發表在 痞客邦 留言(0) 人氣(49)
請教 如何在VBA中執行一個外部 .exe 程式呢?
vbqa 發表在 痞客邦 留言(1) 人氣(41)
vbqa 發表在 痞客邦 留言(0) 人氣(624)