استفاده از رويداد دابل كليك

[mahdytaherian]

با سلام :
فرمي طراحي كردم(نام كالا . كد كالا ) ميخواهم با دابل كليك كردن بروي يك تكس باكس فرم مرتبط باز شود ، واز فرم باز شده با دابل كليك كردن بر روي تكس باكس مورد نظر محتواي تكس باكس به تكس باكس اولي انتقال يابد مثلا با دابل كليك روي كد كالا فرم مشخصات كالا باز شده و در آن بادابل كليك روي كد مورد نظر آن كد انتخاب ودر تكس باكس كد كالا قرار گيرد .
باتشكر

[Abbas Amiri]

در فرم اول


Private Sub KalaID_DblClick(Cancel As Integer)
DoCmd.OpenForm "frmKala", , , , , acDialog
End Sub


ودر فرم کالا


Private Sub KalaID_DblClick(Cancel As Integer)
form_KalaSpec.KalaID = Nz(KalaID)
DoCmd.Close acForm, Me.Name
End Sub



فرض شده نام فرم اول KalaSpec باشد

[mahdytaherian]

دوست عزیز خیلی خیلی متشکرم