לוגו אתר Fresh          
 
 
  אפשרות תפריט  ראשי     אפשרות תפריט  צ'אט     אפשרות תפריט  מבזקים     אפשרות תפריט  צור קשר     חץ שמאלה ‎print ‎"Hello World!"; if‎ ‎not rules.‎know ‎then rules.‎read(); חץ ימינה  

לך אחורה   לובי הפורומים > מחשבים > תכנות ובניית אתרים
שמור לעצמך קישור לדף זה באתרי שמירת קישורים חברתיים
תגובה
 
כלי אשכול חפש באשכול זה



  #8  
ישן 25-02-2006, 08:59
צלמית המשתמש של EvyatarBH
  EvyatarBH EvyatarBH אינו מחובר  
 
חבר מתאריך: 13.05.02
הודעות: 8,468
מידע דרוש קוד ב-VBA שנותן ערך לשדה המחושב בטופס
בתגובה להודעה מספר 7 שנכתבה על ידי Ami103 שמתחילה ב "אהה..."

ואם השדה מקושר לשדה בטבלה, אז הערך יישמר בטבלה.

אני אתן לך דוגמא למשהו שיצא לי לעשות -
מדובר על מערכת הקשורה לבית בד והכנת שמן זית אשר מכילה חישובי אחוז ונפח או כמות שמן בעת הדיווח
(לפי כמות הזיתים וכמות או נפח השמן).
כל שמות המשתנים בקוד הבא הם שמות של שדות בטופס (בו מצוי הקוד) ובטבלה (המקושרת לטופס)

קוד:
Private Sub oilQuantity_AfterUpdate() oilVolume = oilVolumeCalc(oilQuantity) oilPercent = oilPercentCalc(oilQuantity, olivesQuantity) End Sub Private Sub oilVolume_AfterUpdate() oilQuantity = oilQuantityCalc(oilVolume) oilPercent = oilPercentCalc(oilQuantity, olivesQuantity) End Sub Private Sub olivesQuantity_AfterUpdate() oilPercent = oilPercentCalc(oilQuantity, olivesQuantity) End Sub


כאשר מטעמי סדר ונוחות, שמתי את פונקציות החישוב עצמן במודול נפרד
קוד:
Public Function oilVolumeCalc(oilQty As Double) oilVolumeCalc = Round(CDbl(oilQty) / 0.92, 2) End Function Public Function oilQuantityCalc(oilVol As Double) oilQuantityCalc = Round(CDbl(oilVol) * 0.92, 2) End Function


בתקווה שעכשיו זה ברור....
_____________________________________
תמונה שהועלתה על ידי גולש באתר ולכן אין אנו יכולים לדעת מה היא מכילה

תגובה ללא ציטוט תגובה עם ציטוט חזרה לפורום
תגובה

כלי אשכול חפש באשכול זה
חפש באשכול זה:

חיפוש מתקדם
מצבי תצוגה דרג אשכול זה
דרג אשכול זה:

מזער את תיבת המידע אפשרויות משלוח הודעות
אתה לא יכול לפתוח אשכולות חדשים
אתה לא יכול להגיב לאשכולות
אתה לא יכול לצרף קבצים
אתה לא יכול לערוך את ההודעות שלך

קוד vB פעיל
קוד [IMG] פעיל
קוד HTML כבוי
מעבר לפורום



כל הזמנים המוצגים בדף זה הם לפי איזור זמן GMT +2. השעה כעת היא 22:38

הדף נוצר ב 0.06 שניות עם 10 שאילתות

הפורום מבוסס על vBulletin, גירסא 3.0.6
כל הזכויות לתוכנת הפורומים שמורות © 2024 - 2000 לחברת Jelsoft Enterprises.
כל הזכויות שמורות ל Fresh.co.il ©

צור קשר | תקנון האתר