|
7#
楼主 |
发表于 2011-12-1 10:05:54
|
只看该作者
Private Sub btn_Confirm_Click()
在哪里看条件的设置呢?以下是confirm按钮的代码,是不是这里有错呢?
On Error GoTo Err_Command_Open_Form_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Trim Master Form"
stLinkCriteria = "[Trim Number]='" & Me![comb_TrimNumber] & "' And [Trim Supplier]='" & Me![comb_TrimSupplier] & "' And [Trim Color Name/Code]='" & Me![Comb_color] & "'"
'stLinkCriteria = "[Trim Number]='" & Me![comb_TrimNumber] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Command_Open_Form_Click:
Exit Sub
Err_Command_Open_Form_Click:
MsgBox Err.Description
Resume Exit_Command_Open_Form_Click
End Sub |
|