关键字的查询问题

JimmyOu0707

1.能不能实现，工号我输入802后，能将工号包含802的的记录都查出来。
2.左下脚的价格合计，能不能我输入日期查询以后才显示数字？
麻烦各位帮一下忙，谢谢

红尘如烟

Private Sub Command53_Click()
Dim s条件 As String
If Len(Nz(Me.Text77)) > 0 Then
    s条件 = "WHERE InStr(1,[维保工号],'" & Me.Text77 & "')"
    Me.施工单查询_子窗体.Form.RecordSource = "Select * From 施工单 " & s条件
    Me.施工单查询_子窗体.Requery
Else
    MsgBox "请输入查询条件", vbInformation
End If
End Sub

horse0918

不懂