منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
من لديه طريقه لتشغيل (ملف الفجوال بيسك) ينفد امر ثم يغلق من تلقاء نفسه - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : من لديه طريقه لتشغيل (ملف الفجوال بيسك) ينفد امر ثم يغلق من تلقاء نفسه (/showthread.php?tid=21109)

من لديه طريقه لتشغيل (ملف الفجوال بيسك) ينفد امر ثم يغلق من تلقاء نفسه - scsi7000 - 18-07-17

السلام عليكم
من لديه طريقه بحيث اضغط علي ملف البرنامج (ينفد امر ثم يغلق من تلقاء نفسه)
وشكرا

RE: من لديه طريقه لتشغيل (ملف الفجوال بيسك) ينفد امر ثم يغلق من تلقاء نفسه - scsi7000 - 18-07-17

شكرا يا اخواني عرفت الطريقه وهي كاتالي:

Private Sub Command1_Click()
Shell "" & App.Path & "\test.bat", vbMaximizedFocus
End Sub


Private Sub Command3_Click()
End
End Sub

Private Sub Form_Load()
Command1_Click
Command3_Click
End Sub

RE: من لديه طريقه لتشغيل (ملف الفجوال بيسك) ينفد امر ثم يغلق من تلقاء نفسه - المبرمج العتيق - 12-08-19

(18-07-17, 02:57 PM)scsi7000 كتب : شكرا يا اخواني عرفت الطريقه وهي كاتالي:

Private Sub Command1_Click()
Shell "" & App.Path & "\test.bat", vbMaximizedFocus
End Sub


Private Sub Command3_Click()
End
End Sub

Private Sub Form_Load()
   Command1_Click
   Command3_Click
End Sub


ممكن تكتب الكود بتاعك عادى وقبل ماتقفل sub أكتبله أمر un load me