Compile error-ambiguous name detected

[gianniskar]

Τασο μαλλον το ελυσα. https://easyupload.io/kjrctf
-------------------------------
1)Στην δικια μου βαση οπως ειπα εχω βαλη την εφαρμογη απ οτο forum "diary" η οποια εχει μια φορμα

"frm_Entry_Main" οπου εχει μεσα την Public Sub Sleep(sngTime As Single) και το module

"BasShared"
|
|
\/
Public Sub HotSpotClick(sControlName As String)
On Error GoTo PROC_ERR

Me.Controls(sControlName).SpecialEffect = 2
Sleep 1
Me.Controls(sControlName).SpecialEffect = 3
DoEvents

PROC_EXIT:
Exit Sub

PROC_ERR:
MsgBox Err.Description
Resume PROC_EXIT

End Sub
--------------------------------------------------------------------------------------------------------------------------------------------------------------------
2)Επισης εχω βαλει στην βαση μου και την "frm_login" και το module "mdlGeneral".Στο module υπαρχει η function
"Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)" οπου εδω ειναι το προβλημα αν καταλαβα καλα οτι βρισκει 2 ιδια ονομα.
--------------------------------------------------------------------------------------------------------------------------------------------------------------------
Λυση:

πηγα και αλλαξα την Public Sub Sleep(sngTime As Single) --> Public Sub mySleep(sngTime As Single) και

Public Sub HotSpotClick(sControlName As String)
On Error GoTo PROC_ERR

Me.Controls(sControlName).SpecialEffect = 2
Sleep 1
Me.Controls(sControlName).SpecialEffect = 3
DoEvents...κλπ

---------->> Public Sub HotSpotClick(sControlName As String)[/B]
On Error GoTo PROC_ERR

Me.Controls(sControlName).SpecialEffect = 2
μυSleep 1
Me.Controls(sControlName).SpecialEffect = 3
DoEvents

--------------------------------------------------------------------------------------------------------------------------------------------------------------------
Εκανα compile και δεν μου βγαζει το συγκεκριμενο error.