@דוד ל.ט.
אני מנחש שאתה לא עושה את העצה של ClickOne כי זה גדול עליך.
אז לאט לאט.
הוסף למודול VB מתודה ריקה ופונקציה ככה:
Sub TestSkill()
MsgBox ClickOneImplation("כתובת קלאסית לבדיקה 5/2 ב'")
End Sub
Function ClickOneImplation(unput As String)
ClickOneImplation = "פה בסוף תתן את הפלט"
End Function
כנס עם הסמן למתודה הנקראת TestSkill והקש F5.
לאט לאט נסה להבין מה ואיך ולבצע צעד אחר צעד את הרעיון של ClickOne. כשההודעה תביא את הטקסט הרצוי, תעתיק את הרעיון ללולאה שעוברת על כל הרשומות.
תודה רבה,
אשתדל לנסות בתחילת שבוע,
אין לי עכבר, הלך לתיקון..
:oops:
פורסם במקור בפורום CODE613 ב15/05/2015 13:51 (+03:00)