mokadem2000

الأخ الفاضل ... Text.zip أرجوا ان يساعدك هذا المثال فى ما تريد إنجازه، باستخدام (MS-VB 6.0) ايضاً راجع: كيف أجعل Combo1 يحفظ البيانات شكراً

الأخ الفاضل ... بسم الله ما شاء الله اخى Aladdin86 ، فهمت السؤال رغم انه لغوياً فيه تداخل مفاهيم، الكود الذى كتبته صحيح 100% ويعمل 100%، ولكن اسمح لى بتعليق بسيط، وهو أن جميع الأرقام التى أكبر من نصف الرقم محل الإختبار لن تقبل القسمة عليه‘ أوضح أكثر بمعنى تانى…

الأخ الفاضل ... أضف الكود التالى Private Sub Form_Load() WebBrowser.Navigate2 "about:blank" End Sub قم بتحديث cmdCustomSearch_Click إلى Private Sub cmdCustomSearch_Click() Dim Doc As HTMLDocument Dim fStr As String Dim wText As String Dim ch As String Dim wPos…

الأخ الفاضل ... راجع: المثال DateConvert.zip الموجود فى الموضوع امكانية تعديل التاريخ الهجري ، للإطلاع على دوال التحويل ومزيد من التوضيح :) شكراً

الأخ الفاضل ... أغلب الأدوات الـ Beta والتجربية غير مجانيه ومطروحه على النت للتجريب وليس للاستخدام، اى للتعرف أكثر على الأداه وامكانيتها قبل شرائها. فهل تريد أداه مجانيه، أم لديك ميزانيه لشراء أداة جاهزه؟

شكراً جزيلا للاخوة حريف برمجة - msayed2004 - HnHn - Aladdin86 - hanysaad - A7med_prof - A.B.D - cyclone - عماد قدري - Ala2 VB - نورا مجدى - yaseralshikh - php.javascript - اكس - mse07 فكلماتكم وتفاعلكم دافع للمزيد من العطاء :)

الأخ الفاضل ... راجع: برامج ارسال بريد الكترونى مباشرتاً بالمرفقات والصور شكراً

الأخ الفاضل ... راجع: برامج ارسال بريد الكترونى مباشرتاً بالمرفقات والصور شكراً

الأخ الفاضل ... هناك مشكلتين ، الاولى هى أنك نسيت New فى تعريف myMindفى الـ Module لذا أستخدم Dim myMind As New Class1 أو Dim myMind As Class1 myMind = New Class1 بدلاً من Dim myMind As Class1 الثانية وهى خطأ منطقى ، الدخول فى حلقة تكرارية، وتحدث كالتالى عند ت…

الأخ الفاضل ... Example.zip مرفق مثالك الذى طرحته بعد التعديل ← ليست هناك مشكلة، ولكن أنت عرفت المتغير count من النوع static وبالتالى فى اول مرة تشغيل سيبدأ من 0 إلى 9 ثم يتم إيقاف الـ Timer، فى مرة التشغيل الثانية سيبدأ من 9 وليس من 0، وبالتالى لن ينفذ أى شرط…

الأخ الفاضل ... جرب التالى int main(int argc, char* argv[]) { int i, n, x; cout << "Enter [n]: "; cin >> n; for(x=1; x<=n; x++) { for(i=x; i>1; i--) cout << i; for(i=1; i<=x; i++) cout << i; cout << endl; } cout << endl; return 0; } شكراً

الأخ الفاضل ... يمكنك تمرير القيمة من خلال سطر الأوامر، فى البرنامج الأول أكتب الكود Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click System.Diagnostics.Process.Start("WindowsApplication2.exe", "أهلا ب…

الأخ الفاضل ... راجع: ممكن طريقة دمج ملف صوتي بالمشروع شكراً

الأخ الفاضل ... د/ محمد كم أنت خدوم، بارك الله فيك، انت قدمت كل ما فى وسعك لخدمة الاعضاء ... :)

الأخ الفاضل ... د/ محمد المشكله فى هذه الطريقه ظهور رساله ليختار منها المستخدم ما بين الحفظ والفتح و ... الخ ← ، فقد تكون هذه الرساله مزعجه بعض الشيئ. شكراً

الأخ الفاضل ... للحصول على اكبر واصغر قيمة بين الصف رقم (6) ورقم (10) ولنفترض فى العمود رقم (3) أستخدم GetMinMaxValues(fgData, 6, 10, 3, minRow, maxRow) حيث minRow ستحتوى على رقم الصف الذى يحتوى أقل قيمة و maxRow ستحتوى على رقم الصف الذى يحتوى أكبر قيمة... هل …

الأخ الفاضل ... CopyFolders.zip أرجوا ان يساعدك هذا المثال فى ما تريد إنجازه، بأستخدام (MS-VB 6.0) ويعتمد على الدالة CopyFolderFiles والتى تقوم بنسخ مجلد بجميع الملفات والمجلدات الفرعية الموجوده فيه، وتعتمد فى عملها على دوال API لذا لا حاجه هناك لأى ادوات إضاف…

الأخ الفاضل ... راجع: المثال LoadWeb_up1.zip الموجود فى الموضوع كيف يمكنني عرض HTML Source Code لأي موقع؟ كذلك المثال WebSearch.zip الموجود فى الموضوع كيف ابحث عن رقم في الأداة WebBrowser شكراً

الأخ الفاضل ... بفرض أنك لديك اداتين DTPicker1 و DTPicker2، وتريد عمل جملة استعلام للبحث فى الحقل searchField داخل الجدول myTable، فيعد الاتصال بقاعدة البيانات يمكن كتابة جملة البحث بالشكل التالى MsgBox "Select * From myTable Where searchField Between #" & DTP…

الأخ الفاضل ... جرب استخدام هذا الكود Private lastTextBoxCtrl As TextBox Private Sub Text1_GotFocus() Set lastTextBoxCtrl = Text1 End Sub Private Sub Text2_GotFocus() Set lastTextBoxCtrl = Text2 End Sub Private Sub Text3_GotFocus() Set lastTextBoxCtrl = Text3 …