【VB.NET】xlsxファイルを読み取り専用で開く(ClosedXML使用)

' ファイルパスを指定する
Dim file As String = "C:\vb_test\test.xlsx"
Using fs As New FileStream( _
    file, _
    FileMode.Open, _
    FileAccess.Read, _
    FileShare.ReadWrite)
    Dim book As New ClosedXML.Excel.XLWorkbook(fs, ClosedXML.Excel.XLEventTracking.Disabled)
    Dim sheet As ClosedXML.Excel.IXLWorksheet
    ' 開くシート名を指定する
    sheet = book.Worksheet("sheet1")
    ' セルの位置を指定する(左右方向がx,上下方向がy)
    Dim x As Integer = 1
    Dim y As Integer = 1
    ' セルの値をRead
    Dim read_data As String = sheet.Cell(y, x).Value.ToString
 End Using