CurrentDb.TableDefs("XTABLE").Fields("SFIELD").Type = dbText
คำสั่งนี้คุณเคยใช้กำหนดค่าได้หรือครับ หรือไม่เคยใช้มาก่อน
ผมใช้สำหรับให้มัน Return ค่า Data Type กลับมาเท่านั้น มันกำหนดค่ากลับไปได้ด้วยหรือครับ?

- ลองใช้เป็น SQL ALTER TABLE Statement ดูครับ ง่ายกว่านะผมว่า

    Dim db As DAO.Database
    Set db = CurrentDb
    db.Execute "ALTER TABLE XTABLE ALTER COLUMN SFIELD Char;"
    db.Close

ปล. ถ้ามีข้อมูลเก่าอยู่แล้วข้อมูลไม่สอดคล้องกับ Data type ใหม่ที่เปลี่ยน ข้อมูลอาจหายได้นะครับ ต้องระวังมากๆ

ขอบคุณครับ
วิธีที่ผมเขียนนั้นมันใช้ไม่ได้หนะครับ

SQL ALTER TABLE Statement ใช้อย่างไรครับ
ต้องการเปลี่ยน field นึงจาก Text ให้กลายเป็น Date/Time ครับ
ส่วนเรื่องข้อมูลหาย ยอมรับได้ครับ

ก็ถ้าใช้เป็น SQL ก็คือ:
ALTER TABLE XTABLE ALTER COLUMN SFIELD Date

ถ้าจะใช้กับ VBA ก็คือ:
    Dim db As DAO.Database
    Set db = CurrentDb
    db.Execute "ALTER TABLE XTABLE ALTER COLUMN SFIELD Date;"
    db.Close

ขอบคุณมากครับ ได้แล้วครับ
แต่ข้อมูลหายหมดจริงๆด้วย T.T