كيف أغلق برنامج

السلام عليكم .. بامكانك استخدام end لاغلاق البرنامج

ارجوا التوضيح

ولكن اريد ان اعلمك مثال لخاصيه Unload

Private Sub Form_Unload(Cancel As Integer)
MsgBox "باي"
End Sub

السلام عليكم ...

ذلك يعتمد على الرنامج ...

هل البرنامج الذي تريد أغلاقه هو برنامجك ( أي

أن المستخدم يحاول فتح البرنامج وهو مفتوح ) أم هو برنامج آخر من برامج المستخدم ؟؟

نرجوا التوضيح ...

تحياتي ...

يا أصدقائي أنا أقصد اني هناك برنامج يعمل في الذاكرة مثل winword.exe وانا اريد التاكد أولا ان الwinword.exe يعمل حاليا ام لا فاذا كان يعمل في الذاكرةاريد اغلاقة اما اذا كان لا يعمل فلا يفعل شي

السلام عليكم ...

لايمكن عمل ذلك من داخل الفجوال بيسك بشكل مباشر ...

يمكن ذلك من خلال الدوال API ..

يمكنك أستخدام الدالة التالية :

Declare Function TerminateProcess Lib "kernel32" Alias "TerminateProcess" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long

· hProcess
Identifies the process to terminate.
Windows NT: The handle must have PROCESS_TERMINATE access. For more information, see Process Objects.

· uExitCode
Specifies the exit code for the process and for all threads terminated as a result of this call. Use the GetExitCodeProcess function to retrieve the process’s exit value. Use the GetExitCodeThread function to retrieve a thread’s exit value.

والباقي عليك ... :D

تحياتي ,,,