رمضان

اخى هانى بصراحه انا مش فاهم ماذا تقصد بالتعامل مع الملفات الضخمه هل تقصد النسخ أم الفتح للقراءه والكتابه وإن كان الفتح للكتابه والقرأه فبصراحه أنا أستخدم الطريقه العشوائيه ولم أجد معها أى بطئ مهم كبر حجم الملف أم تقصد ملفات قواعد البيانات ؟ أم تقصد ملفات تضع ب…

السؤال الاول إجابته نعم جرب الكود الاتى Private Type POINTAPI X As Long Y As Long End Type 'Declare the API-Functions Private Declare Function GetCursorPos Lib "user32" _ (lpPoint As POINTAPI) As Long Private Declare Function SetCursorPos Lib "user32" _ (ByVal…

بإذن الله ستراه هذا الاسبوع بس المعزره على التأخير لان الاسبوع الماضى وهذا الاسبوع عندنا إمتحانات وتصحيح

جرب الاتى بفرض ان التكست بوكس بإسم Text1 والليبل بإسم Lable1 كتب فى حدث تغيير النص للتكست Private Sub Text1_Change() Dim Result As Integer Dim Tmp As String Dim LenTmp As Byte Dim Count As Byte Tmp = Text1.Text LenTmp = Len(Tmp) Result = 0 For Count = 1 To Len…

جرب الدالة لاتيه Functaion GetResult(intOne as integer,intTwo as Integer,Oprand as String) as Integer Select Case Oprand Case "+" GetResult=intOne+intTwo Case "-" GetResult=intOne-intTwo Case "*" GetResult=intOne*intTwo End Select End Functaion مثال لإستخدام ه…

السؤال عام انك لم تحدد ماذا تريد بالضبط كمن يسأل فيما يستخدم الكمبيوتر أرجوك حدد سؤالك بالضبط يعنى ما الذى تريد عمله وإن شاء الله نقدر نساعدك

ضع هذا الكود بين وسمى الكود وذلك فى أى صفحه ترغب ان ترى فيها هذا التأثير

مبروك للاخ SaD tHE jAckAl والاخ zorro_tmh فقد تم ترقيتهم ألى عضو شرف بناء على ترشيحات المشرفين ويمكنهم الدخول على منتدى المشرفين الان

من هنـــــــــــــــــــــــــــــــــــــا

من هنـــــــــــــــــــــــــــــــــــا

من هنــــــــــــــــــــــــــــــــــــــــا

من هنـــــــــــــــــــــــــــــــا

من هنـــــــــــــــــــــــــــــــــا

من هنــــــــــــــــــــــــــــــــــــا

من هنـــــــــــــــا

انت بتجيب الحاجات الحلوه دى منين ؟ عينى عليك باردة بس الغريب ان بعد إنزال الاداه وعمل سيت أب طلب سيريل نمبر ولم أدخله بالطبع لانى لا أعرفه وإستمر السيت أب لنهايته ولكن عند محاولة تشغيل الامثلة ظهرت رسالة تفيد انها نسخة لمدة 15 يوم فقط فما الحل ؟ مع العلم إنى ن…

على ما يبدوا انكم لم تجربوا المثال جيدا ولم تدققوا فى كود المشروع جيدا فقد إكتشفت انه يجب ان تكون هناك علاقة بين جدول اليومية وجدول التباعين لانه فى جدول اليومية يتم إدخال إسم التباع الغائب وقد يخطئ المستخدم ويدخل إسم تباع خطأ او اسم غير موجود ولذلك لابد من وج…

هذه النسخة هى نسخة تجريبية لمدة 30 يوم فقط حاول تعمل مشروع أخر بدون هذه الادوات ولن تظهر هذه الرسالة

[gl]علم وجارى التنفيذ وعاجزين عن الشكر [/gl] (f) (f) (f) (f) (f)

الدالة هى Round 'وطريقة إستخدامها فى فيجول بيسك طبعا كالاتى Text2.Text=Round(Text1.Text,2) 'يظهر رقمان بعد الفاصلة أو Text2.Text=Round(Text1.Text) ' إذا أردت التقريب لأرقام صحيحة دون فاصلة