如何运行帮助文件？

Question

我在我的app Properties-＆gt; Resource中添加了一个“Help.mht”文件。

当用户按“帮助”按钮时，如何运行帮助文件。尝试使用以下但不能正常工作。

Process.Start(My.Resources.Help)

感谢。

Answer 1

Sub Main()
  Dim name As String = "Help.mht"
  Dim dir = Application.StartupPath
  Dim path = Path.Combine(dir, name)

  If Not File.Exists(path) Then
    File.WriteAllBytes(path, My.Resources.Help)
  End If

  Process.Start(path)
End Sub