hishamnasr

salam dear Manseeya your answer is wrong because after you get to the max length how can the curser move automatically to the next textbox x=len(text1.text) this code puts the number of characters in text1 in the variable x if it is 4 or more then move to text…

use the program which was sent by one of the members search for it . it was about a month ago sorry not wriiting in Arabic

السلام عليكم نفس هذا السؤال نوقش الاسبوع الماضي واليك ال link

السلام عليكم يجب معرفة ما يجب تغييره في الرجستري و كذلك ملفات ال dll و ocx و نقلها في المسار المحدد

السلام عليكم اخي السنور لا يوجد شئ اسمه افضل لغة و لكن كل لغة لها ميزاتها و كل شخص سيعطيك رأى مختلف عن عن كل لغة و لكن اذا بحثت عن مقال في المنتدى ( و هو بال link المرفق في مشاركة الاخ walcom ) ستجد ان المستقبل ( المتوقع ) سيكون لل c++ and Java و هذا مجرد رأي …

السلام عليكم لقراءة نص من textbox و تريد ان يعامل معاملة التاريخ استعمل التالي dim d as date d=text1.text و اذا اردت التاكد من ان النص بالتكست بوكس هو تاريخ ام لا ...و ان كان تاريخ تاريخ فهل هو صحيح ام لا if isdate(text1.text) then وهنا اذا ادخلت التاريخ 29 -2…

السلام عليكم يوجد عدة مساحات مجانية لعمل صفحة شخصية مثل ال freeserver.com ولكن اسهلها geocities.com و ستجدها داخل موقع yahoo.com

هذا هو اللنك هنا بس ما انتبهت انك انت اللي سألت السؤال في هذا ال link

هذا البرنامج صممه احد الاخوة بالمنتدى هذا الاسبوع فستجده اما بهذه الصفحة او الصفحة التالية

بالنسبة للسؤال الثاني اضف الكود التالي Private Sub Text1_Change() If Len(Text1.Text) = 4 Then Text2.SetFocus End Sub

السلام عليكم اذا اردت الترتيب يحدث في التقارير فهناك خيار جاهز في الكريستال ريبورت و الداتا ريبورت ففي احدى الخطوات يطلب منك اختيار احد الاعمدة و اختيار طريقة الترتيب و يسمح لك بعدة خيارات اما ابجديا او بالتاريخ او بالاكبر ( قيمة ) راجع دروس التقارير بالمنتدى

السلام عليكم اذا ضغطت ضغطة و احدة على اي اداة موجودة في الفورم فستجد ان اول خاصية في جدول الخواص ( باليمين ) هي خاصية name قم بتغييرها

السلام عليكم لو انك رابط الداتا بيز بواسطة الاداة Data1 فاستعمل الكود التالي بعد ربط text1 او اي text اخر بالاداة داتا بالحقل Name data1.recordset.movefirst for i=1 to 30 data1.recordset.movenext if i>4 then list1.additem (text1.text) next

اضغط هنا لكتاب العسيري

للرفع

السلام عليكم اذا وجدت كتاب الاستاذ العسيري و هو موجود بالمنتدى فهو من افضل الكتب pdf اما في المكتبات فحاول الحصول على كتاب الاستاذ مجدي ابو العطا و هذان الكتابان من افضل الكتب العربية التي رايتها

مثلا ادرج الاداة و اعطها الاسم cd اضف زر و اضف له الكود التالي cd.showcolor form1.backcolor = cd.color يمكن ايضا ادراج الcomponent media player و لنسمها mp , و اضف الكود التالي cd.showope mp.filename=cd.filename و هكذا

اضغط هنا

وجدت هذا ال link ايضا

السلام عليكم هناك عدة مواضيع عن الونسوك ابحث عنها في المنتدى ........احدثها هنا