הפונקציה Loc

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

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

תחביר

Loc( 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.

דוגמה

זקוק לעזרה נוספת?

מעוניין באפשרויות נוספות?

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

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