2009年的问题续篇，Functions.Complie()是否有错？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

帮助文件里代码放入命令窗口测试出错。请问是有变化了吗？

Dim Code As string
Code = "Dim Val1 As Integer = 1" & vbcrlf
Code = Code & "Dim Val2 As Integer = 2" & vbcrlf
Code = Code & "Dim Sum As Integer = Val1 + Val2" & vbcrlf
Code = Code & "Return Sum"
Functions.Add("Sum",Code)
Functions.Complie()

错误提示

编译错误："If"必须以匹配的 "End If" 结束

错误代码：Else

图片点击可在新窗口打开查看此主题相关图片如下：无标题.png

经测试失败的方法：

1.2009年的其它朋友问的问题，里面提到的 Functions.Complie(true) 试过，无效果：

Functions.Complie()是否有错?

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=3735&replyID=&skin=1

2.是否Functions.Add 自定义函数功能不能在命令窗口测试，只能写到事件代码里去测试？

[此贴子已经被作者于2015/10/5 11:59:07编辑过]

oaok	小大 3楼 \| 信息 \| 搜索 \| 邮箱 \| 主页 \| UC
加好友发短信等级：六尾狐帖子：1198 积分：7859 威望：0 精华：0 注册：2013/5/17 14:26:00	Post By：2015/10/5 16:58:00 [只看该作者] 用户已经被屏蔽

主题：2009年的问题续篇，Functions.Complie()是否有错？