通過獨立的輸入記錄字段
有幾種方式進入記錄,最常見的是綁定到一個表的形式獲得通過。 這樣做的另一種方式是通過不相關的領域,即採用與獨立無關的表字段的表單。 至
輸入的數據,我們使用“記錄集”,即由一個代碼,在這個例子中是如下:
暗淡DB作為數據庫
昏暗的RS作為Recordset如果MSGBOX(“你願意寫嗎?”VbYesNoCancel,“選項”)= vbYes
“按下問是否保存記錄,如果是這樣的代碼,直到年底繼續
集DB = CurrentDb()
設定RS = db.OpenRecordset(“資料”,dbOpenTable)
“打開表插入數據寄存器rs.AddNew
RS(“名稱”)=!INome
RS(“地址”)=我!Imorada
RS(“年齡”)=我!Iidade
rs.Update'將數據發送到表
rs.Close'清除數據和關閉記錄集
設置RS =沒有
設置DB =沒有Me.INome = NULL'清除表單中的字段
Me.Imorada = NULL
Me.Iidade = NULL
MSGBOX“記錄保存”,vbInformation,“做”,“顯示確認消息
Me.INome.SetFocus“將光標移動到第一場
其他:退出小組
結束如果
下載: 獨立廣場






























還沒有評論。