الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

أريد أن أصنع شيء بيدي فساعدوني

مغلق
بدأه DESPIRADO في 27 سبتمبر 2004 · 2 رد · 730 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

مشكلتي أني أريد أعمل برنامج بالفيجوال بيسك 6 وفكرة هذا البرنامج بسيطة جدا لكني فشلت كثير في تنفيذه ولكن احاول أن لا أيأس وفكرة البرنامج هي

عمل برنامج يحتوي مثلا على ثلاث أزرار كل زر من هذه الأزرار عندما أقوم بالضغط عليه يفتح لي ملف من ملفات الباور بوينت التي نشأتها من قبل بتوضيح أكثر

كلنا نعرف السي دي الذي تأتي مع كروت الفاكس والفيديو عندما نفتحها تظهر لنا شاشة أنيقة بها موسيقه وتوجد بها عدة أزرار تحتوي هذه الازرار على كل ما بداخل السي دي ولكن معروضه بطريقة أنيقة مثل السي دي بتاع المازربورد عندما نفتحه تأتي لنا قائمة جميلة وتكون AutoRun انا أريد أن أعمل برنامج مثل هذا بالظبط بإستخدام الفيجوال بيسك حيث أنني يوجد عندي ملفات باور بوينت من إنشائي أريد أن ادمجها في برنامج بطريقة أنيقة ويكون لها AutoRun على سي دي مع العلم أني لست محترفا في الفيجوال بيسك ولكني أحاول أن أتعلم فلا تبخلوا علي بهذه الفرصة الثمينة

وجزاكم الله خير

#2

السلام عليكم و رحمة الله و بركاته

أخي العزيز انصحك بأن تجرب الدلفي DELPHI بدلاً عن الفيجوال بيسيك

لأنك تريد تصنع Auto Run

#3

السلام عليكم

اخى

يمكنك التعامل مع اى برنامج من برامج office و ذلك باستخدام الاكواد التاليه

Private Sub access_Click()

Shell "c:\program files\microsoft office\office\msaccess", vbNormalFocus

End Sub

'''''''''''''''''''''power point for your project

Private Sub ppt_Click()

Shell "c:\program files\microsoft office\office\powerpnt", vbNormalFocus

End Sub

''''''''''''''''''''''

Private Sub word_Click()

Shell "c:\program files\microsoft office\office\winword", vbNormalFocus

End Sub

Private Sub xls_Click()

Shell "c:\program files\microsoft office\office\excel", vbNormalFocus

End Sub

اتمنى منك المحاوله ثم الرد على

هذا الموضوع مغلق.

مواضيع مشابهة