📄 helphtml.bas
字号:
Attribute VB_Name = "HelpHtml"
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'取得帮助文件的html名称的模块。
'作者:雷宇
'时间:1999-04-13
'功能:取得帮助文件的html名称。
'接口函数:Public Function GetHelpHtml(ByVal lngHelpID As Long) As String
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Option Explicit
Private Type HelpHtmlInfo
lngHelpID As Long
strHelpHtml As String
End Type
Private HelpHtml(241) As HelpHtmlInfo
'将帮助信息存入数组
Private Sub SetHelpHtmlArr()
HelpHtml(0).lngHelpID = 10001
HelpHtml(0).strHelpHtml = "srch_pub01.htm"
HelpHtml(1).lngHelpID = 10002
HelpHtml(1).strHelpHtml = "btbwsz_pub01.htm"
HelpHtml(2).lngHelpID = 10003
HelpHtml(2).strHelpHtml = "zb000020.htm"
HelpHtml(3).lngHelpID = 10004
HelpHtml(3).strHelpHtml = "zb000010.htm"
HelpHtml(4).lngHelpID = 10006
HelpHtml(4).strHelpHtml = "zb000013.htm"
HelpHtml(5).lngHelpID = 10007
HelpHtml(5).strHelpHtml = "sx_pub01.htm"
HelpHtml(6).lngHelpID = 10008
HelpHtml(6).strHelpHtml = "lmsz_pub01.htm"
HelpHtml(7).lngHelpID = 10009
HelpHtml(7).strHelpHtml = "lct00001.htm"
HelpHtml(8).lngHelpID = 10010
HelpHtml(8).strHelpHtml = "gldj0001.htm"
HelpHtml(9).lngHelpID = 10011
HelpHtml(9).strHelpHtml = "jsb_pub01.htm"
HelpHtml(10).lngHelpID = 10012
HelpHtml(10).strHelpHtml = "cxskzl01.htm"
HelpHtml(11).lngHelpID = 10013
HelpHtml(11).strHelpHtml = "cxfkzl01.htm"
HelpHtml(12).lngHelpID = 10014
HelpHtml(12).strHelpHtml = "gcclfy01.htm"
HelpHtml(13).lngHelpID = 10015
HelpHtml(13).strHelpHtml = "rhfh0001.htm"
'
HelpHtml(14).lngHelpID = 10016
HelpHtml(14).strHelpHtml = "txfxlb01.htm"
'
HelpHtml(15).lngHelpID = 10017
HelpHtml(15).strHelpHtml = "bjtpyz01.htm"
'
HelpHtml(16).lngHelpID = 10018
HelpHtml(16).strHelpHtml = "ymyj0001.htm"
'
HelpHtml(17).lngHelpID = 10019
HelpHtml(17).strHelpHtml = "tpbq0001.htm"
'
HelpHtml(18).lngHelpID = 10020
HelpHtml(18).strHelpHtml = "rhdyyl01.htm"
'
HelpHtml(19).lngHelpID = 10021
HelpHtml(19).strHelpHtml = "dyszly01.htm"
'
HelpHtml(20).lngHelpID = 10022
HelpHtml(20).strHelpHtml = "txfxlb03.htm"
'
HelpHtml(21).lngHelpID = 10023
HelpHtml(21).strHelpHtml = "szsrdh01.htm"
HelpHtml(22).lngHelpID = 10024
HelpHtml(22).strHelpHtml = "cxjszl01.htm"
'
HelpHtml(23).lngHelpID = 10025
HelpHtml(23).strHelpHtml = "rhysrk01.htm"
'
HelpHtml(24).lngHelpID = 10026
HelpHtml(24).strHelpHtml = "cxjzpz01.htm"
'
'
HelpHtml(25).lngHelpID = 10202
HelpHtml(25).strHelpHtml = "cxdjh_pub01.htm"
'
HelpHtml(26).lngHelpID = 10203
HelpHtml(26).strHelpHtml = "fqckkp04.htm"
'
HelpHtml(27).lngHelpID = 10207
HelpHtml(27).strHelpHtml = "strklb08.htm"
'
HelpHtml(28).lngHelpID = 10208
HelpHtml(28).strHelpHtml = "pzywzl01.htm"
'
HelpHtml(29).lngHelpID = 10209
HelpHtml(29).strHelpHtml = "dxckkp04.htm"
'
HelpHtml(30).lngHelpID = 10210
HelpHtml(30).strHelpHtml = "jzpzlb16.htm"
'
HelpHtml(31).lngHelpID = 10211
HelpHtml(31).strHelpHtml = "jzpzlb17.htm"
'
HelpHtml(32).lngHelpID = 10212
HelpHtml(32).strHelpHtml = "jzpzlb18.htm"
'
HelpHtml(33).lngHelpID = 10213
HelpHtml(33).strHelpHtml = "jzpzlb19.htm"
'
HelpHtml(34).lngHelpID = 10214
HelpHtml(34).strHelpHtml = "spdw0001.htm"
'
HelpHtml(35).lngHelpID = 10215
HelpHtml(35).strHelpHtml = "zy000001.htm"
'
HelpHtml(36).lngHelpID = 10216
HelpHtml(36).strHelpHtml = "czrzlb02.htm"
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'1999年4月15日新增
'
HelpHtml(37).lngHelpID = 10245
HelpHtml(37).strHelpHtml = "jgcklb01.htm"
'
HelpHtml(38).lngHelpID = 10246
HelpHtml(38).strHelpHtml = "jgrklb01.htm"
'
HelpHtml(39).lngHelpID = 10248
HelpHtml(39).strHelpHtml = "cgfyft01.htm"
'
HelpHtml(40).lngHelpID = 10249
HelpHtml(40).strHelpHtml = "jgfyft01.htm"
'
HelpHtml(41).lngHelpID = 10250
HelpHtml(41).strHelpHtml = "sptjkp01.htm"
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'
HelpHtml(42).lngHelpID = 10251
HelpHtml(42).strHelpHtml = "rkcbkp01.htm"
HelpHtml(43).lngHelpID = 10523
HelpHtml(43).strHelpHtml = "rkcblb01.htm"
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'
HelpHtml(44).lngHelpID = 10525
HelpHtml(44).strHelpHtml = "jgrkkp01.htm"
'
HelpHtml(45).lngHelpID = 10526
HelpHtml(45).strHelpHtml = "jgckkp01.htm"
'
HelpHtml(46).lngHelpID = 10527
HelpHtml(46).strHelpHtml = "jgfykp01.htm"
'
HelpHtml(47).lngHelpID = 10528
HelpHtml(47).strHelpHtml = "jgfylb01.htm"
'
HelpHtml(48).lngHelpID = 10529
HelpHtml(48).strHelpHtml = "sptjlb01.htm"
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'
HelpHtml(49).lngHelpID = 20001
HelpHtml(49).strHelpHtml = "xjzt0001.htm"
'
HelpHtml(50).lngHelpID = 20002
HelpHtml(50).strHelpHtml = "dkztly01.htm"
'
HelpHtml(51).lngHelpID = 20003
HelpHtml(51).strHelpHtml = "gbzt0001.htm"
'
HelpHtml(52).lngHelpID = 20004
HelpHtml(52).strHelpHtml = "ztsx0001.htm"
'帐套备份
HelpHtml(53).lngHelpID = 20005
HelpHtml(53).strHelpHtml = "sjbf0001.htm"
''帐套恢复
HelpHtml(54).lngHelpID = 20006
HelpHtml(54).strHelpHtml = "sjhf0001.htm"
'
HelpHtml(55).lngHelpID = 20007
HelpHtml(55).strHelpHtml = "ztzl0001.htm"
'
HelpHtml(56).lngHelpID = 20008
HelpHtml(56).strHelpHtml = "ztjz0001.htm"
'
HelpHtml(57).lngHelpID = 20009
HelpHtml(57).strHelpHtml = "dyszly01.htm"
'
HelpHtml(58).lngHelpID = 20010
HelpHtml(58).strHelpHtml = "rhdy0001.htm"
'
HelpHtml(59).lngHelpID = 20011
HelpHtml(59).strHelpHtml = "rhdyyl01.htm"
'单据打印
HelpHtml(60).lngHelpID = 20012
HelpHtml(60).strHelpHtml = "dydj0001.htm"
'
HelpHtml(61).lngHelpID = 20013
HelpHtml(61).strHelpHtml = "xtdl0001.htm"
'
HelpHtml(62).lngHelpID = 30001
HelpHtml(62).strHelpHtml = "kjkmkp01.htm"
'
HelpHtml(63).lngHelpID = 30002
HelpHtml(63).strHelpHtml = "kjkmlb01.htm"
'
HelpHtml(64).lngHelpID = 30003
HelpHtml(64).strHelpHtml = "kjkmlb11.htm"
'
HelpHtml(65).lngHelpID = 30004
HelpHtml(65).strHelpHtml = "kjkmlb16.htm"
'
HelpHtml(66).lngHelpID = 30005
HelpHtml(66).strHelpHtml = "wldwlb01.htm"
'
HelpHtml(67).lngHelpID = 30006
HelpHtml(67).strHelpHtml = "dwlbkp01.htm"
'
HelpHtml(68).lngHelpID = 30007
HelpHtml(68).strHelpHtml = "wldwkp01.htm"
'
HelpHtml(69).lngHelpID = 30008
HelpHtml(69).strHelpHtml = "bmzylb01.htm"
'
HelpHtml(70).lngHelpID = 30009
HelpHtml(70).strHelpHtml = "bmkp0001.htm"
'
HelpHtml(71).lngHelpID = 30010
HelpHtml(71).strHelpHtml = "zykp0001.htm"
'
HelpHtml(72).lngHelpID = 30011
HelpHtml(72).strHelpHtml = "tjhslb01.htm"
'
HelpHtml(73).lngHelpID = 30012
HelpHtml(73).strHelpHtml = "tjkp0001.htm"
'
HelpHtml(74).lngHelpID = 30013
HelpHtml(74).strHelpHtml = "xmhslb01.htm"
'
HelpHtml(75).lngHelpID = 30014
HelpHtml(75).strHelpHtml = "xmkp0001.htm"
'
HelpHtml(76).lngHelpID = 30015
HelpHtml(76).strHelpHtml = "gchslb01.htm"
'
HelpHtml(77).lngHelpID = 30016
HelpHtml(77).strHelpHtml = "gclxkp01.htm"
'
HelpHtml(78).lngHelpID = 30017
HelpHtml(78).strHelpHtml = "gckp0001.htm"
'
HelpHtml(79).lngHelpID = 30018
HelpHtml(79).strHelpHtml = "splwlb01.htm"
'
HelpHtml(80).lngHelpID = 30019
HelpHtml(80).strHelpHtml = "splxkp01.htm"
'
HelpHtml(81).lngHelpID = 30020
HelpHtml(81).strHelpHtml = "spxzkp01.htm"
'
HelpHtml(82).lngHelpID = 30021
HelpHtml(82).strHelpHtml = "splwkp01.htm"
'
HelpHtml(83).lngHelpID = 30022
HelpHtml(83).strHelpHtml = "spqclb01.htm"
'
HelpHtml(84).lngHelpID = 30023
HelpHtml(84).strHelpHtml = "kcqckp01.htm"
'
HelpHtml(85).lngHelpID = 30024
HelpHtml(85).strHelpHtml = "stqckp01.htm"
'
HelpHtml(86).lngHelpID = 30025
HelpHtml(86).strHelpHtml = "wtqckp01.htm"
'
HelpHtml(87).lngHelpID = 30026
HelpHtml(87).strHelpHtml = "fqqckp01.htm"
'
HelpHtml(88).lngHelpID = 30027
HelpHtml(88).strHelpHtml = "zyqckp01.htm"
'
HelpHtml(89).lngHelpID = 30028
HelpHtml(89).strHelpHtml = "cgqckp01.htm"
'
HelpHtml(90).lngHelpID = 30029
HelpHtml(90).strHelpHtml = "zdhmlb01.htm"
'
HelpHtml(91).lngHelpID = 30030
HelpHtml(91).strHelpHtml = "zdhmkp01.htm"
'
HelpHtml(92).lngHelpID = 30031
HelpHtml(92).strHelpHtml = "sphwlb01.htm"
'
HelpHtml(93).lngHelpID = 30032
HelpHtml(93).strHelpHtml = "xzhwkp01.htm"
'
HelpHtml(94).lngHelpID = 30033
HelpHtml(94).strHelpHtml = "szsllb01.htm"
'
HelpHtml(95).lngHelpID = 30034
HelpHtml(95).strHelpHtml = "spslkp01.htm"
'
HelpHtml(96).lngHelpID = 30035
HelpHtml(96).strHelpHtml = "bzhllb01.htm"
'
HelpHtml(97).lngHelpID = 30036
HelpHtml(97).strHelpHtml = "bzhlkp01.htm"
'
HelpHtml(98).lngHelpID = 30037
HelpHtml(98).strHelpHtml = "pzlxdhk1.htm"
'
HelpHtml(99).lngHelpID = 30038
HelpHtml(99).strHelpHtml = "pzlxlb01.htm"
'
HelpHtml(100).lngHelpID = 30039
HelpHtml(100).strHelpHtml = "pzlxkp01.htm"
'
HelpHtml(101).lngHelpID = 30040
HelpHtml(101).strHelpHtml = "fkfslb01.htm"
'
HelpHtml(102).lngHelpID = 30041
HelpHtml(102).strHelpHtml = "fkfskp01.htm"
'
HelpHtml(103).lngHelpID = 30042
HelpHtml(103).strHelpHtml = "fktjlb01.htm"
'
HelpHtml(104).lngHelpID = 30043
HelpHtml(104).strHelpHtml = "fktjkp01.htm"
'
HelpHtml(105).lngHelpID = 30044
HelpHtml(105).strHelpHtml = "jhyslb01.htm"
'
HelpHtml(106).lngHelpID = 30045
HelpHtml(106).strHelpHtml = "jhyskp01.htm"
'
HelpHtml(107).lngHelpID = 30046
HelpHtml(107).strHelpHtml = "gzlbkp01.htm"
'
HelpHtml(108).lngHelpID = 30047
HelpHtml(108).strHelpHtml = "gzlblb01.htm"
'
HelpHtml(109).lngHelpID = 30048
HelpHtml(109).strHelpHtml = "gdzclb01.htm" 'bdfslb01.htm"
'
HelpHtml(110).lngHelpID = 30049
HelpHtml(110).strHelpHtml = "gzbdkp01.htm"
'
HelpHtml(111).lngHelpID = 30101
HelpHtml(111).strHelpHtml = "wldwlb13.htm"
'
HelpHtml(112).lngHelpID = 30104
HelpHtml(112).strHelpHtml = "kmqcmx01.htm"
'
HelpHtml(113).lngHelpID = 30105
HelpHtml(113).strHelpHtml = "wldwlb14.htm"
'
HelpHtml(114).lngHelpID = 30106
HelpHtml(114).strHelpHtml = "wlqcmx01.htm"
'
HelpHtml(115).lngHelpID = 30107
HelpHtml(115).strHelpHtml = "wlqcph01.htm"
'
HelpHtml(116).lngHelpID = 40001
HelpHtml(116).strHelpHtml = "cgddlb01.htm"
'
HelpHtml(117).lngHelpID = 40002
HelpHtml(117).strHelpHtml = "cgddkp01.htm"
'
HelpHtml(118).lngHelpID = 40003
HelpHtml(118).strHelpHtml = "xsddlb01.htm"
'
HelpHtml(119).lngHelpID = 40004
HelpHtml(119).strHelpHtml = "xsddkp01.htm"
'
HelpHtml(120).lngHelpID = 40005
HelpHtml(120).strHelpHtml = "sbcglb01.htm"
'
HelpHtml(121).lngHelpID = 40006
HelpHtml(121).strHelpHtml = "spcgkp01.htm"
'
HelpHtml(122).lngHelpID = 40007
HelpHtml(122).strHelpHtml = "spxslb01.htm"
'
HelpHtml(123).lngHelpID = 40008
HelpHtml(123).strHelpHtml = "spxskp01.htm"
HelpHtml(124).lngHelpID = 40009
HelpHtml(124).strHelpHtml = "zycglb01.htm"
'
HelpHtml(125).lngHelpID = 40010
HelpHtml(125).strHelpHtml = "zycgkp01.htm"
'
HelpHtml(126).lngHelpID = 40011
HelpHtml(126).strHelpHtml = "zyxslb01.htm"
'
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -