以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=42893)

--  作者:wsxdwh
--  发布时间:2013/11/25 14:33:00
--  [求助]代码

代码执行时,确保前面的代码执行完后再执行后面的代码。(因为代码执行时好像有些代码被优先执行。)

我之前在帮组中看到过,加一条代码就可以解决,但是今天怎么也找不到,请专家们提示一下为感!!!

[此贴子已经被作者于2013-11-25 14:34:45编辑过]

--  作者:Bin
--  发布时间:2013/11/25 14:34:00
--  
代码一律是前面执行完毕后再执行后面的.
--  作者:Bin
--  发布时间:2013/11/25 14:35:00
--  
你问的是否前面出错后,后面的依然可以执行? 是的话参考这里 http://www.foxtable.com/help/topics/2070.htm
--  作者:wsxdwh
--  发布时间:2013/11/25 14:36:00
--  
例如 动态增加控件并给控件设置属性时
--  作者:Bin
--  发布时间:2013/11/25 14:37:00
--  
代码一律是前面执行完毕后再执行后面的.

动态增加控件参考这里 http://www.foxtable.com/help/topics/1409.htm

--  作者:wsxdwh
--  发布时间:2013/11/25 14:58:00
--  

 还是用例子吧,这样应该表达的更清楚。

以下是截取的一段代码:以空行分为两段。下面的代码执行时要求等待DataTables(jl)的("分数")列的表达式(分数列=s1---s4之和)运行结果出来后才执行,

 

Dim drjy As DataRow =  DataTables(jl).find ("编号 = \'"& bh &"\'")

           drjy("分数1") = s1.value

           drjy("分数2") = s2.value

           drjy("分数3") = s3.value

           drjy("分数4") = s4.value

 

 

            If  drjy("分数") > 0  Then
                drjy("状态") = "○"
            Else
                drjy("状态") = ""
            End  If


 --------------------------------------------------------------           
       因为“分数”列的计算需要时间,代码没有等结果出来就直接运行了后面的代码

怎么做到让“分数”列的计算完成之后再执行后面的代码?

请指教!!!

 


--  作者:Bin
--  发布时间:2013/11/25 15:01:00
--  
你是说等待表达式列计算出结果之后吗?

建议你还是上个文件例子吧.

--  作者:wsxdwh
--  发布时间:2013/11/25 15:04:00
--  
是的
--  作者:wsxdwh
--  发布时间:2013/11/25 15:04:00
--  
用远程行吗
--  作者:Bin
--  发布时间:2013/11/25 15:06:00
--  
1.远程不流畅,不方便.有可能把10分钟的工作量提升为1个小时
2.例子发出来可以帮助后人解决相同的问题.