以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]代码不执行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=71991)
--  作者：ZDG
--  发布时间：2015/7/21 19:37:00
--  [求助]代码不执行

For Each dr1 As DataRow In DataTables("销售发货明细").Select("[单号] = \'" & e.Form.Controls("DropBox2").text & "\'")
    Dim dr2 As DataRow = DataTables("出库表").AddNew()

    dr2("出库单号") = dr1("单号")

出库表新增行，但没有值

 
--  作者：大红袍
--  发布时间：2015/7/21 19:38:00
--  
 加入代码 msgbox(e.Form.Controls("DropBox2").text )
--  作者：ZDG
--  发布时间：2015/7/21 19:46:00
--  
没反应
--  作者：大红袍
--  发布时间：2015/7/21 19:47:00
--  
 叫你看弹出什么内容啊。
--  作者：ZDG
--  发布时间：2015/7/21 19:53:00
--  
没弹出
--  作者：大红袍
--  发布时间：2015/7/21 19:54:00
--  

 你在第一句吗？

 

 没弹出，就不可能触发事件，也不可能新增行。
--  作者：ZDG
--  发布时间：2015/7/21 19:57:00
--  

哦，引用错了，谢谢