יש לי 2 קומבו בוקסים (במערך):
COMBO1(0)
ו
Combo1(1)
עכשיו יש לי טבלה באקסס שבה קיים שם מוצר ומספר מוצר ודאגתי להטעין בקומבו בוקסים בהאתמה של אינדקסים (המוצר הראשון נמצא ראשון וכך גם מספר המוצר המתאים לו...)
מה שאני מנסה לעשות זה שברגע שישנו את אחד מהם, גם השני השתנה אוטומטית...
ניסיתי בעזרת Private Sub Combo1_Change וואלה זה בכלל לא נכנס לי לפונקציה... אמרו לי לנסות עם CLICK עשיתי את הפונ' הנל:
Private Sub Combo1_Click(Index As Integer) If Index = 0 Then Combo1(1).ListIndex = Combo1(0).Index Else Combo1(0).ListIndex = Combo1(1).Index End If End Sub
|
הבעיה שזה לא עובד... זה משנה פעם אחת ובפעמים אחרי זה זה לא משנה...
שרצתי עם דיבגר ראיתי שבפעם הראשונה זה רץ על הפונקציה הזאת כמה פעמים (הוא כאילו משנה בהתחלה ואז בגלל שהוא שינה הוא מישום מה נכנס שוב לפונקציה כאילו עשיתי click על השני... ומשנה את הראשון ושוב נכנס לפונקציה כי כאילו שיניתי את הראשון ומשנה את השני... זה לא משנה כי זה עובד אבל אחר כך זה לא עושה את זה יותר מישום מה... הוא נכנס פעם אחת לפונקציה וכאילו משנה את הקומבו הנכון אבל הוא לא...)
בבקשה אם אפשר תשובה... זה דיי דחוף הפרוייקט להגשה עוד יומיים... (לבצפר :\) תודה 