اتصال Text Box به نتیجه Query در فرم Unbound

[Milad_ATM]

با سلام
اساتید محترم
Query ایجاد کردم که بعد از لاگین User یک امتیاز به اون میده
ینی فقط یک عدد در فیلد Weight بمن میده
چطور میتونم یک TextBox رو در یک فرم Unbound در رویداد On Load فرمم به اون وصل کنم و اون یک مقدار رو در اون نشون بدم؟
توضیح اینکه فرم رو بنا بدلایلی نمیخوام Bound کنم و ترجیحاً نمیخوام از Subform استفاده کنم.
Capture.JPG

به این صورت انجامش دادم که متاسفانه با خطای parameter مواجه میشم!

Me.txtWeightUser = DLookup("Weight", "qryUserRanking", "Username=TempVars!tempUser")

11.JPG

[Milad_ATM]

برای اینکه کسی مجدداً به مشکل من برنخوره
مشکل این بود که از اسامی کلیدی استفاده کردم
در واقع اسم فیلدی که فراخوانی میکردم بطور مستقیم در vba قابل استفاده نبود.

Weight

[mazoolagh]

1- همون کد اولی هم باید بدون مشکل کار کنه، weight از کلمات کلیدی نیست!

2- حتی اگر weight یک کلمه کلیدی بود باز هم استفاده از اون مشکلی نداره بشرطی که درون [] باشه.

3- چون شما شرط رو در خود کوئری qryUserRanking آوردین، دیگه آوردنش در dlookup بی مورد هست:

Me.txtWeightUser = DLookup("Weight", "qryUserRanking")

4- میتونین بجای ساخت کوئری و بعد استفاده از dlookup ، مستقیما با dsum محاسبه کنین (مگر این که دلیلی برای این کار داشته باشین):

Me.txtWeightUser = DSUM("Weight", "tbl.....", "Username=TempVars!tempUser")