logo

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
حسين الحمادي لا تميز خلال هذه الفترة-- لا تميز خلال هذه الفترة YasserKhalil أكبر تجميعية لملفات PSD مفتوحة المصدر جاهزة للتعديل إهداء لأعضاء وزوار المنتدي الكرام اكسيل اسئله واجابات



أهلا وسهلا بك زائرنا الكريم في أكاديمية الصقر للتدريب، لكي تتمكن من المشاركة ومشاهدة جميع أقسام المنتدى وكافة الميزات ، يجب عليك إنشاء حساب جديد بالتسجيل بالضغط هنا أو تسجيل الدخول اضغط هنا إذا كنت عضواً .





21-11-2023 01:47 مساءً
معلومات الكاتب ▼
تاريخ الإنضمام : 10-07-2019
رقم العضوية : 13735
المشاركات : 195
الدولة : الامارات العربية المتحدة
الجنس :
تاريخ الميلاد : 1-1-1966
قوة السمعة : 386
الاعجاب : 14
السلام عليكم و رحمة الله و بركاتة
الصلاة هي أحد أركان الإسلام الخمسة، وهي عبادة تقوم على الاتصال بالله. يمكنك الاطلاع على موضوع تعليم الصلاة للاطفال لمعرفة كيفية أداء الصلاة بشكل صحيح. يشرح الموضوع بالتفصيل كيفية أداء الصلاة وأركانها 


اخواني الخبراء ارجوا دمج الصوت لبرنامج تعليم الصلاة للاطفال و جزاكم الله خير
صلاة الفجر
Private Sub CommandButton5_Click()

Application.Visible = False
On Error Resume Next
        Login_screen.Show
        Application.Wait Now + TimeValue("00:00:3")
        Login_screen.Hide
       
       
        UserForm1.Show
        UserForm1.Repaint
        Application.Wait Now + TimeValue("00:00:3")
        UserForm1.Hide
       
        UserForm2.Show
        UserForm2.Repaint
        Application.Wait Now + TimeValue("00:00:45")
        UserForm2.Hide
       
        UserForm3.Show
        UserForm3.Repaint
        Application.Wait Now + TimeValue("00:00:18")
        UserForm3.Hide
       
        UserForm4.Show
        UserForm4.Repaint
        Application.Wait Now + TimeValue("00:00:3")
        UserForm4.Hide
       
        UserForm5.Show
        UserForm5.Repaint
        Application.Wait Now + TimeValue("00:00:3")
        UserForm5.Hide
       
       
        UserForm6.Show
        UserForm6.Repaint
        Application.Wait Now + TimeValue("00:00:3")
        UserForm6.Hide
       
        UserForm7.Show
        UserForm7.Repaint
        Application.Wait Now + TimeValue("00:00:3")
        UserForm7.Hide
       
        UserForm8.Show
        UserForm8.Repaint
        Application.Wait Now + TimeValue("00:00:3")
        UserForm8.Hide
   
        UserForm9.Show
        UserForm9.Repaint
        Application.Wait Now + TimeValue("00:00:1")
        UserForm9.Hide
       
       
        UserForm2.Show
        UserForm2.Repaint
        Application.Wait Now + TimeValue("00:00:45")
        UserForm2.Hide
       
        UserForm3.Show
        UserForm3.Repaint
        Application.Wait Now + TimeValue("00:00:18")
        UserForm3.Hide
       
        UserForm4.Show
        UserForm4.Repaint
        Application.Wait Now + TimeValue("00:00:3")
        UserForm4.Hide
       
        UserForm5.Show
        UserForm5.Repaint
        Application.Wait Now + TimeValue("00:00:3")
        UserForm5.Hide
       
        UserForm6.Show
        UserForm6.Repaint
        Application.Wait Now + TimeValue("00:00:3")
        UserForm6.Hide
       
        UserForm7.Show
        UserForm7.Repaint
        Application.Wait Now + TimeValue("00:00:3")
        UserForm5.Hide
       
        UserForm8.Show
        UserForm8.Repaint
        Application.Wait Now + TimeValue("00:00:3")
        UserForm8.Hide
       
        UserForm10.Show
        UserForm10.Repaint
        Application.Wait Now + TimeValue("00:00:3")
        UserForm10.Hide
       
        UserForm11.Show
        UserForm11.Repaint
        Application.Wait Now + TimeValue("00:00:3")
        Unload UserForm11
       
        Application.Visible = True
       
      End
  On Error GoTo 0
End Sub


الصوت

WindowsMediaPlayer3.UserForm1
WindowsMediaPlayer4.UserForm2
WindowsMediaPlayer5.UserForm3
WindowsMediaPlayer6.UserForm4

  WindowsMediaPlayer7.UserForm5
WindowsMediaPlayer8.UserForm6
WindowsMediaPlayer9.UserForm7
WindowsMediaPlayer10.UserForm8
WindowsMediaPlayer11.UserForm9
WindowsMediaPlayer12.UserForm10
WindowsMediaPlayer13.UserForm11
 
 
  تعليم الاطفال الصلاة.zip   تحميل zip مرات التحميل :(1)
الحجم :(1668.167) KB

تم تحرير الموضوع بواسطة :حسين الحمادي بتاريخ:21-11-2023 08:13 مساءً



توقيع :حسين الحمادي
عن أبي هريرة رضي الله عنه عن النبي صلى الله عليه وسلم أنه قال : ( إِنَّ مِمَّا يَلْحَقُ الْمُؤْمِنَ مِنْ عَمَلِهِ وَحَسَنَاتِهِ بَعْدَ مَوْتِهِ : عِلْمًا عَلَّمَهُ وَنَشَرَهُ ، وَوَلَدًا صَالِحًا تَرَكَهُ ، وَمُصْحَفًا وَرَّثَهُ ، أَوْ مَسْجِدًا بَنَاهُ ، أَوْ بَيْتًا لِابْنِ السَّبِيلِ بَنَاهُ ، أَوْ نَهْرًا أَجْرَاهُ ، أَوْ صَدَقَةً أَخْرَجَهَا مِنْ مَالِهِ فِي صِحَّتِهِ وَحَيَاتِهِ يَلْحَقُهُ مِنْ بَعْدِ مَوْتِهِ ) رواه ابن ماجه

look/images/icons/i1.gif كود تنسيق الصوت
  22-11-2023 07:21 صباحاً   [1]
معلومات الكاتب ▼
تاريخ الإنضمام : 10-07-2019
رقم العضوية : 13735
المشاركات : 195
الدولة : الامارات العربية المتحدة
الجنس :
تاريخ الميلاد : 1-1-1966
قوة السمعة : 386
الاعجاب : 14
السلام عليكم و رحمة الله و بركاتة 
اخواني الخبراء هذا الكود خاص بالاستاذ ياسر خليل هل يمكنكم تطبيقه على البرنامج
CODE
Public LeTexte As String, LaCouleur As String, v As Long
Private Sub OptionButton1_Click()
WebBrowser1.Navigate _
"about:<html><body BGCOLOR ='#000000' scroll='no'><font color= " & LaCouleur & _
" size='5' face='arial'><body topmargin='0'>" & _
"<marquee direction= right>" & LeTexte & " </marquee></font></body><center></html>"
End Sub
Private Sub CommandButton1_Click()
    WindowsMediaPlayer1.Controls.pause
    Application.Visible = True
    On Error Resume Next
        ورقة1.Activate
        TextBox1.Text = ""
    On Error GoTo 0
    Me.Hide
End Sub
Private Sub CommandButton3_Click()
WindowsMediaPlayer1.URL = ThisWorkbook.Path & "20.MP3"
WindowsMediaPlayer1.Controls.Play
End Sub
Private Sub CommandButton4_Click()
WindowsMediaPlayer1.Controls.pause
End Sub
Private Sub CommandButton5_Click()
WindowsMediaPlayer1.Controls.pause
End Sub
Private Sub UserForm_Activate()
    CommandButton3_Click
End Sub
Private Sub UserForm_Initialize()
    CommandButton3_Click
End Sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    CommandButton4_Click
End Sub




توقيع :حسين الحمادي
عن أبي هريرة رضي الله عنه عن النبي صلى الله عليه وسلم أنه قال : ( إِنَّ مِمَّا يَلْحَقُ الْمُؤْمِنَ مِنْ عَمَلِهِ وَحَسَنَاتِهِ بَعْدَ مَوْتِهِ : عِلْمًا عَلَّمَهُ وَنَشَرَهُ ، وَوَلَدًا صَالِحًا تَرَكَهُ ، وَمُصْحَفًا وَرَّثَهُ ، أَوْ مَسْجِدًا بَنَاهُ ، أَوْ بَيْتًا لِابْنِ السَّبِيلِ بَنَاهُ ، أَوْ نَهْرًا أَجْرَاهُ ، أَوْ صَدَقَةً أَخْرَجَهَا مِنْ مَالِهِ فِي صِحَّتِهِ وَحَيَاتِهِ يَلْحَقُهُ مِنْ بَعْدِ مَوْتِهِ ) رواه ابن ماجه

look/images/icons/i1.gif كود تنسيق الصوت
  26-11-2023 06:13 مساءً   [2]
معلومات الكاتب ▼
تاريخ الإنضمام : 10-07-2019
رقم العضوية : 13735
المشاركات : 195
الدولة : الامارات العربية المتحدة
الجنس :
تاريخ الميلاد : 1-1-1966
قوة السمعة : 386
الاعجاب : 14
السلام عليكم و رحمة الله و بركاتة
ااخواني البرنامج يعمل بشكل ممتاز و لكن الصوت يتداخل بعضها في بعض ومطلوب فقط تنسيق الصوت في جميع الشيتات  مع ربط c مع b و a
 
 
  Copy of تجربة 4.zip   تحميل zip مرات التحميل :(0)
الحجم :(1190.808) KB



تم تحرير المشاركة بواسطة :حسين الحمادي بتاريخ:26-11-2023 06:14 مساءً




توقيع :حسين الحمادي
عن أبي هريرة رضي الله عنه عن النبي صلى الله عليه وسلم أنه قال : ( إِنَّ مِمَّا يَلْحَقُ الْمُؤْمِنَ مِنْ عَمَلِهِ وَحَسَنَاتِهِ بَعْدَ مَوْتِهِ : عِلْمًا عَلَّمَهُ وَنَشَرَهُ ، وَوَلَدًا صَالِحًا تَرَكَهُ ، وَمُصْحَفًا وَرَّثَهُ ، أَوْ مَسْجِدًا بَنَاهُ ، أَوْ بَيْتًا لِابْنِ السَّبِيلِ بَنَاهُ ، أَوْ نَهْرًا أَجْرَاهُ ، أَوْ صَدَقَةً أَخْرَجَهَا مِنْ مَالِهِ فِي صِحَّتِهِ وَحَيَاتِهِ يَلْحَقُهُ مِنْ بَعْدِ مَوْتِهِ ) رواه ابن ماجه

اضافة رد جديد اضافة موضوع جديد



المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
كود معادلة الاخلاق حسين الحمادي
4 1241 حسين الحمادي
محتاج كود جمع خلايا saad mohamed
1 53 saad mohamed
اريد كود لتصدير او حفظ ملف وورد الي ملف بي دي اف محمي من النسخ jjebril
2 46 jjebril
كيفية إضافة التاريخ والوقت والتغلب على معادلة الوقت عند استخدام ماكينة الباركود mmagedmemo
4 196 EM_ACC
كل يوم كود من أكواد الإكسيل VBA YasserKhalil
5 1155 علي بطيخ سالم

الكلمات الدلالية
تنسيق ، الصوت ،









اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.

الساعة الآن 03:11 PM