通过独立的输入记录字段
有几种方式进入记录,最常见的是绑定到一个表的形式获得通过。 这样做的另一种方式是通过不相关的领域,即采用与独立无关的表字段的表单。 至
输入的数据,我们使用“记录集”,即由一个代码,在这个例子中是如下:
暗淡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“将光标移动到第一场
其他:退出小组
结束如果
下载: 独立广场






























还没有评论。