操作步骤：
1、打开项目，然后在TbMod表中增加任意4－10行数据都可以，注意Replydate列和C列不能为空。
2、在命令窗口依次执行三个自定义函数“随机增加TbWL表数据“、”随机增加TbModD"、"随机增加TbModWBSD"
3、选中“TbMod"表，点第一行的C列，开始执行弹窗和加载数据界面。不用理会正常的弹窗提示，一般第一行不会报错的。最终显示代码执行的耗时提示综合信息后，关闭最终的界面展示窗口。
4、选中“TbMod"表，依次点第二行的C列、第三行的C列……，我在测试的时候，点到第三行的时候就出现一个报错窗口了。
问题在这里
MessageBox.Show("开始给涉及WBSDR赋值,需要计算的数据=" & owbs.Count & "很奇怪的是执行到这里之后,就开始报错,问题在哪里呢?")
systemready = False
For Each dr As DataRow In owbs
dr("Temp") = True
Next
systemready = True
MessageBox.Show("开始构建UnitWBS") ‘这一行提示信息没有显示出来，很显然应当是上面这一段代码出问题了
Functions.Execute("UnitWBS",4,1) ‘问题应当不在这里
加好友 
发短信
Post By：2018/7/7 11:41:00 [只看该作者]
