مالخطأ في هذ الكود

أخوان أنا لدي كود لإخفاء أيقونات سطح المكتب ولما أشغل البرنامج تظهر لي رسالة خطأ ويوجد بها النص التالي:-

Combile error:-

Ambiguous name detected: FindwindowEx

وها هو الكود:-

Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" _
	(ByVal hWnd1 As Long, ByVal hWnd2 As Long, _
	ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Declare Function ShowWindow Lib "user32" (ByVal hWnd As Long, _
 ByVal nCmdShow As Long) As Long

Private Sub Command1_Click()

Dim hWnd As Long
hWnd = FindWindowEx(0&, 0&, "Progman", vbNullString)
ShowWindow hWnd, 0
End Sub

Private Sub Command2_Click()

Dim hWnd As Long
hWnd = FindWindowEx(0&, 0&, "Progman", vbNullString)
ShowWindow hWnd, 5
End Sub

والخطأ يظهر في المقطع التالي من الكود:-

Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" _
	(ByVal hWnd1 As Long, ByVal hWnd2 As Long, _
	ByVal lpsz1 As String, ByVal lpsz2 As String) As Long

أرجو أن أجد الحل عندكم.....