Dim bh As WinForm.Label = e.Form.Controls("Label4")Tables("采购明细").Filter= "采购单号 = '" & bh.text & "'"
为什么不执行呢?