بسم الله الرحمن الرحيم
شلونكم شباب وبنات
شلع
قلع
هاهههه
السلام عليكم ورحمة الله وبركاته
وهاي آني رجعتلكم
والله
آني يمكن اهواي متأخر بس الشبكة عندي مو زينة
يعني ماكدر أطرح مواضيع
هعهعهع
يالا مالنا علاقة نريد الكود
شرح الكود
الكود هو عن عبارة كلمة بالانجليزية يمكن نطقها
يعني يوجد صوت انجليزي بالكود هذا سوف ينطق هذا الصوت الانجليزي الكتابة او الاسم الذي تريدونه
تعالو نشرح ونمثل بالكود
يجب الانتباه على وقت الاسطر وأين يمكننا وضعها
الكود
StrText = ("dorar aliraq")
Set Objvoice = CreateObject("SapI.Spvoice")
ObjVoice.Speak strText
هنا خليت ببداية الكود شيء اسمه
dorar aliraq
وهي تلك الكلمة الذي سينطقها الصوت الانجليزي
طبعا هاذ الكود ينكتب بالمفكرة notepad
ونحفظ الكود بصيغةVBS
انتبه للأحرف الخاصة بالصيغة تكون كبيرة
يعني مثلا نحفظه بسم
aldorar.VBS
ثم
نوجه السهم على صندوق خيارات بيه خيارين بس
وهنا
txt
All files
نختار
All files او كافة الملفات
ثم save او حفظ
ثم ندوس على الاسم بالمستندات وهو الحفظناه
aldorar.VBS
بس نضغط عليه ما راح يفتح شي بس نسمع كلمة
dorar aliraq
وهي الكلمة الذي كتبناها بالسطر الأول والذي خليناها بين التنصيصات
انشاء الله هاية المشاركة تعجبكم
وانتظروني بالأكواد الأخرى والشروحات الأخرى
تحياتي...................................... .........................
مع السلامة
جرب الكود ترى هو يشتغل.
رد مع اقتباس
