Office中国论坛/Access中国论坛

标题: 请问将一窗体控件值写入向另一窗体另控件内 [打印本页]

作者: yisen 时间: 2009-1-8 14:17
标题: 请问将一窗体控件值写入向另一窗体另控件内
请问将一窗体控件值写入向另一窗体另控件内如何操作

打开药品出库表------在药品出库明细子窗体中的--------销售数量双击后会出现拆零销售计算器----当我在计算器录入数量及整合数量后--------会算出拆零除整合的值----------焦点到拆零除整合框---最后我想实现回车后后---------算出的值填入到"药品出库明细子窗体"的------销售数量内,请问如何做?

[ 本帖最后由 yisen 于 2009-1-8 17:00 编辑 ]

作者: todaynew 时间: 2009-1-8 15:31
是对原销售数量修改，还是新增一条记录？如果是对原记录的修改不知道下面的方法是否可行？

1、增加两个文本框控件，如图：
[attach]34381[/attach]

[attach]34382[/attach]

2、计算器上的处方编号双击事件中，加入更新查询：

Private Sub 处方编号_DblClick(Cancel As Integer)
Dim sql As String
sql = "UPDATE 药品出库明细表 SET 药品出库明细表.销售数量 = [Forms]![计算器]![拆零整合] "
sql = " WHERE (((药品出库明细表.处方编号)=[Forms]![计算器]![处方编号]) AND ((药品出库明细表.药品编号)=[Forms]![计算器]![药品编号]));"
DoCmd.RunSQL sql
[Forms]![药品出库表]![药品出库明细表子窗体].Form.Requery
End Sub

[ 本帖最后由 todaynew 于 2009-1-8 16:11 编辑 ]

作者: yisen 时间: 2009-1-8 16:59
这样可以了,但我不知道该怎么样写代码,可以关掉计算器窗口.

[ 本帖最后由 yisen 于 2009-1-9 10:45 编辑 ]

作者: todaynew 时间: 2009-1-8 17:45
呵呵，可以建一个宏用close关闭窗体，然后把该宏转换成VB代码。这样就知道怎么写关闭语句了。

用此方法可以摸索出许多常见代码的书写方式。

DoCmd.Close acForm, "计算器"

[ 本帖最后由 todaynew 于 2009-1-8 18:15 编辑 ]

作者: 雨后的天空 时间: 2009-1-8 18:42
就是高手一语道破天机

作者: arrowscupid 时间: 2009-1-8 20:42
看看[:33]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)