مشکل با تعویض Datasoure یک TextBox

[m2011kh]

سلام به همه دوستان و عیدتون رو پیشاپیش تبریک میگم.

و حالا اصل مطلب:
من یه تکست باکس دارم به اسم Text1
خوب من بوسیله ی این کد Datatsourse اون رو به Adodc1 تنظیم میکنم:

With Text1
.DataSource = Adodc1
.DataField = "Name"
End With

ولی مشکل اینجاست که موقع اجرای این کد Compile Error میده و میگه:

Compile Error:
Method or data member not found


از راهنمایی هاتون ممنون میشم.البته برای کاری که در نظر دارم راه های دیگه ای هم هست ولی این بهترینش هست اگه بشه این مشکلو حل کرد خیلی بهتر میشه.

موفق و سربلند باشید.

MMD

[m.4.r.m]

این کد رو درست نوشی یه تیکه کوچولو کم نوشتی
With Text1
Set .DataSource = Adodc1
Set .DataField = "Name"
End With

البته تو قسمت Datafield احتمالا Set نباید باشه ولی تست کن نبود پاکش کن