TextStreamオブジェクト - Skipメソッド


【書式】

TextStream.Skip(characters)

指定された数の文字をスキップします。スキップした文字は読み込まれません。

引数charactersには、スキップする文字数を指定します。

Sub test80()
    Dim FSO As Object, buf As String
    Set FSO = CreateObject("Scripting.FileSystemObject")
    ''先頭から2文字と、6文字目から4文字を読み込んで表示します
    With FSO.GetFile("C:\Work\Sample.txt").OpenAsTextStream
        buf = .Read(2)
        .Skip 3
        buf = buf & .Read(4)
       .Close
    End With
    MsgBox buf
    Set FSO = Nothing
End Sub