access多数据录入

上传：stanking26017 浏览： 45 推荐： 0 文件：MDB 大小：304KB 上传时间：2019-03-16 04:32:54 版权申诉

ACCESS多条数据录入，可以方便用户Private Sub BtOK_Click() Dim strSQL As String If (Me.CbSize.Value "") Then strSQL = "INSERT INTO 服装表(服装名称,款式,尺寸) VALUES('" & Me.TxName.Value & "','" & Me.TxStyle.Value & "'," & Me.CbSize.Value & ");" DoCmd.SetWarnings False DoCmd.RunSQL str