منتديات المنة

منتدى خاص بالأورجات شراء - بيع - تبادل أصوات
 
الرئيسيةالبوابةمكتبة الصورالتسجيلدخول

شاطر | 
 

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

اذهب الى الأسفل 
كاتب الموضوعرسالة
mefayed
مدير عام المنتدى
مدير عام المنتدى
avatar

عدد الرسائل : 495
تاريخ التسجيل : 07/11/2006

مُساهمةموضوع: كود تنفيذ أي برنامج عن طريق الفيجوال بيسك   الخميس ديسمبر 07, 2006 6:08 pm

3) كود تنفيذ أي برنامج عن طريق الفيجوال بيسك:
إذا أردت أن تشغل إي برنامج في جهازك عن طريق الفيجوال بيسك، اكتب العبارة التالية....
Dim A
A = Shell ("programpath",n)

حيث A متغير... و اكتب مكان الــ programpath مسار البرنامج كاملا، و اكتب مكان n رقم من 0 إلى 6، حيث كل رقم له دلالته...

0 تظهر نافذة البرنامج مخفية.
1 تظهر نافذة البرنامج بحجمها الطبيعي و معها التركيز.
2 تظهر النافذة مصغرة و معها التركيز.
3 تظهر النافذة مكبرة و ومعها التركيز.
4 تظهر نافذة عادية و بدون تركيز.
6 تظهر نافذة مصغرة بدون تركيز.

و إن التابع Shell يرجع قيمة عددية تحفظ في المتغير A تشير إلى مقبض النافذة الذي يعترف عليه Windows

ملاحظة: الفائدة من وضع القيمة 0 للمتغير n ، هي لظهور النافذة مخفية، و بالتالي يتم تحميل النافذة في الذاكرة دون أن نراها. و نستغيد من هذه الحالة في تشغيل ملف تنفيذي لكي يؤدي وظائف معينة دون أن يشاهد المستخدم نافذة البرنامج (برامج الفيروسات و التجسس)
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://mady.niceboard.com
goma
مشرف عام
مشرف عام


عدد الرسائل : 71
تاريخ التسجيل : 09/11/2006

مُساهمةموضوع: رد: كود تنفيذ أي برنامج عن طريق الفيجوال بيسك   الخميس فبراير 15, 2007 11:30 pm

حاجة فريدة من نوعها
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو
 
كود تنفيذ أي برنامج عن طريق الفيجوال بيسك
الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
منتديات المنة :: قسم التكنولوجيا المتطورة :: منتدى الفيجوال بيزك-
انتقل الى: