VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日: 2003/02/19(Wed) 18:16
投稿者花ちゃん
Eメール
URL
タイトルRe: ヘルプ表示

> SendKeysイベントで、表示する方法、または、別の表示方法がありましたら

HtmlHelp APIを使用すれば表示できます。

Option Explicit
'指定されたヘルプ ウィンドウでヘルプ トピックを開きます
Private Const HH_DISPLAY_TOPIC = &H0
'プログラムによって開かれたウィンドウをすべて閉じます
Private Const HH_CLOSE_ALL = &H12
'プログラム中から HTML Help の機能にアクセスできるようにする
Private 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
Private HelpFilePath As String      'ヘルプファイルのパス

Private Sub Form_Load()
    'ヘルプフィルの取得
    HelpFilePath = "c:\windows\Help\Htmhlp98.chm"
End Sub

Private Sub Command1_Click()
    'ヘルプファイルを開く
    HTMLHelp Me.hwnd, HelpFilePath, HH_DISPLAY_TOPIC, 0&
End Sub

Private Sub Command2_Click()
    'ヘルプファイルを閉じる
    HTMLHelp Me.hwnd, HelpFilePath, HH_CLOSE_ALL, 0&
End Sub

'Visual Basicの開発環境においてHTML Help APIを使用して
'HTML Helpファイルを表示したままプログラムを終了すると
'Visual Basic開発環境も終了(場合によってはアプリケーション
'エラーが発生)する不具合が報告されています。
'プログラムを終了する場合はHTML Helpファイルは閉じておいて
'下さい。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- Web Forum -