[المبرمج العتيق]

(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