我们会选择模式表单进行返回值操作，为了保证表单的临时表是独立环境，各个表单的数据不会影响，我们选择私有工作期。
在unload方法实际返回数据给上层程序
代码语言：javascript代码运行次数：0运行复制<code class="javascript">If Thisform.Tag ="1" Return KCBMZD.KCBMZD_BMBHElse Return .null.Endif</code>
调用模式表单获取表单的返回值
代码语言：javascript代码运行次数：0运行复制<code class="javascript">Do Form 模式表单 TO uReturn* 处理uReturn,下面的业务流程</code>
uReturn 为返回值上面我是设置返回.null.,像返回.F. 或空串表示没有返回值，或者产生了错误。
但有以下原因的时候，返回值并非为意想中的值．1当模式表单在LOAD,INIT事件加载出错2 在init事件中 return 0此时表单不会调用Unload方法返回值，而且没有返回值。也就是uReturn将出现未定义的错误
为避免这种情况，我们要先定义一下uReturn ，这样就不会出错了。
代码语言：javascript代码运行次数：0运行复制<code class="javascript">local uReturn uReturn=.null.Do Form 模式表单 TO uReturnif !isnull(uReturn) *--执行工作代码endif </code>
在一个表单(例：frmTest)中新建一个表单属性 oCustom在表单的 Init 事件中
代码语言：javascript代码运行次数：0运行复制
<code class="javascript">This.oCustom = CreateObject("Custom")This.oCustom.AddProperty("aValue[1]","")</code>在表单的 Unload 事件中
代码语言：javascript代码运行次数：0运行复制<code class="javascript">Return This.oCustom</code>
调用表单
代码语言：javascript代码运行次数：0运行复制<code class="javascript">local oCustomdo form frmTest to oCustom? alen(oCustom.aValue) </code>
在表单的 Unload 事件中
代码语言：javascript代码运行次数：0运行复制<code class="javascript">oFly=Createobject("Empty")AddProperty(oFly,"aValue[1]")Return oFly</code>如果从表单中的一个表中返回数组
代码语言：javascript代码运行次数：0运行复制<code class="javascript">oFly=Createobject("Empty")select * from 表名 into array xxylarow=ALEN(xxy,1)lacol=ALEN(xxy,2)AddProperty(oFly,"aValue[(larow),(lacol)]")ACOPY(xxy,oFly.aValue)Return oFly</code>以上就是VFP表单返回对像、数组、值，这个细节要注意，防止崩溃的详细内容，更多请关注php中文网其它相关文章！
每个人都需要一台速度更快、更稳定的 PC。随着时间的推移，垃圾文件、旧注册表数据和不必要的后台进程会占用资源并降低性能。幸运的是，许多工具可以让 Windows 保持平稳运行。
广告Copyright 2014-2025 https://www.php.cn/ All Rights Reserved | php.cn | 湘ICP备2023035733号
943
收藏
