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

أوضح لكم السؤال

برنامجي للنسخ الإحتياطي أريد كود أضعة في الفورم لود

يغلق البرنامج الرئيسي و قاعدة البيانات

لكي يعمل برنامج النسخ بدون أخطاء هذا فقط

SendMessage أو PostMessage و أبعت WM_CLOSE بعد الحصول على الـ hWnd بـ FindWindow

شكراً لك

ولكن لم أفهم بالضبط

أرفقت

شكراً لك

ولكن لم أفهم بالضبط

أرفقت مثال لتعديل عليه

Close_Help_File.rar

استخدم الدالة FindWindow للحصول على مقبض (HWnd) النموذج المساعد

ثم استخدم الدالة SendMessage ومرر لها البارامتر WM_CLOSE و البارمتر HWnd اللي حصلت عليه قبل شوية

أهلا محمد وبالتوفيق في الامتحانات (للجميع )

لقد نسيت دوال الapi وأحاول مراجعة بعض منها وهناك طرق للاستفادة أظن من الprocess ID الذي ترجعه دالة shell لكي نعمل على انهائه

لكن طريقة البحث أسهل أظن :)

أرفقت مثال لتعديل عليه أرجوا التعديل عليه لأن الدول برمجتي فيها ضعيفة

في قسم التصريحات أضف الدوال اللازمة

Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal Msg As Long, wParam As Any, lParam As Any) As Long

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
  (ByVal lpClassName As String, _
   ByVal lpWindowName As String) As Long

Private Const WM_CLOSE = &H10

ضع زر للفتح واستعمل Shell

Shell "help.exe", vbHide

وزر آخر للغلق

Dim lngHwnd As Long
lngHwnd = FindWindow(vbNullString, "Form1")
SendMessage lngHwnd, WM_CLOSE, ByVal CLng(0), ByVal CLng(0)

لا تنسى أن تغير الCaption للفورم الأساسي وتستعمل عنوان يختلف عن Form1 B)

جزاك الله خير

وأعذرني على التأخير