فواز الشمري

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

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

قد يفيد هذا البرنامج _ULTRA.zip

لم افهم ايضاً الرجاء توضيح اكثر

الحل في الكود التالي : Private Sub Command1_Click() Dim str As String str = "Name : " & Trim(Text1.Text) & vbNewLine str = str & "father :" & Text2.Text & vbNewLine str = str & "G.father :" & Text3.Text Text4 = str End Sub غير خاصية MultiLine الخاصة ب Text4 إل…

هنا طريقة اخرى وددت ان اضعها لحل مثل هذ الطلب وهي : Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str = ".0123456789" & vbBack If InStr(str, Chr(KeyAscii)) = 0 Then KeyAscii = 0 End If End Sub الزر(الحرف) الذي تود إضافته يمكنك وضعة في المتغ…

اخي VB_SMSM_2005 اولاً يفضل في حالة معالجة الإخطاء خاصة إذا كنت تتوقع حدوث عدة إخطاء في الدالة التي كتبتها إن تقوم بعمل Function خاص بمعالجة جميع إخطاء البرنامج ثم تعمل بعد ذلك إستدعاء للدالة في حال حدوث خطأ . الملاحض في الكود الي وضعته أن البرنامج ينفذ عملية …

ضع الكود التالي في حدث Chang Private sub Text1_Chang() form1.caption="1234" end sub

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

طيب هل من حل ................. وين الشباب

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

سوف أحاول ان اجيب على بعض الأسئلة وعذرني اخي الكريم فقد يكون هناك أخطاء في الصيغ لأني اكتبها مباشرة دون الرجوع للحاسب : 1- بحث حسب الحقل المحدد dim Sql as String Sql = "SELECT " & col & "From table_name WHERE name like '%" & Text1.Text & "' or '" & Text1.Text …

سوف أحاول ان اجيب على بعض الأسئلة وعذرني اخي الكريم فقد يكون هناك أخطاء في الصيغ لأني اكتبها مباشرة دون الرجوع للحاسب : 1- بحث حسب الحقل المحدد dim Sql as String Sql = "SELECT " & col & "From table_name WHERE name like '%" & Text1.Text & " & "' or '" & Text1.T…

شكرا لك أخي العزيز

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

اتمنا لك التوفيق اخي رغيد وسيرقى هذا المنتدى بوجود عضو مثلك

بعد التحية أولاً أتمنا من الجميع قبولي عضوع مشارك في هذا المنتدى الحبيب مع ان إنتمائي السابق كان للمنتدى العزيز على وهو vb4arab الذي لا اعلم ما سبب توقفة إلى الأن أتمنا من الأخوة إفادتي حول هذا الموضوع وخاصة أخي العزيز والأستاذ الفاضل رغيد الطيب سؤلي هوا : عمل…