הפונקציה Loc

חשוב: מאמר זה תורגם בתרגום מכונה, ראה כתב ויתור. תוכל למצוא את הגרסה באנגלית של המאמר כאן לעיונך.

הערה: הפונקציה, שיטת, אובייקט או מאפיין המתוארים בנושא זה אינה זמינה אם שירות Microsoft Jet ביטוי פועל במצב ארגז חול, המונעת להערכה של ביטויים העשויים להיות לא בטוחים. לקבלת מידע נוסף אודות מצב ארגז חול, חפש "מצב sandbox" בעזרה.

החזרת ארוך המציין את מיקום קריאה/כתיבה הנוכחי בתוך קובץ פתוח.

תחביר

Loc ( filenumber )

הנדרש filenumberארגומנט הוא מספר שלם חוקי כלשהו מספר קובץ.

הערות

להלן תיאור ערך ההחזרה עבור כל מצב גישה לקובץ:

מצב

ערך החזרה

אקראי

מספר הרשומה האחרונה לקרוא ממנו או לכתוב את הקובץ.

רציפים

מיקום בית הנוכחי בקובץ, מחולק ב- 128. עם זאת, במידע המוחזר על-ידי Loc עבור קבצים רציפים אינו בשימוש ואינו נדרש.

בינארי

מיקום הבית האחרון לקרוא או לכתוב.


דוגמה

הערה: הדוגמאות הבאות מדגימות את השימוש של פונקציה זו במודול Visual Basic for Applications‏ (VBA). לקבלת מידע נוסף אודות עבודה עם VBA, בחר הפניית מפתח ברשימה הנפתחת שליד חיפוש והזן מונח אחד או יותר בתיבת החיפוש.

דוגמה זו משתמשת בפונקציה Loc כדי להחזיר את מיקום קריאה/כתיבה הנוכחי בתוך קובץ פתוח. דוגמה זו מניחה שזה TESTFILE הוא קובץ טקסט עם כמה שורות של נתונים לדוגמה.

Dim MyLocation, MyLine
' Open file just created.
Open "TESTFILE" For Binary As #1
' Loop until end of file.
Do While MyLocation < LOF(1)
' Read character into variable.
MyLine = MyLine & Input(1, #1)
' Get current position within file.
MyLocation = Loc(1)
' Print to the Immediate window.
Debug.Print MyLine; Tab; MyLocation
Loop
Close #1 ' Close file.

הערה: כתב ויתור בנוגע לתרגום מכונה: מאמר זה תורגם על-ידי מערכת מחשב, ללא התערבות אדם. Microsoft מציעה את תרגומי המכונה כדי לסייע למשתמשים שאינם דוברי אנגלית ליהנות מתוכן בנושא מוצרים, שירותים וטכנולוגיות של Microsoft. מכיוון שהמאמר תורגם על-ידי מכונה, הוא עלול להכיל שגיאות באוצר המילים, בתחביר או בדקדוק.

הרחב את הכישורים שלך
סייר בהדרכה
קבל תכונות חדשות לפני כולם
הצטרף למשתתפי Office Insider

האם מידע זה היה שימושי?

תודה על המשוב!

תודה על המשוב! נראה שכדאי לקשר אותך לאחד מנציגי התמיכה של Office.

×