用[ExecuteLine]写的代码在调试的时候能用 但编译出来就大有问题 如图
而在调试的时候不出任何问题 这个代码很强大啊 我测试的所有都能执行 就是编译出来有问题 真是太遗憾了。。。
用[ExecuteLine]的代码
Private Declare Function EbExecuteLine Lib "vba6.dll" (ByVal pStringToExec As Long, ByVal Unknownn1 As Long, ByVal Unknownn2 As Long, ByVal fCheckOnly As Long) As Long
Private Function ExecuteLine(sCode As String, Optional fCheckOnly As Boolean) As Boolean ExecuteLine = EbExecuteLine(StrPtr(sCode), 0&, 0&, Abs(fCheckOnly)) = 0End FunctionPrivate Sub Command1_Click()ExecuteLine Text1End Sub
而[scriptcontrol]则可以编译且没有问题 就是觉得支持的命令太少了 连print都不行if虽然可以但简单循环不行 哪个大神能否有更简单方法执行外部命令 小弟感激不尽 谢谢
@cbm666 用[ExecuteLine]的代码 好像还是您提示我的 您能否完美决绝？ 求赐教

现在做的就是这个，可这个眼看成功却又让人无比蛋疼啊 在调试的时候那是一个兴奋那 可一调试就、、、怎么决绝那 求求求求求求求求求求解决 我想要实现的其实也挺简单的就向上图那样在【已生成】的文件的text中输入【vb的代码】 单击command1后能【响应代码】
求解答啊各种求 如有想法第一时间告诉我好么 qq710610446 万分感谢
@cbm666 老师求解答

调试的时候凌晨1点差不多你看 一激动这都三点 了 冲我这镜头 大神帮帮我吧

调试的时候多么完美啊、、、、
help。。。。。。。。。。。。。。

看看这个吧:http://hi.baidu.com/csuhkx/item/88d3ce0a1a96b718ebfe38e0

那个东西似乎本来就只能在IDE中运行，听我的，用scriptcontrol

记得要先把Language属性设置为"javascript"或者"vbscript"后才能用。

我分析了下 EbExecuteLine 函数只能在IDE行啊运行的原因，原来常量都没有进行初始化！直接空指针挂了。

这个只能执行一句普通的代码，不支持变量声明，不支持API声明。还不如vbs.