شرح كيفية انشاء ارتباط تشعبى Hyperlink لموقع معين من خلال الفجوال بيسك 6
صفحة 1 من اصل 1 • شاطر
شرح كيفية انشاء ارتباط تشعبى Hyperlink لموقع معين من خلال الفجوال بيسك 6
بسم الله الرحمن الرحيم
أخوانى الاعضاء اهلا بكم ....اليوم راح اقدم لكم موضوع سهل عن كيفية انشاء ارتباط تشعبى Hyperlink لموقع معين ليقوم المستخدم بفتحه عند الضغط عليه ....
1_ قم بإنشاء مشروع جديد فى الفجوال بيسك 6 ....وضع أداة عنوان علية label .....
2_ قم بإضافة الكود التالى فى قسم التصريحات :
3 _ ثم ضع الكود التالى فى حدث الضغط على أداة العنوان label 1 :
وطبعا يمكن تغير المراد عمل له ارتباط تشعبى بدلا من الموجود بالكود ....
4_ قم بتشغيل برنامج وقم بالضغط على label ستجد أن موقع منتدى مصر التقنى قد فتح امامك ....ما رأيك ؟
الكود فى المرفقات :
أخوانى الاعضاء اهلا بكم ....اليوم راح اقدم لكم موضوع سهل عن كيفية انشاء ارتباط تشعبى Hyperlink لموقع معين ليقوم المستخدم بفتحه عند الضغط عليه ....
1_ قم بإنشاء مشروع جديد فى الفجوال بيسك 6 ....وضع أداة عنوان علية label .....
2_ قم بإضافة الكود التالى فى قسم التصريحات :
- الكود:
Private Declare Function ShellExecute Lib "shell32.dll" Alias
"ShellExecuteA" (ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal
lpDirectory As String, _
ByVal nShowCmd As Long) As Long
3 _ ثم ضع الكود التالى فى حدث الضغط على أداة العنوان label 1 :
- الكود:
ShellExecute Form1.hwnd, "open", "http://egy-tech.forumegypt.net/]http://egy-tech.forumegypt.net", "", "", SW_SHOW Or SW_NORMAL
وطبعا يمكن تغير المراد عمل له ارتباط تشعبى بدلا من الموجود بالكود ....
4_ قم بتشغيل برنامج وقم بالضغط على label ستجد أن موقع منتدى مصر التقنى قد فتح امامك ....ما رأيك ؟
الكود فى المرفقات :
- المرفقات
NEXT- الادارة
- تاريخ التسجيل : 18/02/2011
المساهمات : 446
النقاط : 200660
التقيم : 28
الدولة :
الجنس :
| |
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى
الثلاثاء مارس 26, 2024 6:26 pm من طرف moslema_r
» شركة تنظيف استراحات بالرياض
الأحد مارس 24, 2024 10:49 pm من طرف moslema_r
» كشف تسربات المياه في جدة
السبت مارس 23, 2024 7:23 pm من طرف gmalnagy
» خدمات كشف تسربات المياه بخصم 25% - اتصل الان
السبت مارس 23, 2024 7:22 pm من طرف gmalnagy
» شركة تنظيف ثريات بالرياض
الخميس مارس 21, 2024 7:23 pm من طرف moslema_r
» كهربائي منازل بالرياض
الأحد مارس 17, 2024 1:52 pm من طرف رانيا حماد
» افضل شركة نقل عفش بالرياض نقل باكستاني 40% خصم | موقع الانوار
الأحد مارس 17, 2024 1:25 pm من طرف رانيا حماد
» افضل معلم جبس بالرياض تركيب جبس بورد بالرياض 20% خصم اتصل الآن
الأحد مارس 17, 2024 1:09 pm من طرف رانيا حماد
» شراء اثاث مستعمل بالكويت بخصم 30%
الأحد مارس 17, 2024 12:54 pm من طرف رانيا حماد
» افضل فني كهربائي منازل بالرياض جودة 100% | اتصل الآن
الأحد مارس 17, 2024 12:36 pm من طرف رانيا حماد