打印完后只有边框没有内容？

打字比你快

以下是打印代码，打印完后有几句清空控件的语句，为什么我把清空语句放在最后，但它比打印还早执行，我打印出来的只月边框，没有数据。怎么才能把数据打印出来后，再清空控件内容。谢谢！
Private Sub 打印_Click()
   If MsgBox("是否要打印收据！", vbYesNo, "确认框！") = vbYes Then
              DoCmd.OpenReport "发票打印预览", acViewPreview, "", "", acNormal
       Else
       End If        
   Me.编号 = Null
   Me.姓名 = Null
   Me.单价 = Null
   Me.数量 = Null
   Me.金额 = Null

End Sub

soulmate

  DoCmd.OpenReport "发票打印预览", acViewPreview, acNormal  当中逗号去掉试试