شبه جسم

أخي moslem_12002 الملف التنفيذي يعمل بصورة ممتازة ، وما عندي أي أداة غير مكركة أنا أتوقع إن الخلل من برنامج الـ Setup Factory نفسه ، لأني جربت مثال الأخ booknet وظهرت عندي نفس المشكلة أنا أدرجت مثال الأخ booknet في المرفقات بعد بناء البرنامج ، لكن النتيجة نفس …

ممتاز رائع ألف ألف شكر أخي Enjoy هذا هو المطلوب تماماً الله يجزيك خير

بارك الله فيك سوف أجرب الطريقة وأخبرك بالنتائج

تشغيل تلقائي لملف معين ، أو برنامج محدد ، في السي دي .. هذا إللي قصدته ممكن ؟

بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته جزاكم الله أخواني ، ممكن أحد يساعدني في هذا الموضوع ؟ أنا حطيت مجموعة ملفات في CD ، وإللي أريده إن المستخدم أول ما يفتح الـ CD يشتغل ملف أو برنامج محدد فيه مباشرة .. ممكن هذا الشيء وإلا لا ؟ وجواكم الله خي…

ألف شكر أخوي Ala2 VB

جزاكم الله خير ما قصرتوا نردها في الأفراح إن شاء الله

بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته أخواني ، إن مجلد الـ Desktop يختلف من كمبيوتر إلى آخر ، فكيف يمكنني الوصول إليه برمجياً ؟ وجزاكم الله خيراً

يمكن الأخ عمر قصده إشارات موريس ، إللي تعتمد على النقطة والواحد . والله أعلم !

أشكرك أخوي على الرد السريع لكنني جربت برامج كبيرة ، وما نفعت .. هذي المرة استخدمت برنامج صغير للتوضيح فقط السؤال : خطوات العمل إللي قمت بها سليمة وإلا بها خلل ؟؟!!

بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته أرجو مساعدتي في هذا الموضوع ، لأنني حاولت التعامل مع برنامج الـ Setup Factoryدون جدوى أنا أملك الإصدار السابع منه ، وكلما قمت بتحزيم برنامج ما لا يستجيب البرنامج ، لذلك أحببت أن أشرح لكم طريقتي في التعامل …

أو ممكن هذا الكود أختي : Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then ok.Value = True End If End Sub

أخوي أدرج مثال على إللي فعلته وإن شاء الله أساعدك

العفو أخوي لكن إلى الآن ما عرفت إذا كان الكود نجح معك في الترتيب التصاعدي وإلا لا إذا كان نجح فغير S = S + F إلى S = S - F علشان يظهر لك الترتيب التنازلي والله أعلم

الكود بسيط جدا أول شي طبعا نعرف المصفوفة Dim A(0 To 13) As String بعدين نعرف متغير وهو الماغير إللي راح نحطه علشان يعطينا الرقم العشوائي إللي نريد المصفوفة تضربها بـ 25 Dim S هنا نعرف متغير ، لرقم عشوائي علشان الزيادة بحيث يزيد المتغيرالسابق بعدد عشوائي Dim F …

عملت لك أخي هذي الطريقة ما أدري إذا كانت تنفعك وإلا لا Dim A(0 To 13) As String Dim S Dim F List1.Clear S = Rnd() For i = 0 To 13 F = Rnd() S = S + F A(i) = 25 * S List1.AddItem A(i) Next i طبعا List1 من أجل عرض عناصر المصفوفة وهناك طريقة ثانية ، وهي أن تعرف م…

أخوي superboy ما أدري إذا كان هذا الكود يفيدك وإلا لا ممكن تجربه : Private Declare Function InternetAutodial Lib "wininet.dll" (ByVal dwFlags As Long, ByVal dwReserved As Long) As Long Private Const INTERNET_AUTODIAL_FORCE_ONLINE = 1 Private Const INTERNET_AUT…

تفضل المثال أخوي في المرفقات Calculator.rar

أخوي HATEMHBC إنت جربت الطريقة إللي عطيتك إياها ؟ .. لأن بها الحل إن شاء الله لو تحب بحط لك مثال ، بعد شوي .

في أزرار العمليات الحسابية ( + و - و x و / و ... غيرها ) قم بإضافة هذا الكود : Label1.Caption = Label1.Caption & vbCrLf & Text1.Text Text1.Text = "" على اعتبار أن Text1 هي الخانة التي تكتب بها الأرقام و Label1 هي الخانة التي تظهر بها الأرقام التي تكتبها