ojx公式曲线输入工具V1.1

ojx_ojx

以前总为苕窝公式曲线的问题困惑,近期看了笨笨解决公式曲线输入的
9 s2 Q$ @+ d4 ^* e" s, A方法后觉得非常好（感谢笨笨），但是总觉得编辑宏很麻烦，我等苕
6 ~* f+ D5 F, ?6 L( j窝拥护者当然是使用越简单越好，于是便萌生了做一个带界面的公式
' U' Y+ l2 ^' `7 F# A8 n曲线输入宏，可是小弟从未编过程序，于是苦啃帮助，上网查资料，
折腾了一个多星期才做出这么个东东,肯定有编得不好的地方，高手莫
笑。曲线插入方式由Insert3DSketch方式改为InsertCurveFile方式。内
! }% r1 A1 v1 ~置了十几种曲线,也可手工输入,遗憾的是此方式不支持封闭曲线.
此宏在SW2008下调试通过。SW2007未做测试。
2 b% b0 _  o, r+ q
% k1 y" j, o' h# W: r( u  Q3 s ojx带界面曲线宏.rar (26.91 KB, 下载次数: 112)

2008-1-1 01:21 上传

点击文件名下载附件

升级到V1.1,增加了闭合按钮,可以自行决定曲线是否闭合。貌似苕窝不支持自相交曲线？？？

# A, q2 V. M/ Y+ L5 n6 U* I9 N
! ~3 d- L- K3 ]% Z由于要将用户输入的方程变为代码来执行，用到了ScriptControl脚本控件，
- b; }; `. ]. @) i+ f* b& L文件名为Msscript.ocx，故请确保C:\WINDOWS\system32下有此文件（没
' \! D) j( W4 A: G有可以从我这儿下一个），并且保证此控件脚本被成功注册，先将
Msscript.ocx复制到C:\WINDOWS\system32下，然后在Windows的"开始"--"
7 D& W0 W7 X, e# ?( b, M运行"栏
  中输入以下命令：Regsvr32 "C:\WINDOWS\system32\Msscript.ocx" ，按"
运行"按钮，出现注册成功的提示。此外发现变量t未声明，其实在vb中不声
明变量也可以，不过不够严谨，容易发生混乱，故使用Option Explicit强制
显式声明所有变量，修改后的文件已上传。关于教程大家可以自行在站内查
- _" Z" C8 T! X  c6 S1 Z, ^$ r& H找“笨笨教新手”教程（再次感谢笨笨）。大家也可自己编辑宏扩展内置曲
线。
msscript.rar (36.87 KB, 下载次数: 77)

2008-1-3 01:16 上传

点击文件名下载附件
ojx带界面曲线宏V1.1.rar (30.52 KB, 下载次数: 71)

2008-1-3 01:16 上传

点击文件名下载附件

[ 本帖最后由 ojx_ojx 于 2008-1-3 01:16 编辑 ]

hothuo01

感谢楼主的辛勤劳动，顺祝新年快乐

ahhbysy

新年快乐！谢谢楼主的礼物。

ltq59

新年第一帖，谢谢good good good

zhangxi01

祝新年快乐!如何使用?

dignity

感谢lz的辛勤劳动，不过我就想不明白了，为什么sw一直不把方程方式的曲线输入功能加进来呢

che-zp

好工具，祝愿楼主2008年幸福安康

gneful

谢谢，收下了  good good

dengss

收到新年第一礼物，谢谢了。顺祝新年快乐，健康平安！

lizujun1975

非常感谢，收到一份好的新年礼物，祝你新年愉快！

lzyhg_0058

非常感谢，不知道06能用么！看看！

perky2006

Lz能不能加个双曲线的进去啊,真的十分感谢你的劳动成果.

xxyumingao

谢谢！收下了good good

luwenbo001

十分感谢楼主的帮助,谢谢!元旦快乐!!!!!!! :handshake :handshake

snakewolfs

谢谢楼主！！！！！！！！

yuanly

哇噻！这个很好谢谢楼主的分享
. k$ Y& ^0 ~+ E( k% l+ @那能不能讲授一下怎么做这样的插件
也让众维友们也能够做出更多实用的工具来与人分享呵呵

yuanly

Set sc = CreateObject("ScriptControl")
4 b3 d) M  l) x* w    sc.Language = "VBScript"
    sc.AllowUI = True
  Y6 c9 N& d0 U8 J5 r    Set m = sc.Modules.Add("Module1")
楼主这一串有问题
是空指令！

dzxzwgd

谢谢楼主分享！~新年快乐！~

s06

不错的东西,看样子我也得干点东西出来了

ldy188

在07中试过，出现如下提示，不知是什么原因。

suqi11x

虽说对这关系式这高深的工具没用 不过现看看了解下 以后会用到的 谢谢楼主了

阿郎

很好的东东，我下了，能在ＳＷ０８中使用．谢谢分享！

lxl288

师傅，我为你加油来了！
( T* L5 f( q6 f+ N' ]这个东东真的很好用哦，需要的朋友不要错过阿

LCGLCG99

2007中真的不能使用吗?我很需要!