大虾们,我制作好了chm格式的帮助文件,请问如何在菜单栏中,调用帮着文件啊!
解决方案 »
- 请问,VB中如何向MYSQL数据库中插入图片呀..(BLOB数据类型),最好有代码,请高手看过来
- 如何枚举文件?把结果放到字符数组里~请附代码~~Api做啊~~~
- mscomm 如何接收來自不同地址的儀表返回的數據?(解決另開帖送200分)
- 紧急求救 怎样用代码刷新(看到)刚建的表呢??
- 关于同时让多个控件被选中的问题
- excel中的sql语句的写法????
- 这个问题谁解决给他10分!!!!
- 请教 vb 中的数据库问题
- 如何判断只做接收数据的客户端异常退出
- 帮帮我!谢谢。我下载了 IconBook 4.211 但是一个图标都显示不了,空空如也!为什么??
- vb6生成的exe文件的version属性product name怎么在程序中修改?
- 怎样才能做到滚动文字既不闪烁又流畅?
一:
使用HtmlHelp:
Const HH_DISPLAY_TOPIC = &H0
Const HH_CLOSE_ALL = &H12
Private Sub cmdOpen_Click()
Dim hwndHelp As Long
hwndHelp = HtmlHelp(hWnd, app.path+"readme.chm",HH_DISPLAY_TOPIC, 0)
end sub
Private Sub Form_Unload(Cancel As Integer)
HtmlHelp Me.hWnd, "", HH_CLOSE_ALL, 0
End Sub
二:
工程属性-〉选定帮助文件即可
三:
用ShellExecute.
Private 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
然后这样调用:
ShellExecute 0&, vbNullString, App.Path & "\readme.chm", vbNullString, vbNullString, vbNormalFocus
四:
shell "hh.exe " & "cch.chm"
五:
WinHelp(Me.hwnd, MyHelpFileName, HELP_CONTENTS, 10)
注:有的方法可打开多种类型的帮助文件,有的只能打开一种
最简洁的