PDA

View Full Version : سوال: ماشین حساب در اکسس



145451159
دوشنبه 08 دی 1399, 22:45 عصر
میشه یک نمونه ماشین حساب را ضمیمه کنید خیلی نیاز دارم
:قلب:ممنون از لطفتان:قلب:

Shahramdindoust
دوشنبه 08 دی 1399, 22:50 عصر
ویدیو ساخت ماشین حساب در اکسس
http://developer1.ir/Office/Access/Calc.aspx

Shahramdindoust
دوشنبه 08 دی 1399, 22:52 عصر
مثل اینکه تو همین تالار هم هست
https://barnamenevis.org/showthread.php?37790-%D9%85%D8%A7%D8%B4%DB%8C%D9%86-%D8%AD%D8%B3%D8%A7%D8%A8-%D8%AF%D8%B1-%D8%A7%DA%A9%D8%B3%D8%B3

Shahramdindoust
دوشنبه 08 دی 1399, 22:58 عصر
راستی علاوه بر ساخت ماشین حساب با یه تابع ساده میتونید ماشین حساب ویندوز رو هم " فراخوانی" کنید
یک دکمه در فرم خودت ایجاد کن و در رویداد on click اون دکمه عبارت
shell("calc")
رو تایپ کن

parsa70
دوشنبه 08 دی 1399, 22:59 عصر
Dim calc
calc = Shell("C:\WINDOWS\system32\CALC.EXE", 1)

سلام میشه از این کد هم روی رویداد on click استفاده کرد و ماشین حساب ویندوز روباز میکنه که به نظرم کاملتر هست.

Shahramdindoust
دوشنبه 08 دی 1399, 23:01 عصر
Dim calc
calc = Shell("C:\WINDOWS\system32\CALC.EXE", 1)

سلام میشه از این کد هم روی رویداد on click استفاده کرد و ماشین حساب ویندوز روباز میکنه که به نظرم کاملتر هست.



اگه ویندوز 32 نبود و 64 بود باید system64نوشته بشه بجای system32؟
***********************
ویرایش مجدد
ویرایش شده:
سوالم اشتباه بوده گویا ربطی به ویندوز نداره در هر صورت system32 نوشته میشه من وین 64 دارم تست کردم

parsa70
دوشنبه 08 دی 1399, 23:29 عصر
اگه ویندوز 32 نبود و 64 بود باید system64نوشته بشه بجای system32؟
***********************
نه فرقی نداره تو هر ویندوزی کار میکنه

Shahramdindoust
دوشنبه 08 دی 1399, 23:37 عصر
یه روش دیگه هم هست یه نرم افزار ماشین حساب دانلود میکنی و کنار برنامه ات قرار مید هی و این کد رو رویداد on click دکمه تایپ می کنی(فرض میکنیم نام برنامه calculator) است.
Shell Access.CurrentProject.Path & "\calculator.exe", vbNormalFocus

البته اینو امتحان نکردم