在查询中调用窗口的文本框（附例子）(已解决)

luhao

在查询条件中，如何调用窗口中的文本框。

linag516

luhao

Private Sub Form_Load()
    Dim strCriteria As String
    If Not IsNull(Me.Text) Then
        strCriteria = "销售订单='" & Me.Text & "'"
        Me.Child0.Form.Filter = strCriteria
        Me.Chi ...
Henry D. Sy 发表于 2009-2-28 07:28

学习了

Henry D. Sy

1. Private Sub Form_Load()
   
2.     Dim strCriteria As String
   
3.     If Not IsNull(Me.Text) Then
   
4.         strCriteria = "销售订单='" & Me.Text & "'"
   
5.         Me.Child0.Form.Filter = strCriteria
   
6.         Me.Child0.Form.FilterOn = True
   
7.     End If
   
8. End Sub

复制代码

luhao

Forms![客户信息]![客户ID]

36007


******************
*  一切皆有可能  *
******************
.
ACMAIN - Access论坛回贴准则（个人）.
.
同 ...
ACMAIN_CHM 发表于 2009-2-26 22:52

不行呀

Henry D. Sy

客户信息窗体需要打开着

ACMAIN_CHM

Forms![客户信息]![客户ID]




******************
*  一切皆有可能  *
******************
.
ACMAIN - Access论坛回贴准则（个人）.
.
同一贴子不回复第二次
.
QQ群 48866293 / 12035577 / 7440532 / 13666209
http://forum.csdn.net/BList/OtherDatabase .
http://www.accessbbs.cn/bbs/index.php .
http://www.accessoft.com/bbs/index.asp .
http://www.access-programmers.co.uk/forums .
http://www.office-cn.net .
.
http://www.office-cn.net/home/space.php?uid=141646 .