模糊搜索的结果无法返回来

[xilaianzxsc]

模糊搜索的结果,无法返回

A表单: 有个text1,另有command1

A表单的command1里面是
do form B表单 &&这样,在A表单没有关闭的情况下,打开了B表单 (A表单在后面,B表单在前面)

B表单是用于模糊搜索的,通过双击选定的行,已经取到了值
B表单的dblClick的命令如下
public abcd && 内存变量abcd进行public一下
abcd=this.value &&结果是字符型,如abcd="123"
thisform.release &&此条命令,即把B表单关闭了.此时只余下A表单还活着.

我的要求是:
B表单关闭后,但abcd="123"仍然在内存中,现想此将值自动赋值给A表单的text1.

不知代码如何写，写在哪个表单里？

请高手赐教。

十分感谢。

[dogfish001]

ding

[都市夜猫]

不需要使用 public 型变量，根据表单B是模式还是非模式表单，处理方式也不同

如果是模式表单，在表单B的 unload 事件中写 return 返回值，表单A调用时用：
do form 表单B to m.retval
thisform.text1.value = m.retval

[xilaianzxsc]

自己顶一下

[xilaianzxsc]

应该是非模式表单。换句话说，即如何把B表单中运行出来的一个内存变量，转给A表单中的一个text中去。

[都市夜猫]

1. 表单A的 Command1 调用表单B的代码：
do form 表单N with Thisform
2. 表单B新建一个属性 oCaller，初值为 .null.，在它的 Init 事件中写:
lparameters toCaller
this.oCaller = m.toCaller
3. 表单B取得 abcd 值后，直接将此值传递给表单A:
Thisform.oCaller.Text1.Value = abcd
Thisform.oCaller = null
Thisform.Release()

[xilaianzxsc]

恕我愚钝，还没有完全明白。

能否举个例子，弄二个表单，让我下载后研究一下？

[都市夜猫]

http://access911.net/csdn/FileDescription.asp?mdb=2010-5-23&id=29

[xilaianzxsc]

正在研究中.....

[xilaianzxsc]

高手啊。

毕竟是老师，水平就是高！

问题全部解决，看了实例，全部清楚了。

实例已经收藏。

[xilaianzxsc]

问题就在于：表单A如何调用？

[xilaianzxsc]

都市夜猫来了，问题肯定解决了