ايران ويج

نسخه‌ی کامل: اين کنترل hWnd دارد?
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
سلام
توي پرانتز رو چطوري بايد پر کنم؟ :
کد:
Dim i As Control
For Each i In Me
if ( ميباشد hWnd دارايi) then
...
End If
Next i
توی خط اول به جای Control نام شی خودت رو بنویس.
مثال: Dim i as Picturebox
سلام
این یه نمونه :
کد:
On Error GoTo er1
Dim i As Control
For Each i In Me
    a = i.hWnd
Next i
Exit Sub
er1:
MsgBox i.Name
Resume Next
دستور on error اصلا دستور مطمئني نيست خصوصا اگه تو يه حلقه اجرا بشه
راه ديگه اي نيست؟