新增
strSQL = "insert into 資料表名稱(名稱,編號,姓名) " & _
"values('" & Me![名稱] & "','" & Me![編號] & "','" & Me![性別] & "')"
DoCmd.RunSQL strSQL
刪除
mySQL = "Delete FROM 資料表名稱 WHERE 編號 = '" & me.編號 & "'"
DoCmd.RunSQL mysql
更新
mySQL ="UPDATE 資料表名稱 SET 姓名 = '" & me.姓名 & "' WHERE 編號 = '" & me.編號 &"'"
DoCmd.RunSQL mysql