نمایش پیغام هنگام اجرای مجدد برنامه

[Morteza_s]

1- برای عدم اجرای برنامه میشه از قسمت My Project استفاده کرد
اما اگه بخوایم هنگام اجرای مجدد برنامه یک پیغام نشون بدیم از چه کدی باید استفاده کرد

2- اگر یک فایل اجرایی رو از داخل برنامه فراخوانی کرده باشیم و در حال اجرا باشه، برای جلوگیری از اجرای مجدد اون فایل خارجی چه باید کرد

ممنون

[Morteza_s]

دوستان راه حلی پیشنهاد نمی کنید؟

[mostafaaa]

سوالت رو کمی نامفهوم مطرح کردی ولی با این حال .
هر پروژه که با دات نت ایجاد میکنی یه Event به نام MyApplication_Startup داره . شما میتونی توی این ایونت با چک کردن اینکه پروسه مربوط به پروژت ران هست یا نه مشکل اولت رو حل کنی.

Private Sub MyApplication_Startup(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupE ventArgs) Handles Me.Startup
Dim P() As Process = Process.GetProcessesByName(My.Application.Info.Ass emblyName)
If P.Length > 1 Then
MsgBox(My.Application.Info.AssemblyName & "now is raning")
End
End If
End Sub
مشکل دومت رو هم میتونی به همین شکل از داخل برنامت حل کنی

[Morteza_s]

ممنون
منظورم رو درست متوجه شدید

من در قسمت تنظیمات برنامه روی دکمه View Application Events کلیک کردم و وارد محیط کد نویسی شدم

اما لیست کشویی Class Name خالیه و وقتی هم که کد شما رو وارد می کنم خطا می گیره
چطور می تونم به این Event دسترسی پیدا کنم

[mostafaaa]

23888
اینو ببین

[Morteza_s]

ممنون
در مورد سوال دومم
داخل شرط، اونجایی که با End برنامه رو می بندیم، برای بستن یه فایل اجرایی مثلآ Calc.exe چیکار باید کرد؟

[mostafaaa]

خوب روال کار اینه که اگه فایل اجراییت ران هست دوباره اصلا ران نشه. نه اینکه ران بشه و شما ببندیش دوباره.
به هر صورت واسه اینکه یه فایل اجرایی رو ببندی یه راهش اینه که پروسش رو Kill کنی.