Как открыть текстовый файл *.txt в виде блокнота? - VB

Declare Function ShellExecute _
        Lib "shell32.dll" Alias _
        "ShellExecuteA" _
        (ByVal hwnd As Long, _
        ByVal lpOperation As String, _
        ByVal lpFile As String, _
        ByVal lpParameters As String, _
        ByVal lpDirectory As String, _
        ByVal nShowCmd As Long) As Long
Global Const SW_SHOWNORMAL = 1
 
ShellExecute hwnd, "open", "C:\file.txt", _ 
   vbNullString, vbNullString, SW_SHOWNORMAL