المشاركات : 1,468
المواضيع 351
الإنتساب : Apr 2016
السمعة :
334
الشكر: 3379
تم شكره 2456 مرات في 1124 مشاركات
السلام عليكم ورحمة الله وبركاته
هو ينفع أدخل الكود اللى بالأسفل داخل Module هكذا مثلا
Module Module1
Public Sub sanaa()
checkedListBox1.Items.Clear()
Button3.Enabled = False
Button4.Enabled = False
IsValidate = False
myCheck = New CheckedListBox()
WebBrowser.ScriptErrorsSuppressed = True
WebBrowser.Navigate("http://www.downvids.net/download-youtube-playlist-videos")
End Sub
End Module
وأنده عليه من خلال كلمة sanaa ؟
لآنى جربتها لكن ظهر اخطاء كثيرة داخل الموديول وطبعا
انا عاوز فقط أفهم لآن المشروع أكواده كثيرة وطويلة وانا عاوز اخلى داخل الفورم
اكواد صعيرة جدا وباقى الاكواد تكون داخل صب او موديول وفقط انده عليها...
المشاركات : 501
المواضيع 119
الإنتساب : Jul 2014
السمعة :
16
الشكر: 1786
تم شكره 1291 مرات في 275 مشاركات
السلام عليكم اخي ابو روضة
قم بتسمية اسم الفورم قبل كود مثلا :
كود :
form1. Button3.Enabled = False
المشاركات : 1,468
المواضيع 351
الإنتساب : Apr 2016
السمعة :
334
الشكر: 3379
تم شكره 2456 مرات في 1124 مشاركات
(10-09-18, 07:52 PM)larbihamri كتب : السلام عليكم اخي ابو روضة
قم بتسمية اسم الفورم قبل كود مثلا :
كود :
form1. Button3.Enabled = False
جزاك الله كل خير اخى العزيز
ظهر خطأ فى بعض الاكواد ونفع مع اكواد اخرى انظر
المشاركات : 847
المواضيع 9
الإنتساب : Oct 2015
السمعة :
131
الشكر: 2219
تم شكره 1685 مرات في 745 مشاركات
أخي أبوروضة حياك الله
انصحك بمتابعة دورة تعليمية للغة البرمجة التي تستخدمها
ألاحظ من مواضيعك انك متحمس ومهتم بالبرمجة
لهذا أعتقد انك ظالم لنفسك لتجاهلك بأهمية تعلم الأساسيات
المشاركات : 1,468
المواضيع 351
الإنتساب : Apr 2016
السمعة :
334
الشكر: 3379
تم شكره 2456 مرات في 1124 مشاركات
(10-09-18, 08:26 PM)محمد كريّم كتب : أخي أبوروضة حياك الله
انصحك بمتابعة دورة تعليمية للغة البرمجة التي تستخدمها
ألاحظ من مواضيعك انك متحمس ومهتم بالبرمجة
لهذا أعتقد انك ظالم لنفسك لتجاهلك بأهمية تعلم الأساسيات
ليس ظلما للنفس أخى الكريم استاذ محمد وليس الموضوع كما تظن حضرتك..
كل ما فى الأمر أن هناك أشياء لا أستطيع قولها لآنها حساسة بعض الشيئ ولو علمت
الحقيقة ستعذرنى وستقوم بالمساعدة دون أن تحرجنى بالذوق هكذا.
المشاركات : 2,329
المواضيع 81
الإنتساب : May 2018
السمعة :
522
الشكر: 14039
تم شكره 5671 مرات في 2269 مشاركات
10-09-18, 08:52 PM
(آخر تعديل لهذه المشاركة : 10-09-18, 08:54 PM {2} بواسطة asemshahen5.)
Module Module1
Public Sub sanaa(checkedListBox1 As CheckedListBox, Button3 As Button, Button4 As Button, IsValidate As Boolean, myCheck As CheckedListBox, WebBrowser1 As WebBrowser)
checkedListBox1.Items.Clear()
Button3.Enabled = False
Button4.Enabled = False
IsValidate = False
myCheck = New CheckedListBox()
WebBrowser1.ScriptErrorsSuppressed = True
WebBrowser1.Navigate("http://www.downvids.net/download-youtube-playlist-videos")
End Sub
End Module
سبحان الله وبحمده سبحان الله العظيم و الحمد لله ولا اله الا الله والله اكبر
المشاركات : 1,468
المواضيع 351
الإنتساب : Apr 2016
السمعة :
334
الشكر: 3379
تم شكره 2456 مرات في 1124 مشاركات
(10-09-18, 08:52 PM)asemshahen5 كتب : Module Module1
Public Sub sanaa(checkedListBox1 As CheckedListBox, Button3 As Button, Button4 As Button, IsValidate As Boolean, myCheck As CheckedListBox, WebBrowser1 As WebBrowser)
checkedListBox1.Items.Clear()
Button3.Enabled = False
Button4.Enabled = False
IsValidate = False
myCheck = New CheckedListBox()
WebBrowser1.ScriptErrorsSuppressed = True
WebBrowser1.Navigate("http://www.downvids.net/download-youtube-playlist-videos")
End Sub
End Module
جزاك الله كل الخير استاذى..
مش انا لما اجى انادى عليها بنادى على اسم sanaa ؟
عملت كدة زظهر خطأ ولا هناك طريقة للمناداة عليها ؟
المشاركات : 2,329
المواضيع 81
الإنتساب : May 2018
السمعة :
522
الشكر: 14039
تم شكره 5671 مرات في 2269 مشاركات
(10-09-18, 09:03 PM)ابو روضة كتب : (10-09-18, 08:52 PM)asemshahen5 كتب : Module Module1
Public Sub sanaa(checkedListBox1 As CheckedListBox, Button3 As Button, Button4 As Button, IsValidate As Boolean, myCheck As CheckedListBox, WebBrowser1 As WebBrowser)
checkedListBox1.Items.Clear()
Button3.Enabled = False
Button4.Enabled = False
IsValidate = False
myCheck = New CheckedListBox()
WebBrowser1.ScriptErrorsSuppressed = True
WebBrowser1.Navigate("http://www.downvids.net/download-youtube-playlist-videos")
End Sub
End Module
جزاك الله كل الخير استاذى..
مش انا لما اجى انادى عليها بنادى على اسم sanaa ؟
عملت كدة زظهر خطأ ولا هناك طريقة للمناداة عليها ؟
sanaa(checkedListBox1, Button3, Button4, True, CheckedListBox, WebBrowser)
سبحان الله وبحمده سبحان الله العظيم و الحمد لله ولا اله الا الله والله اكبر
المشاركات : 1,468
المواضيع 351
الإنتساب : Apr 2016
السمعة :
334
الشكر: 3379
تم شكره 2456 مرات في 1124 مشاركات
(10-09-18, 09:09 PM)asemshahen5 كتب : sanaa(checkedListBox1, Button3, Button4, True, CheckedListBox, WebBrowser)
للاسف اخى لم يقوم بتنفيذ الكود اللى داخل الموديول
المشاركات : 453
المواضيع 127
الإنتساب : Jan 2018
السمعة :
29
الشكر: 351
تم شكره 473 مرات في 239 مشاركات
تقريباً يجب وضع الكود بالشكل التالي ..
كود :
Form1.Button1.Enable = False
وإذا ما قلتة انا خاطئ فأنا اعتذر لإني لست في بلدي و ليس معي الكمبيوتر او حتي اللاب توب
|