mohkhosh
سه شنبه 16 بهمن 1386, 10:00 صبح
یه مشکل اساسی دارم
روی duble click یک text boxبا نام bb فرمان زیر را داده ام
DoCmd.SetWarnings False
dim a as variant
a = bb
On Error GoTo eroo
eroo: DoCmd.CancelEvent
If [EMPS].Value > 0 Then
For I = 1 To DCount("emps", "list")
me.bb = a
DoCmd.GoToRecord , , acNext
Next I
Else
DoCmd.CancelEvent
با این فرمان هرچی رو این فیلد هست برای مقادیر همین فیلد در رکودهای موجود در این فرم کپی میشه
می خواهم یه شرط دیگه هم براش بگذارم که در عین duble click کردن بعدش تا مثلا کلید q رو نزده این عملیات کپی کردن مقدار انجام نشه
لطفا راهنمایی کنید . فکر کنم مشابه فرمان get در qbasicباشه
روی duble click یک text boxبا نام bb فرمان زیر را داده ام
DoCmd.SetWarnings False
dim a as variant
a = bb
On Error GoTo eroo
eroo: DoCmd.CancelEvent
If [EMPS].Value > 0 Then
For I = 1 To DCount("emps", "list")
me.bb = a
DoCmd.GoToRecord , , acNext
Next I
Else
DoCmd.CancelEvent
با این فرمان هرچی رو این فیلد هست برای مقادیر همین فیلد در رکودهای موجود در این فرم کپی میشه
می خواهم یه شرط دیگه هم براش بگذارم که در عین duble click کردن بعدش تا مثلا کلید q رو نزده این عملیات کپی کردن مقدار انجام نشه
لطفا راهنمایی کنید . فکر کنم مشابه فرمان get در qbasicباشه