VB数据库数据的选项录入及增减与编辑之二

文章作者 100test 发表时间 2007:03:10 18:12:41
来源 100Test.Com百考试题网

1 数据库基本录入界面的设计

　　首先用vb中的数据管理器创建一个access数据库“c:\my.mdb”，在表“worker”中加入一个字段“name”，然后在vb的缺省表单中拖入一个数据控件、一个文本框、一个表签、一个命令按钮组，合理设计界面布局，并设置各个控件的属性，如表1。

　　加入下列代码即可得到一个数据库基本输入窗口：

private sub command1-click(index as integer)

0select case index

case0’addnew

data1.recordset.addnew

text1.setfocus

case1’edit

data1.recordset.edit

text1.setfocus

case2’giveup

data1.recordset.cance10update

data1.refresh

case3’save

data1.recordset. 0update

data1.refresh

case4’0delete

data1.recordset.0delete

data1.refresh

case5’end

end

end 0select

end sub


表一

控件名 属性名 属性值

name data1

data databasename "c:\my.mdb"

recordsource "worker"

name text1

text text ""

datasource "data1"

datafield name

label caption "姓名" 　

name command1

commandbutton index 0 1 2 3 4 5

caption "新增""编辑""放弃""保存""删除""退出"