【求助】帮忙测试：笨笨曲线 for 2005 B1——3D曲线输入插件

ly54476903

  
1. 從sw系統選項中，取得模版路径即可。
2. 用回轉方式，即可尋找到你所需要的東東，
    就算系統的3個基準面給改名，也可從容找到。(即可解決你的2004/2005模版不一樣的問題)

xie3321

替ahlzl 表示感谢

zdj0988

啊，大侠发话了！
我写的这段代码，能新建一零件文件。可只能在我的电脑上，别人就不行了！
  
Dim swApp As Object
Dim Part As Object
Dim boolstatus As Boolean
Sub main()
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
Set Part = swApp.NewDocument("E:SolidWorkslangchinese-simplifiedTutorialpart.prtdot", 0, 0#, 0#)
End Sub
  
大侠说的第一条，我无法在代码中实现。

wghgyy

2. 用回轉方式，即可尋找到你所需要的東東……
  
大侠的第二条，我也是一点都不懂。能否来段示范代码！先谢谢了！还有，我E文太差，API帮助看不懂。
  
to SW笨笨：这两个贴偏离了主题，请您原谅！

garysmith11

   经典案例图书

好的，很不错啊，solidworks机械工程师论坛真不错，顶一下

colour

我要去测试一下

机械小仙

   经典案例图书

从系统选项中获得模板来建立新零件，就不必这样那样了。
通常，问题都出于“人”身上，可是“人”往往把责任都推到是死物的机器之上。
  
Dim swApp As Object  
Dim Part As Object  
  
Sub main()  
Set swApp = Application.SldWorks  
temp = swApp.GetUserPreferenceStringValue(8)<----看附图
Set Part = swApp.NewDocument(temp, 0, 0#, 0#)
End Sub

wangcunlj

我给路過蜻蜓磕头了！！！
你是怎么知道的？我API帮助看不懂啊，E文太差了！
这个问题：在VBA中，如何判断零件文件中已有几个草图、基准面、基准轴等，它们的名称！？ 您老能不能……

r9u265p064

  
当然有办法，想知道吗？
除非你能猜到我的真身是谁。（只有一次机会）

cubalikun

  
我猜不出来啊！您老就发发慈悲吧！

beatles

  
机械工程师论坛公开秘密也不答，唉！爱莫能助了

尹诺

公开秘密也不答……我是新来的，什么都不知道啊！
  
等我猜对了，您就……

ousil

  
我有机会吗？

sixsixsix

  
既然有一次机会 ，也不能放弃啊！
  
猜，您就是大侠！
  
我在模具论坛看到大侠的一个关于文件属性的贴子，并下载了EXCEL文件，觉得和这有关，可一时还看不懂。请您老请教！先谢谢了！！

2000xwf

加入QQ群
参与讨论和学习

或扫描二维码加入

大侠啊，您老哪去了，再不来，贴子就沉底了！
还有一个问题：SW的VBA没“智能提示”，能不能有个什么绝招，把它们搞出来，SW的方法、属性这么多，没法记啊！

daosheng

   经典案例图书

  
正点！学习学习再学习，讨论起来，高人高见就多了。笨笨多谢

21066718

加入QQ群
参与讨论和学习

或扫描二维码加入

高手,支持一下

nbxman

   经典案例图书

  
办法很简单，申明对象变量的时候把类型写清楚就行了。
例如：
Dim swApp As SldWorks.SldWorks  ‘申明SW应用程序对象
Dim part As SldWorks.ModelDoc2   ’申明文件对象
这样下次用到这些变量的时候就会有对应的属性和方法提示
如果是这样申明：
Dim swApp As Object
VB也不清楚对象是个什么东东，自然没有提示。

ccww9898

  
头是一定要磕的！！

cax784

  
《追魂劍》内有最佳例子SolidWorks机械工程师论坛