如何改变字段名称?

Question

问题：
    1、用ADO，怎么改变数据表（ACCESS）的字段名？
    2、用ADO，怎么改变数据表（ACCESS）的字段类型？
    3、用ADO，怎么改变数据表（ACCESS）的字段长度？
    ————————————————————————
    4、INSERT键是插入/改写状态的转化，在textbox控件录入时，怎么做才能让其始终为插入状态。

Answer 1

这是用DAO做的Private Sub Command1_Click()
    Dim tdExample As TableDef
    Dim fldForeName As Field
    Dim fldSurname As Field
    Dim fldDOB As Field
    Dim fldFurtherDetails As Field
    Dim dbDatabase As Database
    Dim sNewDBPathAndName As String
    
    sNewDBPathAndName = "E:\" & Right$(Time, 2) & ".mdb"
    Set dbDatabase = CreateDatabase(sNewDBPathAndName, dbLangGeneral, dbEncrypt)
    Set tdExample = dbDatabase.CreateTableDef("Example")    Set fldForeName = tdExample.CreateField("Fore_Name", dbText, 20)
    Set fldSurname = tdExample.CreateField("Surname", dbText, 20)
    Set fldDOB = tdExample.CreateField("DOB", dbDate)
    Set fldFurtherDetails = tdExample.CreateField("Further_Details", dbMemo)
    
    tdExample.Fields.Append fldForeName
    tdExample.Fields.Append fldSurname
    tdExample.Fields.Append fldDOB
    tdExample.Fields.Append fldFurtherDetails
    
    dbDatabase.TableDefs.Append tdExample
    MsgBox "New .MDB Created - '" & sNewDBPathAndName & "'", vbInformation
End Sub