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

在vb中如何调用(*.chm)的帮助文件

编辑:说三道四文库 发布时间:2017-03-24 02:27
HTML文档下载 WORD文档下载 PDF文档下载
请教在vb中如何调用(*.chm)的帮助文件!请将方法详细说明,分有的是。
可能还需要加入这个
Option Explicit
Private Declare Function OSWinHelp% Lib "user32" Alias "WinHelpA" (ByVal hwnd&, ByVal HelpFile$, ByVal wCommand%, dwData As Any)
htmlhelp Me.hwnd, App.Path & "\help.chm", 0, 0


在模块中加入:

Declare Function htmlhelp Lib "hhctrl.ocx" Alias "HtmlHelpA" (ByVal hwnd As Long, ByVal lpHelpFile As String, ByVal wCommand As Long, ByVal dwData As Long) As Long
方法很多
★为*.chm的地址
1.
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
Const SW_SHOWNORMAL = 1

Private Sub Command1_Click()
ShellExecute 0, "OPEN", "★", "", App.Path, SW_SHOWNORMAL
End Sub





2.最简单
shell "★"



3.
Private Declare Function GetActiveWindow Lib "user32" () As Long
private sub command1_click()
ShellExecute GetActiveWindow(), "Open", "★", "", 0&, 1
end sub
shell方法不行,我试过了!
我这可以,奇怪。
那其他两个应该可以吧
关注!
还有一个简单方法
app.helpfile="kk.chm"

激活时用 sendkeys "{F1}"
参考,有非常详细的说明(在VB中调用CHM 帮助的几种方法 )
http://expert.csdn.net/Expert/topic/1726/1726332.xml?temp=.3988153
别人写的引用来让你学习:

在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的说明资料)。 
谢谢大家!ok了。
10个最热JavaScript开源框架的社区活跃度对比 2013福布斯中国富豪榜:李彦宏第三、马化腾第五、马云第八 Storm又获东风,Hortonworks计划将其整合到Hadoop企业版 IBM CEO:预测高新技术 五个我最喜欢的方式 我伙呆,硅谷高级工程师年薪16.5万美金起 羡煞旁人的Supercell:Clash of Clans卫冕营收榜冠军 谷歌第三财季利润增36.5% 但摩托罗拉业务继续亏损2.48亿 针对应用开发者的几点建议:注意特征蔓延、加大用户评审…… Ubuntu中文衍生版UbuntuKylin 13.10正式发布 Web设计师和Web开发者之间的区别是什么? 在政府退出后,Google的量子计算机项目面临危机 SQL on Hadoop的最新进展及7项相关技术分享 联想:欲收购黑莓,还能在智能手机领域创造PC神话吗? 谁说Android开发者的收入依然不行? 代码可维护性的神秘面纱 MDCC 2013首批演讲嘉宾名单出炉 议题即将披露 MDCC2013:公开征集讲师和演讲主题 移动周报:IT人必看!9大最火移动开发技能 OpenStack H版发布 盘点2013:21个最火的云初创公司 从摩尔定律到原子计算,2013诺贝尔物理学奖背后的计算机技术 黄峻:从自制纸板键盘的孩子到Adobe技术经理的故事 Web开发正被颠覆 开发者需认清五大新现实 最发人深省的亚马逊面试题,你会如何作答? 所见即所得:8款实用HTML5开发框架 Groovy最受欢迎 Java系开发者更偏爱其他JVM类语言?(图) [开源专访]iNews创始人赵戈戈:36小时开发的PHP版HackerNews 使用Spring框架的12个开源项目 甲骨文仍旧“憎恨”开源软件 开发者应该避免使用的6个Java功能 不可小觑的Web开发编码规范 我公司现有固定电话收发电子邮件系统,可收附件,将WORD,HTML文档转换为TXT文本 关于内码问题 远程控制 关于JDBC2.0的问题(50分!!!!) 哪位有高招? 升级BIOS和升级主板? 急!急!急!急!窗口不能关闭. 哥哥姐姐们请帮忙???(急需linux环境下用php+mysql如何实现搜索引擎) 大家赞不赞成开一个Palm技术区?赞成的跟贴,满50个就开。 定义 Dim reader As System.Data.SqlClient.SqlDataReader lvlvlvlylyly请看,你的贴子我加不上了,还查一段程序加在这里了 如何传送monthview1中用户选择的日期到其他窗体里 你该怎么做呢 国内什么样的网站托管好?还是选择国外的? 女网友一定要小心 mschart控件问题 赶快来尝试一下吧! 如何在 View 类中编写press any key to continue功能模块 Vc++下应用Matlab数学函数库出错 如何用VB实现自动登录? 赶快来尝试一下吧! ado的问题! 如何传递带“%”的参数? 有全套的ERP源代码为你提供,助你在开发过程中更上一层楼 字符串str=" aaa ",如何变为"aaa" 怎么没有人理俺泥?? 关于dw的问题 如何读入数据库中的HTML格式的正文呢? 一个在阅读<<深入浅出MFC>>中遇到的问题 !!!!急 新手,说找不到mfc42d.dll文件 怎么没有人理俺泥?? 关于dw的问题 FAST.lib 2000 for windows是个什么东东 请问各位一个非常简单的问题 jdk和jvm 笨蛋 大家有什么建议吗? ASP.net如何刷新另一个页面 有一年delphi工作经验的程序员在全国各地的待遇如何?哪个城市有发展前途(钱途)? 100分求解!!!这个问题大家都来看,来者有分!!! 告诉我几个地方,给你几十分,简单吧 :-) 有没有关于VPN的书籍 Interbase源码分析 西瓜是Plmm哎~! 一个字符串替换的小问题。。。 还有一个问题需要问大家。。。特别急。。。 我变成了大家的一员 哪儿有在jbuilder中让三键鼠标可以使用滚动功能的驱程? 我想把ODBC的所有数据源列出来显示,不知道用哪个函数,谁能告诉,多谢了!来就有分 两台机器怎样用一个asdl宽带猫上网 我的vc编译器在我的一个程序就是不出自动变量填补功能,在其他程序上可以,不知为什么 我想把ODBC的所有数据源列出来显示,不知道用哪个函数,谁能告诉,多谢了!来就有分 怎么复制程序自己? 二氧化碳与氢氧化钙溶液反应生成碳酸钙和水,不用配平. 怎么用实验证明碳酸钠水解反应是吸热反应要试验原理,用品,现象,结论和解释, 小明想通过如图所示实验验证液化过程是吸热还是放热,试管A未放入容器B中时,用温度计测出B中的水温,再将试管A放入B内将烧瓶内水沸腾所产生的水蒸气通入试管A中,过一段时间,小明看到的 CO2通入氢氧化钙溶液中,是水和氢氧化钙同时与二氧化碳反应吗? 伴性遗传 判断最可能的遗传方式一个正常男子和一个患病女子结婚,生了一个患病女孩和一个患病男孩,女孩长大后和正常男孩结婚,所生的子女都患病,那么该遗传病最可能属于什么遗传是伴X 水处理材料都有些什么?什么产品是水处理材料? 物质量均为nmolNa,Na2O,Na2O2,同时加入nL水中完全反应后测溶液密度为ag/cm3则所测得溶液的物质的量浓度为? 醋酸氟轻松冰片乳膏的副作用 如何证明Na2CO3的水解反应是吸热反应 1,在基因型前面加的分数是什么意思?(例如1/3 AaBb )2,分枝法怎么推测子代性状分离比?子一代自交.3,推测基因型和表现型有没有什么诀窍,请举例.加扣扣, 醋酸氟轻松冰片软膏可以使宝宝皮肤白吗 如何证明碳酸钠(Na2CO3)的水解是吸热反应 . 下列物质中不能与二氧化碳反应的是 A氧气 B水 C木炭 D氢氧化钙 那么C呢~ 为什么氯化钙的熔点比氯化镁高按影响晶格能的因素,镁离子半径比钙离子小,电荷相同,氯化镁的熔点应该比氯化钙高,查阅数据可知,氯化钙的熔点比氯化镁高,这是为什么? 如何 产生静电 质遗传的杂交实验,F1的表现型总是和母本一样这句话错在哪 温室下,在氢氧化钙的饱和溶液中加入下列物质,冷却至温室,溶液的PH没有改变的是A,CO2 B ,CaO C ,NaOH D,HCl 怎么样会产生静电?为什么? 怎样学习我很难理解概念,总觉得很模糊.每个知识点很难联系在一起.我对遗传学比较有兴趣,但是感觉很难.我花了很多时间去了解、记忆, 氢氧化钙溶液中通入或加入下列物质,不能使溶液的PH显著降低的是A、硫酸 B、氯化铜 C、氯化钡 D、二氧化碳 静电如何产生? 生物遗传现象简介 在氢氧化钙饱和溶液中加入什么不影响PH值A、通入二氧化碳B、加入大量水C、加入盐酸D、加入石灰石 如何产生静电.想让橡胶棒与毛皮摩擦产生静电,这两种材料怎么找,如果不好找有没有替代品呀?或者请教一下其他产生静电的方法,. Aa与Aa自交生出AA:Aa:aa=1:2:1为什么有时算Aa的概率=2/3为什么有时候概率是1/2什么时候分母4为什么时候分母为3哈 向氢氧化钙的饱和溶液中加入下列物质,不可能使溶液的ph有明显变化的是 A通入CO2 B加入稀H2SO4 C加入氧化钙 D加入Na2CO3溶液 是不是是OH-的浓度决定酸碱度,而不是OH-的数量 谁知道静电是如何产生的吗? 血液和尿液中同时含有蛋白质是什么原因 氢氧化钙溶液中加入下列哪种物质不能使ph值显著降低?单选 A.硫酸B.氯化铜C.氯化钡D.二氧化碳请说明理由 补分的 白化病的遗传方式是什么? 为什么第一题第一个空不是AA呢\?第二题为什么没有AABb?还有,计算怎么算?AA aa AaBb AaBB 20/27 怎样把重铬酸钾中的六价铬还原成三价铬 关于遗传病的遗传方式那些遗传病是伴性显性遗传?那些遗传病是伴性隐性遗传?那些遗传病是常染色体显性遗传?那些遗传病是常染色体隐性遗传? 关于基因遗传某女性患红绿色盲,她的下列亲人中肯定携带色盲基因的是A 祖父 B 外祖父 C 外祖母 D 祖母求详解 六价铬怎么还原成三价铬,用什么还原剂更好?亚硫酸钠可以不? 天然冰片是如何形成的 如果父母双方都有某病,那么无论孩子男女都会患比病,如果父母双方有一个人有此病,那么生出的女孩百分百患病,男孩百分之五十患病,我想问一下这种病是什么遗传病?好久没做过生物遗传题 如何治疗尿蛋白呢 尿里有微量蛋白该怎么治呢 天然冰片是什么? 1.假定某三体植株自交时,n+1的胚囊全部参与受精,而参与受精的花粉中,n+1的花粉只有10%。那么,该三体植株自交子代群体中,四体、三体和正常二倍体个体数分别是?5%、50%、45%)请问为 男性有微量尿蛋白怎么治? 蒸发器的工作原理?请附带图解,现在我对这方面问题一窍不通 【急求解】一道高中生物题,遗传方面的一株纯黄玉米(YY)与一株纯白玉米(yy)相互传粉,两株植株结出的种子的胚和胚乳的基因情况是:A、胚细胞相同、胚乳细胞不同B、胚细胞和胚乳细胞都 尿微量5mg/l,尿蛋白+2正常吗?病情描述:曾经治疗情况和效果:看了好几家医院,尿蛋白有的微量,有的+1患者信息:女 24岁 重庆 沙坪坝区 病情描述(发病时间、主要症状等):曾经治疗情况和效 冰片 有哪些种类?天然冰片和合成冰片有何区别?价格如何? 打针时进了空气会不会死?不进血管也会死吗?多久会死? 尿微量尿蛋白偏高怎么办患者信息:男 46岁 病情描述(发病时间、主要症状等):尿微量尿蛋白是108.0(H),尿酸371想得到怎样的帮助:尿微量尿蛋白偏高,生活里怎样注意饮食?喝什么药好呢?现 降膜蒸发器的工作原理? 人的身体进多少空气会死 请问尿蛋白微量怎么办?首先感谢来看问题的医生,我是一名前列线病人,吃药快二个月了,先是尿道炎好了,现在检查时出现尿蛋白微量了,医生说这个不正常,我以前每个周六都查一次,尿蛋白都 【D为什么不对】 为什么将空气注入静脉会导致人体死亡呢? 将等物质的量的Na,Na2O,Na2O2,NaOH,分别投入等质量的足量水中,将质量比等于式量比的Na、na2o,Na2O2、NaOH分别投入等质量的足量水中,所得溶液质量分数最小的是求详细解答过程! 高中生物遗传题(选择)(非计算,不难)材料央视报道孕妇防辐射服……(废话),A碱基对的替换增添和缺失都是有辐射引起的.B环境所引发的变异可能为可遗传变异C辐射能导致人体遗传物 什么叫往身体注射空气? 我想知道,红绿色盲、血友病、白血病它们分别是什么遗传方式?是常染色体遗传还是伴X遗传还是什么? 小明想通过如图所示实验验证液化过程是吸热还是放热,试管A未放入容器B中时,用温度计测出B中的水温,再将试管A放入B内将烧瓶内水沸腾所产生的水蒸气通入试管A中,过一段时间,小明看到的 为什么打针时要是针管里有空气,住入人体里人就会死呢? 一道高中生物遗传方式判断的题答案是(1).黄色,常(2).正常,长常怎么看的呀, 实验证明液化放热
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘