以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  增加明细第二行就选择不了，帮看一下哪里错了  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=61909)
--  作者：有点甜
--  发布时间：2014/12/22 10:29:00
--  
 哪个窗口，哪个表，怎么操作出错啊
--  作者：有点甜
--  发布时间：2014/12/22 10:31:00
--  

 Datacolchanged事件

 

If forms("门诊收费单").opened
    forms("门诊收费单").controls("Label13").text=Tables("门诊收费单表头.门诊收费单明细").Compute("sum(金额)")
End If
--  作者：有点甜
--  发布时间：2014/12/22 11:06:00
--  
 测试没有问题。可以输入。
--  作者：有点甜
--  发布时间：2014/12/22 11:14:00
--  

 你表名写错了。

 

If e.Selected Then \'如果选择了值
    Dim tbl As Table = Tables("Drop药品档案_Table1")
    If tbl.Current IsNot Nothing Then
        e.Form.DropDownBox.Value = tbl.Current("药品编号")
        Tables("门诊收费单表头.门诊收费单明细").Current("项目名称") = tbl.Current("药品名称")
        Tables("门诊收费单表头.门诊收费单明细").Current("单位") = tbl.Current("单位")
        Tables("门诊收费单表头.门诊收费单明细").Current("单价") = tbl.Current("零售价")
    End If
End If
--  作者：有点甜
--  发布时间：2014/12/22 11:41:00
--  

http://www.foxtable.com/help/topics/2465.htm

 
--  作者：有点甜
--  发布时间：2014/12/22 11:48:00
--  
以下是引用liming730323在2014-12-22 11:45:00的发言：
table控件选择不了副本，不让选择

 

不需要设置成副本。其它的照着做即可。
--  作者：有点甜
--  发布时间：2014/12/22 16:07:00
--  
以下是引用liming730323在2014-12-22 15:57:00的发言：

如果下拉明细是套餐名称，怎么实现录入？

 

什么意思？不是一样这样做么？有什么区别？
--  作者：有点甜
--  发布时间：2014/12/22 16:10:00
--  
以下是引用liming730323在2014-12-22 16:09:00的发言：

如果是套餐名称，套餐里还有很多明细

 

那你就直接用套餐明细表。
--  作者：有点甜
--  发布时间：2014/12/22 16:30:00
--  
以下是引用liming730323在2014-12-22 16:26:00的发言：
选择套餐时，能自动把明细带出来吗？
[此贴子已经被作者于2014-12-22 16:25:58编辑过]

 

不明白你说的明细具体指什么，然后带到哪里去。

 

关键都是你查找到值，然后赋值就行啊。