[RaggiTech]

السلام عليكم
نكمل ان شاء الله
الان سنغير الايكون من Resources و بالكود

اضفنا ايكون اسمها alarmd
ثم سنكتب هذا الكود فى اللود فروم

كود :

Form1_Load
[SIZE=2][color=#0000ff]Me[/color][/SIZE][SIZE=2].Icon = ([/SIZE][SIZE=2][color=#0000ff]My[/color][/SIZE][SIZE=2].Resources.alarmd)
[/SIZE]

بدون تغيرها من خضائص الفروم

جرب الان

بالمناسبه يوجد كود لتغير اسم الفروم دون الرجوع الى الخاصيه text للفروم وهو

كود :

Me.Text = "mero5000"

الن يوجد بعض الادواه التى تأخد الصور من الاداه image listومنها التاب كنترول

الان نضيف الاداه من الادوات وشكلها اسقفل الصوره على الشمال واسمها imagelist

نقف على الاداه ونعمل كليك يمين ونختار اخر اختيار propertise

ومن الخيار images نضغط على كولكشن ونضيف الصور التى نريد

ثم نقف على التاب كنرول ومن الخاصيه image list

نختار 1 image list كما فى الصوره



ثم نقف على كل tab page ومن image index نختار الصوره من الصور المضافه كما فى الصوره
انظر كيف تم وضع بجانب كل تاب صوره
يمكن عمل هذا الخيار للمتصفحات
انا عملتها لكن سنسند لها كود ليتم غلق التاب كنترول منها



الان سنتعرف على وضع صوت للبرنامج ويكرر نفسه وهذا الكود يعمل من العمل منبه
وهذا الكود فى الحدث اللود فروم

كود :

My.Computer.Audio.Play(My.Resources.Windows_XP_Startup, AudioPlayMode.BackgroundLoop)

اخر الكود مكتوب به BackgroundLoopوهو لتكرار الصوت اما لو اردنا عمل بسمله صوت مثلا
فى بدايه التشغيل

ولا تكرر ممكن مسح كلمه Loop فقط من الكود

ولعمل صوت عند الاغلاق هو ايضا نفس الكود لكن فى الحدث form _closing



الان سنتعرف على تغير الماوس بماوس خارجى

قم بنسخ الماوس الذى تريد اضافته فى المجلد Debug

ثم اكيب هذا الكود

كود :

Imports System.IO
Imports WindowsApplication1.My

كود :

Public Class Form1
Dim Curs As New Cursor(My.Application.Info.DirectoryPath & "\moro.cur")

وفى اللود فروم

كود :

Me.Cursor = New Cursor("moro.cur")

حيث ان moro.cur هو الماوس المضاف للبرنامج

جرب الان

وفى PictureBox من الخاصيه image اى صوره تصيفها هتلاقيها فى مجلد المشروع كما فى الصوره.
من الصور التى قمنا بأضافتها فى اول الموضوع






كل الاصوات التى بالمشروع من C:\WINDOWS\Media


فى المرفقات المشروع الذى قمنا بعمله الان وفيه ......

تغير الايكون للفروم بالكود وليس من الخصائص
تغير اسم الفروم لاكود وليس من الخصائص
اضافه الاصوات للمشروع سواء عند مرور الماوس على زر او عند الضغط عليه
او عند تشغيل الفروم وتكرار الصوت او عند نشغيل الفروم وعدم تكرير الصوت لو كانت بسمله صوت مثلا وعند إغلاق الفروم

التعامل مع image list سواء مع التاب كنترول او غيرها من الادوات التى فى خواصها
image list

وتغير الماوس بالكود دون كتابه مسار واحد

اتمنى ان اكون وفقت فى الشرح

تحياتى لكم