الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

عندى استفسار عن .sallength=len()

بدأه صادكو في 21 مارس 2009 · 3 رد · 489 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

ماذا يعني كل مما يلي :

1- Disc.Stort=0

Disc.SlLength=Ln(Disc)

.................................................

2- Clar All

.............................................

3- If intMsgbox=6 Then ............

............................................

4- IntMode=1

...........................................

5- CHADDNEW Fals

..........................................

6- Call populateItemCOMBO

.........................................

7- DBASE.EXECUTE"UPDATE BY_INVOICE SET ITEM_CODE =" &VAL(ITEM_CODE) &",NUM="&VAL

.......................................................................

8- DBASE.EXECUTE"INSERT INTO SAFE VALUES(#"& FORMAT(PAY_DATE, "YYYY/MM/DD")&"#,0,0,"&VAL(PAYMENT)&",'"&REMARK & "',0,0'EX')"

CLEAR_DATA

.........................................................................

9- PRIVAT SUB FORM_QUERY UNLOAD(CANCEL AS INTEGER,UNLOADMODE AS INTEGER)

IMPLODEFORM ME.HWND

END SUB

................................................................................

...

#2

السلام عليكــم ورحمـة الله وبركاتــه ،،

  • الـ Disc هو Object والله اعلم بنوعه والغرض استخدام خاصية الـ Stort
    وكذلك الـ SlLength ايضا خاصية او احد متطلبات Type .. اما الـ Ln فاعتقد ان المقصود بها Len
  • الـ Clar All اعتقد انه اجراء يتم استدعائه ولكن دون مسافة او ان الـ All تعويض عن قيمة مطلوبة لهذا الاجراء
  • الـ IntMode اعتقد انه متغير من نوع Integer والغرض تغيير قيمته
  • الـ CHADDNEW Fals هو إستدعاء إجراء يحمل إسم CHADDNEW وإرسال قيمة False له
  • الـ Call populateItemCOMBO لإستدعاء إجراء اسمه populateItemCOMBO
  • اما الـ DBASE فهي Objecy من نوع Database للـ DAO والغرض تنفيذ جملة UPDATE
  • والنقطة الثامنة هي كسابقتها ولكن لتنفيذ جملة INSERT اي جملة ادخال بيانات الى الجدول
  • اما الـ FORM_QUERY UNLOAD فهي حدث إسمه Form_QueryUnload ويتم استدعائه حين اغلاق الـ Form
    ويتم استدعاء في هذا الحدث اجراء إسمه IMPLODEFORM وإرسال مقبض الـ Form لهذا الإجراء

اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي

فليقبل الجميع تقديري واحترامي .. ولكم تحياتي

#3

مشكوووووووور جدا على التوضيح

وارجو التوضيح اكثر

هناك تصليح لبعض الاخطاء الاملائيه

اقتباس
ماذا يعني كل مما يلي :

1- Disc.SelStart=0

Disc.SlLength=Ln(Disc)

.................................................

2- Clear All

.............................................

3- If Msgbox=6 Then ............

............................................

4- IntMode=1

...........................................

5- CHADDNEW Fals

..........................................

6- Call populateItemCOMBO

.........................................

7- DBASE.EXECUTE"UPDATE BY_INVOICE SET ITEM_CODE =" &VAL(ITEM_CODE) &",NUM="&VAL

.......................................................................

8- DBASE.EXECUTE"INSERT INTO SAFE VALUES(#"& FORMAT(PAY_DATE, "YYYY/MM/DD")&"#,0,0,"&VAL(PAYMENT)&",'"&REMARK & "',0,0'EX')"

CLEAR_DATA

.........................................................................

9- PRIVAT SUB FORM_QUERY UNLOAD(CANCEL AS INTEGER,UNLOADMODE AS INTEGER)

IMPLODEFORM ME.HWND

END SUB

................................................................................

...

ارجو التوضيح وشكرا

#4

مازال عندك اخطاء املائية وعلى كل وضح مطلبك دون ان تدع الامر عائما هكذا

اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي

فليقبل الجميع تقديري واحترامي .. ولكم تحياتي

مواضيع مشابهة