کد فراخوانی ماشین حساب

[nasiiiiiii]

سلام دوستان من می خوام تو برنامه یه دکمه ذاشته باشم که با کلیک روی آن ماشین حساب window اجرا بشه اگه ممکنه راهنماییم کنید:قلب:

[minaforotan]

Dim calculator As Integer
calculator = Shell("calc.exe", AppWinStyle.NormalFocus)

[Miryam]

مرسی دمت گرم:تشویق:
خیلی جالب بود به همین راحتی من کلی کد نوشته بودم جواب داد ولی دردسرش زیاد بود
لطفا اگه کدی دارین که بشه یکی از بازی window رو هم اجرا کنه رو بنویسید
با تشکر فراوان

[minaforotan]

ببین دوست عزیز کد همون کده فقط کافیه اسم برنامه اجراییت رو عوض کنی
برای مثال:

Dim calculator As Integer
calculator = Shell("spider.exe", AppWinStyle.NormalFocus)

[Miryam]

مرسی :قلب:
ولی با این کد فقط تونستم بازی spider فر اخوانی کنم واسه بازی solitaire که نوشتم error داد
چرا؟؟؟:متفکر:

[singel]

Dim calculator As Integer
calculator = Shell("sol.exe", AppWinStyle.NormalFocus)

فقط کافي روي فايلت راست کليک کني بعد properties را بزني و مسير فايل را نگاه کني
مثل بازي solitaire که با sol.exe اجرا ميشه

[Miryam]

Dim calculator As Integer
calculator = Shell("sol.exe", AppWinStyle.NormalFocus)

فقط کافي روي فايلت راست کليک کني بعد properties را بزني و مسير فايل را نگاه کني
مثل بازي solitaire که با sol.exe اجرا ميشه

مرسی دوست عزیزم منم همین کارو کردم ولی بیشتر از یک بازی رو نتونستم فراخوانی کنم.

[minaforotan]

مرسی دوست عزیزم منم همین کارو کردم ولی بیشتر از یک بازی رو نتونستم فراخوانی کنم.

خوب نمیشه چند تا بازی و تو همین یه خط جا داد(اگه هم میشه من نمیدونم) اما میتونی به ازای هر بازی یه متغییر تعریف کنی و اون یه خطو تکرار کنی فقط اسم بازی و عوض کن این جوری من تست کردم جواب داد

[mohammadriano]

البته اگه مقصودت فقط چنین برنامه ای برای خودت هست ! من یک پیشنهاد دارم برروی فایل اجرایی بازی کلیک راست کن properties -shortcut - shortcut key: F5
البته فقط برای خودت با زدن کلید F5 فایل exe شما اجرا می شه اگه دسترسی به shortcut Keyاز داخل فرم اپلیکیشن رو می خای سوالت رو مطرح کن تا کدش رو بنویسم.