النتائج 1 إلى 4 من 4

الموضوع: استفساران عن VB6

  1. #1
    التسجيل
    11-09-2005
    المشاركات
    2

    استفساران عن VB6



    السلام عليكم

    تحية طيبة لمشرفي وأعضاء وزوار المنتدى ، عندي استفساران وأرجوا أن أجد الحل عنكم:

    الأول
    أستخدم الكود:
    كود:
     
    
    Data1.DatabaseName = App.Path & "\db1.mdb”
    
    Data1.RecordSource = "Table1”




    لكن عينت كلمة سر لقاعدة البيانات ، ما هو التغيير اللازم على الكود ؟



    والثاني:

    أقوم بعملية حسابية وأخزن الناتج في متغير لم أحدد نوعه.

    Dim Result1



    كيف أتحكم في عدد الأرقام التي تظهر بعد الفاصلة.



  2. #2
    التسجيل
    29-07-2005
    الدولة
    كندا
    المشاركات
    71

    مشاركة: استفساران عن VB6

    بالنسبة للسؤال الثاني كل ما عليك عملو هو انك تحدد تنسيق الرقم

    مثلا

    كود:
    Text1.Text = Format(Result1, "#.##")
    حيث انت اشارة السلم الي على اليمين ال ## تحدد عدد الخانات الي بعد الفاصلة

    يعني لو كان Result1 = 12345.12345

    و حطيت
    كود:
    Text1.Text = Format(Result1, "#.##")
    هيصير 12345.12


    اما بالنسبة للسؤال الاول بدك تستنى رد احد الاخوى المختصين في قواعد البيانات..
    اي اسئلة عامة احنا جهزين!

  3. #3
    التسجيل
    11-09-2005
    المشاركات
    2

    مشاركة: استفساران عن VB6

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

  4. #4
    التسجيل
    02-01-2005
    المشاركات
    28

    مشاركة: استفساران عن VB6

    أخي بالنسبة للسؤال الأول

    كود:
    Data1.DatabaseName = App.Path & "\db1.mdb"
    Data1.Connect = ";PWD=Your password"
    Data1.Source = "table"
    حيث your password هي كلمة السر

    و Table هو اسم الجدول
    التعديل الأخير تم بواسطة محمد زغلول ; 26-09-2005 الساعة 08:09 PM

ضوابط المشاركة

  • لا تستطيع إضافة مواضيع جديدة
  • لا تستطيع الرد على المواضيع
  • لا تستطيع إرفاق ملفات
  • لا تستطيع تعديل مشاركاتك
  •