说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

怎样在VB中调用.chm帮助文件?

编辑:说三道四文库 发布时间:2017-10-22 09:12
HTML文档下载 WORD文档下载 PDF文档下载
我想在VB中调用.chm帮助文件,请高手指点。按一下command控件就显示自己编的.chm帮助文件。
如何调用chm帮助文件
我把帮助做成chm格式,请问如何在VB中调用?  
---------------------------------------------------------------  
 
在VB中调用CHM  帮助的几种方法    
 
一个应用程序不论编制得如何完美,在很多情况下用户还是会对如何使用它提出问题。  Visual  Basic  提供了对两种不同帮助系统的支持:传统的  Windows  帮助系统  (WinHelp)和新的  HTML  帮助(CHM帮助)。当我们制作好帮助文件后,就需要在程序的适当位置编写代码进行调用,本文将讨论几种在程序中调用CHM帮助文件的方法。    
方法一 使用F1键:  
这种方法最简单,只需如下代码即可:  
Private  Sub  Form_Load()    
App.HelpFile  =  app.path  &  "\help.chm"  '调用与主程序同目录下的help.chm帮助文件,按F1键调用  
End  Sub  
 
方法二  使用SendKeys方法:  
Private  Sub  Form_Load()    
App.HelpFile  =  app.path  &  "\help.chm"    
End  Sub    
private  Sub  CmdHelp_Click()    
SendKeys  "{F1}"  '发送击键到活动窗口    
End  Sub  
 
方法三  使用Shell函数:  
private  Sub  CmdHelp_Click()  
Shell  "hh.exe  help.chm",  vbNormalFocus  'help.chm为指定的帮助文件,可包含路径。  
End  Sub  
 
方法四  使用HtmlHelp函数:  
先声明如下API:  
Option  Explicit  
Private  Declare  Function  HtmlHelpA  Lib  "hhctrl.ocx"  (ByVal  hwndCaller  As  Long,  ByVal  pszFile  As  String,  ByVal  uCommand  As  Long,  ByVal  dwData  As  Long)  As  Long    
'hwndCaller指定调用者的窗口,pszFile指定要调用的文件,uCommand是发送给  HtmlHelp的命令,dwData是uCommand的参数。    
然后在过程中调用:  
private  Sub  CmdHelp_Click()  
dim  i  as  string  
i  =  app.path  &  "\help.chm"  '用变量i记录与主程序同目录下的help.chm帮助文件  
HtmlHelpA  Form1.hWnd,  i,  0,  0  
End  Sub  
 
方法五  使用ShellExecute函数:  
先声明如下API:  
Option  Explicit  
'声明API函数用于异步打开一个文档  
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  
Private  Const  SW_SHOWNORMAL  =  1  
然后在过程中调用:  
private  Sub  CmdHelp_Click()  
dim  a  as  long  
Dim  b  As  String  
b  =  App.Path  &  "\help.chm"  '用变量b记录与主程序同目录下的help.chm帮助文件  
a  =  ShellExecute  (0,  "open",  b,  "",  "",  SW_SHOWNORMAL)  
End  Sub  
以上五种方法各有优缺点,从代码的简单上讲,建议使用第二种方法。从功能上讲,建议使用第五种方法,因其不只用于打开CHM帮助文件,还可用同样的格式打开、打印或查找一个文件或文档(参见该API的说明资料)。    


               问题解决,请结贴!
可以在工程/属性/通用页框中添加你的帮助文件
'******************************************* Html help 声明
Public Const HH_DISPLAY_TOPIC = &H0
Public Const HH_SET_WIN_TYPE = &H4
Public Const HH_GET_WIN_TYPE = &H5
Public Const HH_GET_WIN_HANDLE = &H6
Public Const HH_DISPLAY_TEXT_POPUP = &HE   ' Display string resource ID or
                                          ' text in a pop-up window.
Public Const HH_HELP_CONTEXT = &HF         ' Display mapped numeric value in
                                          ' dwData.
Public Const HH_TP_HELP_CONTEXTMENU = &H10 ' Text pop-up help, similar to
                                          ' WinHelp's HELP_CONTEXTMENU.
Public Const HH_TP_HELP_WM_HELP = &H11     ' text pop-up help, similar to
                                          ' WinHelp's HELP_WM_HELP.

Public Declare Function HtmlHelp Lib "hhctrl.ocx" Alias "HtmlHelpA" (ByVal hwndCaller As Long, ByVal pszFile As String, ByVal uCommand As Long, ByVal dwData As Long) As Long
'*******************************************

'调用*.chm中的某个页面

Private Sub cmd_style_Click()
    Dim hwndHelp As Long
    hwndHelp = HtmlHelp(hwnd, App.Path & "\MakeScript.chm::/eb_style.htm#1", HH_DISPLAY_TOPIC, 0)
End Sub
跨平台2D游戏引擎V-Play:3天开发一款原生游戏 Appery.io:无编程经验,自己也能DIY移动应用 SAP携手Xamarin和Service2Media 提供移动应用开发框架 8个超实用的jQuery技巧攻略 美国国防部战略:大规模、分布式,构建数字化防御体系 针对小白的Python入门教程——Python使用说明书 耗资460亿美元,天价Olympic上广受诟病的监控和4G LSI AIS ASIA首次登陆中国 探讨最新大数据技术 “iOS in the Car”问世 苹果发布集成汽车服务CarPlay Pinterest联合创始人Evan Sharp:视觉网站标配“网格布局”的设计过程 微软Xbox Live或登陆iOS和Android平台 TIOBE 2014年3月编程语言排行榜:F#直逼Top10 Atlassian面向企业客户推出Git Essentials工具 Mt.Gox破产,都是错误编程惹的祸 Jamo创始人揭底AWS,棱镜阴影下的云行业态势 成本、创新、可靠:游戏公司FunPlus选择AWS的三大理由 全透明、可折叠,平板电脑概念机是这样的 插件大集合!开源包管理器Alcatraz迎来Xcode 5更新 Q语言:新型的数据定义语言 非响应式手机网站页面的优化 高薪必备:Hadoop求职者的6大攻略 微软或将于四月发布“返璞归真”的Windows 8.1 Update 1 《近匠》第14期:LiveCode——全民开发工具 美团梁堰波:用SQL-on-Hadoop构建互联网数据仓库与商务智能系统 程序员游戏Style:亚特兰大极客使用机器学习玩转Flappy Bird Gleasy CTO薛珂:成立3年,企业用户2万+,移动办公蕴藏较大发展机遇 Unity Awards展区“点亮”Unity亚洲开发者大会 DevBox:最实用的移动开发辅助工具包 【技术博客推荐】创客程序员设计实现最小物联网系统 MySQL还是NoSQL:开源盛世下的数据库该如何选择 利用Hadoop Streaming处理二进制格式文件 救命!我在程序中使用webbrowse控件………… 在线等待。 也许是一个很简单的问题! 连接mysql出错 寻关于工控的中英文对照资料 想在暑假打工(计算机方面的)需要什么条件啊? 关于SQL SERVER的疑难问题!来者有分!(在线等待!分数不够可以再加) MTS与线程——高分相赠!!!! 来看看啊,告诉我再哪里下就给分啊~~ 大对象问题,所有书都是这么说的,可是都作不成功? 如何指定tquery中的某一行? 如何通过API发送翻页按键给控件? 在jbuilder 中 不能通过 创建Ejb Tester对EntityBean进行测试吗?SessionBean都可以的 如何在ie中点右键获得这个ie窗口的window Text以及其主框架的URL。 关于Kdevelop开发 大家讨论一下项目负责人到底该赚多少钱(年薪)? ★★★★★如何在文件下载完毕后自动关闭浏览器??★★★★★ #### 关于CWebBrowser控件 #### 兄弟我要做一个网上银行系统,需要做压力测试,各位有过这样的经验吗??怎么来测试,用什么工具来进行并发访问压力测试? 兄弟我要做一个网上银行系统,需要做压力测试,各位有过这样的经验吗??怎么来测试,用什么工具来进行并发访问压力测试? 菜鸟问题,在线等待,如何让JList显示带gif的文字啊? delphi+access 用ADO连接,为什么在SQL语句中用SUM()时,执行出错?送分 为什么我make时,有错误:'class' or 'interface' expected Dreamweaver mx自带的制作下拉菜单的部题? Interbase字段类型有多少,就这些吗??急呀 Sybase:怎样知道本地的哪些数据库文件已经被连接,和连接的DBN,DBF,ENG。无论是Central还是其他应用打开的,我咨询Sybase公司,还不行 请问如何用ASP.NET或ASP发送会议要求和约会 怎么样在网页上插一个FLASH动画呢 小问题,很快结帖 为什么会出InvocationTargetException ***急购vb6.0控件参考,MFC类库大全(上,下),运行库大全(希望) Applet向Servlet发消息,分别发post和get请求,请问该如何实现 请教,DataGrid实现分页后怎么保存 每一页DataGrid里的checkbox的状态 关于多个radiobuttonlist的选择问题。 Server.CreateObject("LyfUpload.UploadFile") 怎样动态的创建ado.net中的dataadapt和dataconnection? 可不可以在微软的中文网站上找到中英文的技术文章,asp是微软的技术吧? 请问如何将owc生成的图表赋不同的颜色 保存jsp文件时遇到问题,help frame中的数据传递 今天做舅舅了!!! 哈哈,我要当干妈啦:D 任何定义一个动态的结构体数组 大侠,求救,如何将英文的sql7.0的备份文件恢复到sql 2000中。来者有分。 如何用HttpResponse.Redirect()打开新的窗口 请问JBuilder错误提示:cannot access directory javax\mail at line 7, column 1 安装网络打印机时出现的提示 如何获取客户端用户名! 急!!Iframe 在outlook 里是否能实现滚动效果 求和的问题??急用呀?? 请问resource(*.res)文件怎么用的?谁能给讲讲 请教高手!!! 如何用JSP或SERVLET动态在网页上动态生成图形(统计图表) 备课组内如何进行合作 已知一个平行四边形其中一个角是45度,其他三个角是多少度? 钠灯怎么烧镇流器 光不沿直线传播会怎么样3个合理场景. 英语翻译这是从罐装雀巢咖啡拍下来的,我想知道这咖啡的保质期是多久,生产日期之类的信息.求翻译 平行四边形的一个角是30°,与它相对的角是( ) 光在何时会沿直线传播?光只有在真空中才沿直线传播, 这道题如何解 英语翻译 南开区 教学质量监测 第五组 序列互补如何影响DNA的性质与功能 连线下一题 谁有人教语文六年级上册第五课詹天佑的备课 请问, 这一题怎么连线 平行四边形的一个角与它的对角的和是150°,那么这个角是()度,与他相邻的角是()度如题. 一个斯诺克的规则问题:红球打完后,比如在打黄球的时候,把绿球撞进袋了.这时除了扣4分之外,要不要把l要不要把绿球捡起来摆在点位上?谁能给出一个链接吗?我记得在电视里看的是不用摆 一道连线题,谁会!如下图: 证明:两组对角的角平分线平行的四边形为平行四边形 在 陈涉世家 中,陈胜是怎样评价项燕的?陈涉世家 中,陈胜是怎样评价项燕的? 飞快地 消失慢慢地 后退 伊利运河是哪国的﹖ 这道题怎样解?急 问一道连线题成语与哪些历史人物有关视死如归 子路曲高和寡 韩信秋毫无犯 宋玉呕心沥血 李贺升堂入室 管仲 美国伊利偌斯在什么地方,芝加哥吗 读完陈涉世家,陈胜给你留下什么样的印象 做一道连线题夜不能寐 渴望 直把杭州作卞州望眼欲穿 思念 忽闻岸上踏歌声满腔愤慨 感动 但悲不见九州同喜出望外 失望 明月何时照我还 试说明伊利运河对美国社会经济的地理意义? 怎样进行片段教学 初中关于圆证明几何题ABCD是圆O的内接正方形,EFGH也是正方形,F,G在直径AC上,E,H在圆上证明:正方形EFGH与正方形ABCD面积之比2:5 伊利运河作用 初中物理怎样用对话来进行教学的? 求初中三年级的圆的证明题 与PCAGCT互补的DNA序列是 如何进行片段教学 初中有关圆切线的证明有两步不是很理解,就是画红线的地方,不明白为什么得出.在第一问中,为什么因为那个是平行四边形,那两个角就相等且等于90度,两直线平行,内错叫相等,但如何得出等于 集体备课是提高备课质量的重要备课形式.它可集思广益,将个人才智转化为集体优势,共同提高教学质量.但是有没有一种方式,可以省时省力,节约经费,资源共享,利于保存呢? 电磁炉,发电机,日光灯镇流器,磁电式电流表中没有运用电磁感应规律的是 如图,一圆与一直角的两边分别相切,A、B分别为切点,CD与圆相割,点C、 M 、D在一直线上,求证三角形CMB与三角形BDM相似图发不上去,点M是直角顶点 互补的定义.书上证明的过程中有一步是"...(互补的定义)."互补的定义具体是什么吗?以前学过,但是我忘了.顺便问下,怎么打出角的符号和所以,因为的那3个点? 陈涉世家中陈胜对秦朝的统治是什么态度 根据下列条件分别确定一次函数的解析式图像过P(-1,-2)Q(-3,4)直线y=kx+b与直线y=33x-2平行且过(4,6)根据下列条件分别确定一次函数的解析式图像过P(-1,-2)Q(-3,4)直线y=kx+b与直线y=3x-2平行且过(4,6 请解这道题,谢谢了. LED日光灯管加上镇流器为什么还会升压? 逆鳞,用英语怎么说?懂英文的,麻烦进来下 答案要求几千个字.运河申遗将“京杭大运河”扩容为“中国大运河”的意义何在?运河申遗将“京杭大运河”扩容为“中国大运河”的意义何在?给我几千字 不要只敷衍的回答 解方程 (24 19:31:18)(1)X平方-5X=0         (2)(3X-2)平方=(1-5X)平方 唐县有谁知道刚才那里地震 运河申遗将“京杭大运河”扩容为“中国大运河”的意义何在?如果把长城比做中原王朝防御的盔甲,运河比做生命的血液,结合中国历史谈谈你的理解. 亿以上的单位都有那些?我记得有人说亿以上有一个叫“京”的单位(见小说《银河英雄传说》中形容人工天体的质量),但我又从别的地方知道京以上还有单位,是什么? 有这样一组文件,怎么让matlab根据文件内的信息给数据分组并画图数据格式如下(第一个数字表示总共有几组数,第二行第一个数是数组序号,第二个数表示这组数里有几个数据,第三行则是数据 世界上有哪些运河?与我国的京杭运河有什么不同? 求一次函数的关系式按炤嚄国税法规定:个人月收入不超过1600元,免缴个人所得税.超过1600元不超过2100元的部分,需缴纳5%的个人所得税.试写出月收入在1600元到2100元之间的人应缴纳的税金y(元) 我要用MATLAB对329142个数据进行分组,分成100组.求程序. 如何加强备课组建设 有谁知道叶子像蒲扇一样的植物叫什吗 三角形最稳定,平行四边形最什么 如何加强教研组备课组建设 1毛钱和1分钱如何英译? 一个三角形的两个角固定在两个点上,第三个角可以活动,这个三角形有稳定性吗?如图,A、B 2个点固定在水平面上,第三个角没有固定,这个三角形形状能变化吗? 金华房地产投资增速连续七个月居全省首张高丽在上海浙江调研:东部地区要带头杭州欲从钱塘江引风进城吹走灰霾“国家记忆”美国档案馆二战缅印战场影浙江省政协公开征集2014年重点履职日空自航空展开幕 蓝色冲击波进行飞行金正恩视察在建滑雪场 称建设者功绩将究竟谁在改变钓鱼岛“现状”?“世纪审判”遭闹场 穆尔西高喊“我是穆尔西拒穿囚服出庭、高呼口号 庭审被日本千叶首发PM2.5提醒 称污染可埃及政治仍恶性循环 军政府或催生新“印度雄心勃勃探火星 英媒议论“与中国叙利亚人权网站称10月共21名媒体工芝加哥农产品期价4日涨跌不一马里地雷爆炸造成4人死亡博尔特自爆在北京拒吃中餐 每日吃10奥运“五金王”邹凯与女友领证结婚【高监控丑闻让美政府“四面楚歌”西媒吐槽印度火星探测“比许多飞机便宜小泉之子等日高官“不动产和储蓄”为零巴菲特今年操盘失手 伯克希尔股价跌1券商自营人自述:“救市”政策让业绩遭原油美元主导黄金暴跌大戏 悲惨能否随第八十九集2016投资:沪港深港通带你直达十大第九十集惊叹!\".世界\"中文域名成为交易美元收到骇人警告!2016年游戏规则第九十一集2015将过去 盘点全球经济的赢家与第二季[元旦]彭博富豪榜:王健林李嘉诚马云包揽亚洲六六:妄谈与疯话我的世界大神真实还原芝加哥城精美截图褚橙.世界中文域名投资告诉我们世界很2016年股市四大新玩法:打新可“先开车时如何判断后车距在巨大的体量下,华为是如何保持高效的中文域名被玩坏的十年,它真的懂你吗?智慧教育提高员工收入,富士康IE学院Steam平台数万玩家信息被盗 官方
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘