ساخت فیلد Currency از نوع General Number با کوئری

[M.T.P]

سلام

بنده از کوئری زیر برای ساخت یک جدول با یک فیلد Currency استفاده می کنم.

CREATE TABLE tblUser(fldCredit CURRENCY)

سوالم اینجاست که چطور نوع فرمت فیلد Currency رو General Number بزارم؟
یعنی با کوئری بالا Format فیلد خالیه.

[Abbas Amiri]

سلام
برای فیلد Curreny نمیتوان در موقع ایجاد آن در SQL اعشار راتنظیم کرد . مثل آنچه برای Decimal بکار میرود ((15,2) CREATE TABLE tblUser(fldCredit DECIMAL
چاره استفاده از شیء DAO.Field برای دستکاری خصوصیات آن میباشد


Dim db As Database
Set db = CurrentDb()
db.TableDefs("tdfName").Fields("FieldName").Properties("Format") = "General Number"
Set db = Nothing

[M.T.P]

دوست عزیز ممنون

با اینکه کد درسته و همه چیز صحیح به نظر میاد اما پیغام پیدا نشدن Property ی Format رو میده !

حتی با حلقه 20 بار Property رو پیمایش کردم و پروپرتی ها رو با دادن عدد بررسی کردم Format داخلش نیست.

عجیبه !

[Abbas Amiri]

سلام
باید از Create Property استفاده کرد


Dim fld As DAO.Field
Dim prp As Property
Set fld = db.TableDefs("MyTable").Fields("MyField")
Set prp = fld.CreateProperty("Format", dbText, "General Number")
fld.Properties.Append prp