abulyaman

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

السلام عليكم ورحمة الله وبركاته أخونا organic الله يبارك لك وييسر لك أمورك - الحمد لله وحده أنه نفع معاك بس بتشكر ليه ؟ دا واجب على كل أخ أولا ودا مش أنا اللى كاتبه - أنا أعطاه لى أحد الإخوة - الله يبارك له - وبالتالى أعطيتهولك ( شوف توقيعى ) أخونا النبهانى وف…

السلام عليكم ورحمة الله وبركاته كلام الأخت رزان دا بعد التعديل الأخير ولا قبله؟ كان الأول بياخد آخر رقمين على اليمين ويقرأهم أما التعديل فجعله يأخذ ثلاثة وليس أثنين أنا بتشتغل معايا بعد ما عدلتها - هل بتشتغل معاكم كمان ؟

السلام عليكم ورحمة الله وبركاته أخى العزيز كنت أريد أن أسألك عن الأداة التى تريد استخدام العجلة معها؟ عموما أنا أستخدمها مع أداة الفليكس جريد بهذا المديول المرفق وأكتب سطرين فى الأوكواد فى حدث تحميل النموذج أكتب الكود التالى: HookControl FlexGrid1.hwnd وفى حدث…

السلام عليكم ورحمة الله وبركاته أخى العزيز بالنسبة لك كمبرمج فالأمر بسيط بعون الله يمكن التغيير الذى سأوضحه لك يعرفك بسهولة الموضوع كل ما عليك هو استبدال الكود التالى: Public Function Horof(x) Ma = " ريال" Mi = " هللة" n = Int(x) B = Val(Right(Format(x, "00000…

السلام عليكم ورحمة الله وبركاته أخى الحكاية سهلة بإذن الله قم بإدراج المديول الذى أرسلته لك فى مشروعك ثم فى حدث مثل TextBox1_Change اكتب السطر التالى Text1.Text= Horof(Val(Text2.Text)) فقط كلمة Horof ستنادى على المديول وتحضر لك القيمة ولو لم تعجبك كلمة ريال وه…

أخى العزيز ممكن تراجع الملف وتخبرنى هو هو سليم أم ماذا؟ لم أستطع فتحه

السلام عليكم ورحمة الله وبركاته أخى العزيز أنا كنت بتكلم عن الفيجوال بيزك وكلامى هينفع 100% - بإذن الله - معاه لكن بخصوص Sum فى السيكول فهى تتجاهل القيم Null وستتعامل معها على أنها أصفار أخشى أن يتشعب بنا الكلام ولا نصل لشئ أنا نفسى تجربها مع جمع قيمتين كنت مت…

السلام عليكم ورحمة الله وبركاته ما شاء الله الفكرة هايلة وبسيطة وممتازة - وكل حاجة حلوة تتقال ربنا يبارك لك

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

السلام عليكم ورحمة الله وبركاته بخصوص تعقيب الأستاذ Major أخى العزيز عندما تريد قراءة أو كتابة قيمة Null أو تتوقع أن تكون Null فى أى من السجلات عليك بإضافة السلسلة الفارغة لها لو كانت حرفية أو القيمة العددية لها بعد إضافة السلسلة الفارغة لها بالطريقة التالية M…

السلام عليكم ورحمة الله وبركاته أختنا الفاضلة أرد عليك من كتاب الأستاذ جمال عمارة (إلى القمة مع الفيجوال بيسك حتى الإصدار 3) ص 267 الطبعة الثانية 1996– دار الكتب العلمية للنشر وهو أفضل ما قرأت فى هذا الموضوع رغم قدم الإصدار ودمج رقمين من هذه الأرقام سيعطى تأثر…

السلام عليكم ورحمة الله وبركاته طبعا رد أخونا mostafazidani جاء بعد حذف الملف المثال الذى أرفقته أختنا كان بيتعامل مع الصوت بدوال الـ API وكانت مشكلتها فى إيقاف الصوت باستخدام هذه الدالة وكان عليها لعمل ذلك أن تمرر للدالة القيمة Null دون حفظ النتيجة فى متغير ك…

السلام عليكم ورحمة الله وبركاته أخى الفاضل أنا عن نفسى ما فهمتش إيه دخل XP لغاية دلوقت؟ ممكن توضيح أكثر وتشرح الوضع عندك قبل عرض المشكلة؟ وتزودنا برسائل الخطأ لو فى - أو ما لا يتم تنفيذه معك بالضبط وربنا ييسر لك الحل

السلام عليكم ورحمة الله وبركاته ربنا يبارك لك فى الروح الجميلة دى بصراحة أنا بعد ما كتبت الرد ونظرت له قبل ما أضيفه شعرت أنه بايخ - فأضفت التمهيد له لكى لا يساء فهمى وفى الآخر كان هدفنا واحد وربنا يجمعنا على الحق ويهدينا السبيل

ما شاء الله عليكما فعلا حاجة تفرح بس عندى تلميحين أرجوا أنهم يكونوا مش بايخين غرضى منهم - وربى هو الأعلم - أنى أوسع نطاق الإجابة عن أكثر من السؤال الأول أن كلام الأخ Ghost2010 موجود فى التعليمات - بس بالانجليزى والتانى بخصوص رد الأخ VB6-Rocket أن نتيجة الرسالة…

السلام عليكم ورحمة الله وبركاته أختنا الفاضلة خاطرت وفتحته والحمد لله حصل خير Private Sub Command1_Click() 'SndPlay = sndPlaySound(App.Path & "\w18.wav", 0) sndPlaySound vbNullString, 0 End Sub Private Sub Command2_Click() SndPlay = sndPlaySound(App.Path & "\w…

السلام عليكم ورحمة الله وبركاته أختنا العزيزة الملف عليه فيروس Generic BackDoor.b برجاء فحص ملفاتك وتحديث الأنتى فايروس بتاعك معلش ما قدرتش أشوف الملف

السلام عليكم ورحمة الله وبركاته إن شاء الله الكود التالى بدون مشاكل ولا رسائل Private Sub Form_Load() On Error GoTo ErrHandler 'Dim S As String 's = "provider = microsoft.jet.OLEDB.4.0;" 's = s & "data sourse =" & App.Path & "\db97.mdb" 'db2000.mdb 'db.Connect…

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