ظهور اسم الموظف عند تحريك الماوس

[محمد احمد لطفى]

السلام عليكم ورحمة الله و بركاته
أريد فى هذا النموذج عند تحريك الماوس على اسم الموظف تظهر صورته 
ولكن عند الانتقال الى موظف اخر تظهر صورة الموظف الاخر 
وعند الانتقال خارج خلية اسم الموظف لا يظهر نموذج الصورة 

وهناك مشكلة اخرى عند عملها بالضغط على اسم الموظف مرتين بالماوس يظهر صورة الموظف عادى 
ولكن عند جعلها بعد تحريك الماوس يظهر مشكله و يتم اغلاق برنامج اكسيس 

وجزاكم الله خيرا 

test3000.rar

[محمد احمد لطفى]

هل من مساعدة

[Shivan Rekany]

حسب رأيي ان تستخدم حالة عند الضغط عليه بدل تمرير الماوس سيكون احسن والله ييعلم

[jjafferr]

وعليكم السلام

 

في احد برامجي اضطررت ان اقوم بشيء شبيه لما تريد عمله ، ولكن ليس بتمرير الفأرة ، وانما بالنقر على زر في السجلات ، والكود المرفق هو لذلك الزر ،

الزر في النموذج الفرعي frm_Beads ،

واسم النموذج الرئيسي frm_M_Beads ،

ونموذج الصورة اسمه frm_Show_Image ،

 

Private Sub cmd_frm_Show_Image_Click()

    DoCmd.OpenForm "frm_Show_Image"
        
        'get the BE path
    BE_Path = application.currentproject.path

    Image_Name = Format(Forms!frm_M_Beads!frm_Beads!Auto_Date, "yyyy_mm_dd-hh_nn_ss")
    Forms!frm_Show_Image!Scan.Picture = BE_Path & "\Images\Items\" & Image_Name & ".jpg"
    
Exit Sub
err_cmd_frm_Show_Image_Click:

    If Err.Number = 2465 Or Err.Number = 2450 Then
        'Form Not open
        Resume Next
    Else
        MsgBox Err.Number & vbCrLf & Err.Description
    End If
        
    
End Sub

 

جعفر

[محمد احمد لطفى]

جزاك الله خيرا