- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助] 帮忙看个currentchange事件的错误 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=37226)
-- 发布时间：2013/7/3 9:32:00
-- [求助] 帮忙看个currentchange事件的错误
先发下代码吧和错误图片吧，不行再弄例子吧亲 帮忙看看哈 代码很简单
Dim t As Table = Tables("生产进度管理_生产进度表")
Dim s As String
With e.Table
If .Current Is Nothing Then
t.DataTable.LoadFilter = "False"
Else
s = "select * from {零件表} where 项目编号 = "
s = s & "\'" & .Current("项目编号") & "\'"
t.Fill(s,"atwdb",False)
End If
End With
For Each r As Row In Tables("生产进度管理_生产进度表").Rows
If r Is Nothing OrElse r.Isnull("bom") Then
Return
Else
Dim tr As WinForm.TreeView = Forms("生产进度管理").Controls("TreeView1")
tr.CreateTree("生产进度管理_生产进度表","bom")
tr.ExpandAll
End If
Exit For
Next
不管是两段整合成一段处理还是分开处理 在切换的时候 都有这个错误
但如果把第二段for each 取消 就不会有错误了
此主题相关图片如下：qq截图20130703093103.png
-- 发布时间：2013/7/3 9:35:00
--
有可能你FILL还没执行完.这时候你循环行数还是原来的行数, 这种情况你还是上个例子分析一下比较好.
-- 发布时间：2013/7/3 14:19:00
--
有可能你FILL还没执行完.这时候你循环行数还是原来的行数, 这种情况你还是上个例子分析一下比较好.
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目11.rar |
-- 发布时间：2013/7/3 15:10:00
--
这个和你标识的代码没有任何关系.
-- 发布时间：2013/7/3 15:27:00
--
这个和你标识的代码没有任何关系.
Bin总 我看错事件了…… 那那边怎么写，请Bin总明示~
-- 发布时间：2013/7/3 15:55:00
--
你要实现什么需求?
-- 发布时间：2013/7/3 16:24:00
--
你要实现什么需求?
currentchanged 事件 需要实现生成的目录树后 在切换行的同时 对应的目录树选中也会改变
-- 发布时间：2013/7/3 16:33:00
--
你不能直接用DATAROW来做, 这样是不行的,因为你重新FILL的时候 原本的DATAROW已经不存在了.
-- 发布时间：2013/7/3 17:15:00
--
你不能直接用DATAROW来做, 这样是不行的,因为你重新FILL的时候 原本的DATAROW已经不存在了.
Bin爷 小弟不才，你如此一说，小弟现在毫无头绪了~第一次发现datarow这个属性的时候发现很好很牛B，那么现在看来囧rz..我该肿么办~
-- 发布时间：2013/7/4 8:35:00
--
别用节点的DATAROW 非要用的话就不要用动态FILL了.改用全部加载,然后点击筛选.