منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
اغلاق نافذة - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : اغلاق نافذة (/showthread.php?tid=9255)

اغلاق نافذة - asto - 13-06-13

السلام عليكم

مطلوب كود اغلاق نافذة

اغلاق نافذة - عبدالله الصافي - 13-06-13

ضع ذلك الكود
unload me

اغلاق نافذة - asto - 14-06-13

اقصد نافذة المجلد My Documents

اغلاق نافذة - ALBRNS - 16-06-13

السلام عليكم

جرب التالي

PHP كود :
Private Sub Command1_Click()
Set Doc = CreateObject("shell.application")
For Each A In Doc.Windows
If A.document.folder.self.Path = Environ$("USERPROFILE") & "\Documents" Then A.Quit
Next
End Sub 

بالتوفيق

اغلاق نافذة - asto - 17-06-13

ALBRNS كتب :السلام عليكم

جرب التالي

PHP كود :
Private Sub Command1_Click()
Set Doc = CreateObject("shell.application")
For Each A In Doc.Windows
If A.document.folder.self.Path = Environ$("USERPROFILE") & "\Documents" Then A.Quit
Next
End Sub 

بالتوفيق

نمام مشكور اخي