boshkash

موسوعة رائعة جزاك الله خيرا

بســم الله الـرحمــن الرحيــم أريد أن أفتح ملف EXCEL من علي VB ووضع شيت علي الفورم وحفظ البيانات داخل ملف Excel آخر

أرجوكم أفيدوني أقوم بعمل برنامج ومن متطلباته أن لا يحق المستخدم في وقت ما أن يستخدم سوي جزء من لوحة المفاتيح وعلمت أن الدالة SetWindowsHookEx تقوم بإرسال واستقبال المفاتيح المضغوطة وتحولها إلي بيئة نظام التشغيل وحتي الآن لم أفهم كيف استخدمها لمنع استخدام اللوح…

:D good job, well done, With my best wishes :D :clapping: :ty:

موسوعة رائعة جزاك الله خيرا

شكرا نورا علي رد السريع ولكن أولا المكتبة online وأنا ليس متوافر عندي الإنترنت طوال الوقت ثانيا تقريبا نفس المشكلة في الوصلة للتصتيب أرجو أن يكون البرنامج متوافر معي دائما :blush:

أريد أسطوانات المساعدة Help الخاصة بالإصدار VB 6 إذا سمحتم وأكون شاكر جدا :wink:

أرجو المعذرة أحتاج رابط لتحمل VB 2005 إذا أحد يساعدني أكون شاكر :wink:

لماذا لم يتم الرد علي سؤالي أرجو المساعدة

تقولين أنه تم الحفظ في أول 3 جداول يعني لا توجد مشكلة في تطبيق الأمر قد يكون الخطأ في الجدول الرابع أو في طريقة استدعاؤه أرجو وضع الكود الخاص به وما الذي تريدين حفظه فيه

أرجو أن ينفعك هذا الكود :D Res = right(txt, len(txt)-1) & left(txt,1) Scrolltxt = Res End function Public Function Srcolltxt(txt as string) as string وبعد ذلك يتم وضع timer ووضع الكود التالي فيه Me.Caption = Scrolltxt(Me.Caption)

شيئ آخر يوجد في الكود Uid & pwd كيف استخدمهم

:D أولا شكرا علي الكود الرائع ثانيا آسف لتأخري في الرد ولكني لم أفهم هذا الكود كيف desc تعبر عن اسم الجهاز وأي جهاز (تقصد الذي يحوي قاعدة البيانات) وكيف أحصل عليه إن كان هذا الجهاز غير معروف لدي و db1 تعبر عن قاعدة البيانات ومكان وجودها علي الجهاز الذي يتم إنش…

آسف لم أفهم سؤالك جيدا هل تريد أن تربط قاعدة بيانات ببرنامج تقوم بعمله أو كتابة أواد من داخل برنامج أكسس أرجو توضيح السؤال

أستخدم هذا الكود في التعامل مع قواعد البيانات من خلال الفيجوال ولكن يجب تعريف القاعدة الاول في ODBC connection ويتم التعامل بسهولة رائعة ولكن عند تجميع المشروع ومحاولة تصتيبه علي جهاز كمبيوتر آخر لا يعمل إلا إذا قمت بتعريف القاعدة مرة أخري علي نفس الجهاز ورجائ…

لا يمكن ذلك من خلال الخصائص ولكن يمكن إضافة form جديدة وجعلها كأنها ظل للأولي Dim cx As Double Dim cy As Double 'write this code in Form_load Private Sub Form_Load() Form2.Show Form2.Width = Me.Width Form2.Height = Me.Height Form2.Move Me.Left + (200), Me.Left…

يعد تحديد المتغيرات وتحديدقيمها وطريقة عملها يتم إضافة قيمة المتغير الناتج أو الصورة النهائية للمتغيرات لمكان الظهور مثل الآتي Option Explicit Dim A As Integer, B As Integer, C As Integer Private Sub Command1_Click() A = 5 B = 10 C = A * B Text1.Text = CStr(C)…

يعد تحديد المتغيرات وتحديدقيمها وطريقة عملها يتم إضافة قيمة المتغير الناتج أو الصورة النهائية للمتغيرات لمكان الظهور مثل الآتي Option Explicit Dim A As Integer, B As Integer, C As Integer Private Sub Command1_Click() A = 5 B = 10 C = A * B Text1.Text = CStr(C)…

A= 5, B= 10 C= A*B text1.text= CStr© حيث CStr هي دالة لتحويل القيمة الداخلة إلي نص

للكتابة داخل txt تستخدم الخاصية text1.text=" " أما للتنسيق استخدام الخواص forcolor, font ولكن من عيوب هذا التنسيق أنه لكل النص أما إذا أردت تنسيق كل فقرة علي حدة فأفضل استخدام rich text box