Unlock Instruction
Syntax
Unlock [#]StreamNum -or- Unlock [#]StreamNum, RecordNum -or- Unlock [#]StreamNum, [start] To end
Group
Description
Form 1: Unlock all of StreamNum.
Form 2: Unlock a record (or byte) of StreamNum.
Form 3: Unlock a range of records (or bytes) of StreamNum. If start is omitted then unlock starting at the first record (or byte).
NOTE: For sequential files (Input, Output and Append)
unlock always affects the entire file.
Parameters
Parameters | Description |
---|---|
StreamNum | Streams 1 through 255 are private to each macro. Streams 256 through 511 are shared by all macros. |
RecordNum | For Random mode files this is the record number. The first record is 1. Otherwise, it is the byte position. The first byte is 1. |
start | First record (or byte) in the range. |
end | Last record (or byte) in the range. |
Example
Sub Main Dim V As Variant Open MacroDir & "\SAVE_V.DAT" For Binary As #1 Lock #1 Get #1, 1, V V = "Hello" Put #1, 1, V Unlock #1 Close #1 End Sub
See also