自己弄了一个报价用的软件，在VB中测试使用没有问题，但是编译后运行，同样的操作步骤，同样的数据，在编译后运行时就会提示“内存溢出”，请问会是什么原因？

我也是新手

很是郁闷，原本以为是变量定义小了。可是在VB环境中运行还没问题。编译后运行就出错。

首先我想说：无代码无真相
然后我上百度查了一下，从别人提的这种问题和回答来看，这是个很玄学的问题
顺便【内存溢出】和【溢出】是两种不同的错误

错误提示如图
，因为是一个基本完整的程序了，代码怎么提供呢？一段就可以吗？

这个是相关界面

循环中断的条件有误？

如今的内存怎么用也不会溢出啊，是不是开辟的储存单元不当，或者其他什么占用了太多的内存？我第一感觉是递归不能返回无限深入造成的，但那应该提示是堆栈溢出，而不是内存溢出。真是无处可想。

现在的问题是在编译前，使用VB的环境下可以正常运行，一旦编译后再独立运行时就内存溢出。
这是在VB的环境下运行，选择完“一控二”后MSflexGrid控件显示数据
下面是出错的。编译后独立运行，选中“一控二”后MSflexGrid控件没显示数据，出现错误提示

用 on error分段测试，不用多长时间就能知道代码问题出在哪里
就是on error goto lb,出错了往上移，直到转入lb错误处理段，这时on error goto 行的下行就是问题所在行

猜是最有意思的。就凭一个提示猜代码。太厉害了

加载数据库的过程插入若干msgbox测试哪里出错

感谢大家的分析，没有代码就这么讨论确实有点困难。但是代码太多，无法粘贴上来。所以只好这样了，要是哪位有空闲时间可以帮助测试，我可以把整个程序发送过去。
接下来我先按照“PT98”大侠的提示做测试，有结果告诉大家。谢谢

If Val(Text2(5).Text) Mod 2 <> 0 Then
MsgBox "配套数量不对，请重新选择"
Else
ptdqcs6 = "2"
Call openconn '打开连接数据库
Sql = "select *from jcsj where 规格型号 like '%" & PassEn(dq1k2) & "%' and 名称 like '%" & EnCodeString(dqgg, True) & "%'"
rs.Open Sql, cn, 1, 1 <--------------执行到这里是弹出内存溢出的警告
If rs.RecordCount > 0Then
Call dqfz
CallAdjustColWidth(Form3, Form3.MS4)
End If
Call closeconn
End If

按照PT98大侠的提示，采用PING的方式打出了SQL语句，发现在VB环境的和编译后的没有区别。like后面的字符串是加密后的，有可能是字符串长度在不同环境下分配的存储空间不同引起的吗？