专注于互联网--专注于架构

最新标签
网站地图
文章索引
Rss订阅

首页 »VB教程 » vb调用chm:在VB中调用CHM 帮助的几种方法 »正文

vb调用chm:在VB中调用CHM 帮助的几种方法

来源: 发布时间:星期四, 2009年2月12日 浏览:125次 评论:0


个应用不论编制得如何完美在很多情况下用户还是会对如何使用它提出问题 visual basic 提供了对两种区别帮助系统支持:传统 windows 帮助系统 (winhelp)和新 html 帮助(chm帮助)当我们制作好帮助文件后就需要在适当位置编写代码进行本文将讨论几种在chm帮助文件思路方法

   思路方法 使用f1键:

   这种思路方法最简单只需如下代码即可:

private sub form_load
app.helpfile = app.path & \"\\help.chm\" \'和主同目录下help.chm帮助文件按f1键
end sub
   思路方法 2 使用sendkeys思路方法:

private sub form_load
app.helpfile = app.path & \"\\help.chm\"
end sub
private sub cmdhelp_click
sendkeys \"{f1}\" \'发送击键到活动窗口
end sub
   思路方法 3 使用shell:

private sub cmdhelp_click
shell \"hh.exe help.chm\", vbnormalfocus \'help.chm为指定帮助文件可包含路径
end sub
   思路方法 4 使用htmlhelp:

   先声明如下api:

option explicit
private declare function htmlhelpa lib \"hhctrl.ocx\" (byval hwndcaller as long, byval pszfile as , byval ucommand as long, byval dwdata as long) as long
\'hwndcaller指定窗口pszfile指定要文件ucommand是发送给 htmlhelp命令dwdata是ucommand参数
   然后在过程中:

private sub cmdhelp_click
dim i as
i = app.path & \"\\help.chm\" \'用变量i记录和主同目录下help.chm帮助文件
htmlhelpa form1.hwnd, i, 0, 0
end sub
   思路方法 5 使用shellexecute:

   先声明如下api:

option explicit
\'声明api用于异步打开个文档
private declare function shellexecute lib \"shell32.dll\" alias \"shellexecutea\" (byval hwnd as long, byval lpoperation as , byval lpfile as , byval lpparameters as , byval lpdirectory as , byval nshowcmd as long) as long
private const sw_shownormal = 1
   然后在过程中:

private sub cmdhelp_click
dim a as long
dim b as
b = app.path & \"\\help.chm\" \'用变量b记录和主同目录下help.chm帮助文件
a = shellexecute (0, \"open\", b, \"\", \"\", sw_shownormal)
end sub
   以上 5种思路方法各有优缺点从代码简单上讲建议使用第 2种思路方法从功能上讲建议使用第 5种思路方法因其不只用于打开chm帮助文件还可用同样格式打开、打印或查找个文件或文档(参见该api介绍说明资料)
0

相关文章

读者评论

发表评论

  • 昵称:
  • 内容: