ایجاد جدول اکسس با کد نویسی ویژوال بیسیک اپلیکیشن

 در این مقاله آموزشی به نحوه ایجاد جدول با استفاده از کد نویسی ویژوال بیسیک اپلیکیشن می پردازیم. با استفاده از کد زیر می توانید جدول مورد نظر خود را ایجاد کنید. در این مثال یک جدول با دو فیلد ایجاد می شود.

Sub CreateTableX1() 

    Dim dbs As DAO.Database 

     ' تعریف دیتابیس جاری به کامپایلر 

    Set dbs = CurrentDB

     ' ایجاد جدول با دوفیلد 

    dbs.Execute "CREATE TABLE ThisTable " _ 

        & "(FirstName CHAR, LastName CHAR);" 

     dbs.Close 

 End Sub 

دانلود سمپل دیتابیس اکسس این مثال در لینک زیر: (پسورد فایل www.a00b.com می باشد)

لطفا کلیک فرمائید . لینک دانلود . . .