VB數(shù)據(jù)庫數(shù)據(jù)的選項(xiàng)錄入及增減與編輯之二

字號(hào):

1 數(shù)據(jù)庫基本錄入界面的設(shè)計(jì)
    首先用vb中的數(shù)據(jù)管理器創(chuàng)建一個(gè)access數(shù)據(jù)庫“c:\my.mdb”,在表“worker”中加入一個(gè)字段“name”,然后在vb的缺省表單中拖入一個(gè)數(shù)據(jù)控件、一個(gè)文本框、一個(gè)表簽、一個(gè)命令按鈕組,合理設(shè)計(jì)界面布局,并設(shè)置各個(gè)控件的屬性,如表1。
    加入下列代碼即可得到一個(gè)數(shù)據(jù)庫基本輸入窗口:
    private sub command1-click(index as integer)
    select case index
    case0’addnew
    data1.recordset.addnew
    text1.setfocus
    case1’edit
    data1.recordset.edit
    text1.setfocus
    case2’giveup
    data1.recordset.cance1update
    data1.refresh
    case3’save
    data1.recordset. update
    data1.refresh
    case4’delete
    data1.recordset.delete
    data1.refresh
    case5’end
    end
    end select
    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 "新增""編輯""放棄""保存""刪除""退出"