25-05-14, 12:29 PM
اريد كود عند كل مره افتح البرنامج يتغير الصوره في PictureBox الى صوره اخرى
فيجوال استوديو 2012 وشكراً
فيجوال استوديو 2012 وشكراً
[سؤال] اريد كود عند كل مره افتح البرنامج يتغير الصوره
|
25-05-14, 12:29 PM
اريد كود عند كل مره افتح البرنامج يتغير الصوره في PictureBox الى صوره اخرى
فيجوال استوديو 2012 وشكراً
25-05-14, 12:56 PM
25-05-14, 01:24 PM
(25-05-14, 12:56 PM)amedo كتب : اريد كود عند كل مره افتح البرنامج يتغير الصوره في PictureBox الى صوره اخرى منقول مع تعديل بسيط ليناسب طلبك أولاً إجعل أسماء الصور أرقام وستلاحظ عند إضافتها للريسورس أن اسماء الصور والتي هي أرقام أضيفت قبلها الرمز (_) تشبة (1_) (2_)...وهكذا.. أتركها ولا تغيرها ثانيا إذهب إلى خصائص المشروع التبويب Settings وأضف متغير باسم num ثالثاُ ضع هذا الكود وغير الرقم 4 إلى عدد الصور لديك كود : Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load صورة لتوضيح أولاً وثانياً تم الشكر بواسطة: amedo , Omar Mekkawy
25-05-14, 01:55 PM
(25-05-14, 01:24 PM)vbnet كتب :(25-05-14, 12:56 PM)amedo كتب : اريد كود عند كل مره افتح البرنامج يتغير الصوره في PictureBox الى صوره اخرى اسف اخى , لكن يتم عرض نفس الصوره مره اخرى عند فتح البرنامج .
25-05-14, 02:07 PM
اسف اخى , لكن يتم عرض نفس الصوره مره اخرى عند فتح البرنامج .
25-05-14, 05:47 PM
تعديل بسيط....عليك أن تستخدم الكود ب الشكل التالي
كود : Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load تم الشكر بواسطة: محمديات
25-05-14, 09:54 PM
(25-05-14, 05:47 PM)silverlight كتب : تعديل بسيط....عليك أن تستخدم الكود ب الشكل التالي شكراً اخى الكريم ، تم الحل
26-05-14, 06:11 AM
ماشاء الله
حظك طيب اخي الكريم صاحب السؤال وجدت اجوبة نادرة بصراحة. بقي سؤال عن الـريسورس وهو: ماهو كود معرفة عدد ملفاتها؟ تم الشكر بواسطة: amedo
26-05-14, 06:56 AM
(26-05-14, 06:42 AM)vbnet كتب :(26-05-14, 06:11 AM)سعود كتب : بقي سؤال عن الـريسورس وهو: ماهو كود معرفة عدد ملفاتها؟ بارك الله بيك وبصاحب الموضوع. لكن الا يوجد كود مباشر لمعرفة عدد الملفات؟ لان بالكود هذا لابد من سرد الملفات ثم بعد ذلك يتم معرفة العدد. تم الشكر بواسطة: amedo
26-05-14, 07:02 AM
(26-05-14, 06:56 AM)سعود كتب : بقي سؤال عن الـريسورس وهو: ماهو كود معرفة عدد ملفاتها؟ (26-05-14, 06:42 AM)vbnet كتب : معرفة جميع الملفات الموجودة في الريسورس (26-05-14, 06:11 AM)سعود كتب : لكن الا يوجد كود مباشر لمعرفة عدد الملفات؟ لان بالكود هذا لابد من سرد الملفات ثم بعد ذلك يتم معرفة العدد. ليس من الضروري سرد الملفات، منقول مع تعديل بسيط ليناسب طلبك معرفة عدد ملفات الريسورس كود : MsgBox("عدد الملفات: " & My.Resources.ResourceManager.GetResourceSet(Globalization.CultureInfo.CurrentCulture, True, True).OfType(Of Object).Count) كود : Dim ResourceSet As Resources.ResourceSet = My.Resources.ResourceManager.GetResourceSet(Globalization.CultureInfo.CurrentCulture, True, True) معرفة عدد صور الريسورس كود : MsgBox("عدد الصور: " & My.Resources.ResourceManager.GetResourceSet(Globalization.CultureInfo.CurrentCulture, True, True).OfType(Of Object).Where(Function(d) TypeOf (d.Value) Is Drawing.Image).Count) كود : Dim ResourceSet As Resources.ResourceSet = My.Resources.ResourceManager.GetResourceSet(Globalization.CultureInfo.CurrentCulture, True, True) تم الشكر بواسطة: Omar Mekkawy , amedo
|
|