此主题相关图片如下:qq图片20160414001710.png
Dim r2 As Row = Tables("开fa piao.fa piao明细").Current() Dim r1 As Row = e.Table.Current() r2("数量")=r1("数量") r2("单价")=r1("单价") r2("号码")=r1("号码") e.Form.DropDownBox.Value = r1("品名")
Forms("明细").DropDownBox.CloseDropDown()
执行这段代码后,出现这个提示,不知道是哪里的问题,在更早些的版本中是正常的(哪一版忘记了)