ファイルが使用中かどうかを取得したいです。

    Dim ppp As String = "D:\Test.txt"

    Dim sss As String = "別のプロセスで使用されているため、"

    Try

        Using fs = New IO.FileStream(ppp, IO.FileMode.Open, IO.FileAccess.ReadWrite, IO.FileShare.None)

            MsgBox("オープン成功。")

        End Using

    Catch ex As Exception

        If sss.Length <= ex.Message AndAlso ex.Message.Substring(0, sss.Length) = sss Then

            MsgBox("ロックの取得に失敗。")

        Else

            MsgBox("何かしらの理由で失敗。" & vbNewLine & ex.Message)

        End If

    End Try

「Catch ex As Exception」の「ex.Message」に「別のプロセスで使用されているため、...」と文字列があるので、
とりあえずそれで判断しているのですが、本来どのように取得すれば良いのでしょうか？
低レベルな質問ですみません。


vb.net、vs2017で書いてます。勉強とかではなく趣味で、高校生です。常識無いかもしれませんが、指摘いただけると助かります。