恳求老师的帮助

中原一剑　发表于：2012-11-09 13:24:33 　

1.问题当输入条形码数据后按回车自动清除条形码数据

2当点击清空子窗体中全数据时,清空子窗体中所有数据

3当点击清空子窗体中全数据时,序号中的数值随之变化(递增),如1变2,2变成3等点击下载此附件

在水一方发表于：2012-11-09 19:26:45

Private Sub Command6_Click()
    On Error GoTo Err_Command6_Click
    DoCmd.RunSQL "delete *from 出货明细表;"
    Me.Text16 = Me.Text16 + 1
    Me.Recalc

Exit_Command6_Click:
Exit Sub

Err_Command6_Click:
MsgBox Err.Description
Resume Exit_Command6_Click

End Sub

Private Sub Text10_AfterUpdate()
Me.Text10 = Null
End Sub

总记录：1篇页次：1/1 9 1 :

Access交流中心