初めて投稿させていただきます。

現在、PDFファイル又は、Wordファイルの内容を画面に表示して、
ページを1,2,3..最大ページ,1,2,3...と切替える動作を実現したいと考えています。

PDFやWordの内容だけを表示したい(コマンドーバー等は表示したくない)ので
WebBrowserで読み込んで表示する事を考えています。

下記の件についてご教授の程、宜しくお願いします。


■教えて頂きたい事
1.WebBrowserに表示しているファイルのページ切替えは可能なのでしょうか？
2.wordやPdfの最大ページ数は、どのプロパティに格納されているのでしょうか？
　(ウォッチで確認してみましたが、どのプロパティか解りませんでした。)
3.ページ変更するコードは、Wordの場合、ページジャンプ(object.GoTo(1, 2, , "2"))で
は
　変更できないのでしょうか？PDF場合も併せて教えていただけないでしょうか？

<環境>
win2000 sp4
vb6.0sp5

回答ではありません。

質問される場合色々と聞くのではなく的を絞って質問するようにしないと
今回のように何をどのようにしたいのか？その辺をはっきりしないで、方法だけを
質問してももっと他の方法があるかも知れないし、Word と PDF とごちゃ混ぜで質問
されても同様に扱えない場合は答えられないし、答えたとしても２〜３回の位のやりとり
で解決しそうにもないので、何方も敬遠されてレスが付かないのではないでしょうか。

出来る、出来ないの質問ならご自分で試して下さいと言いたくなりますよね。
それに、WebBrowser では、Word のような ページ 機能(?)がありませんよね。

文章表現に不備があり申し訳ございません。

Wordファイルのみを処理対象として、
コメントに沿って内容を修正しましたので、
ご教授の程、宜しくお願いします。

> 何をどのようにしたいのか？
■質問
WebBrowserに表示したWordの内容を
スライドショーのように切替える方法(ページ単位で表示)

■実現したい事
VBで作成したフォームの中にWordファイル(*.doc)の
内容だけ(コマンドーバー等は表示したくない)を表示する。
Wordファイルの内容が複数ページ存在する場合に、
画面に表示している内容を定周期で切替えてページ単位で表示を行う。

(例)Wordファイルの内容が3ページ存在し、5秒周期でページを切替える場合
起動時 1ページ目表示
5秒後  2ページ目表示
10秒後 3ページ目表示
15秒後 1ページ目表示
:         :

> それに、WebBrowser では、Word のような ページ 機能(?)がありませんよね。
WebBrowserには無いと考えていますが、Wordファイルの内容を
WebBrowserで表示後、WebBrowserに表示されたWord文章をマウスで選択し、
F5キーを押下すると、ページジャンプのメニュー(Wordの機能)が
ポップアップで表示され、ページを切替える事ができます。

上記のページ切替えをユーザーに操作させる事なく、
プログラムで制御できないかと思い質問した次第です。

宜しくお願いします。

> WebBrowserで表示後、WebBrowserに表示されたWord文章をマウスで選択し、
> F5キーを押下すると、ページジャンプのメニュー(Wordの機能)が
> ポップアップで表示され、ページを切替える事ができます。
>
> 上記のページ切替えをユーザーに操作させる事なく、
> プログラムで制御できないかと思い質問した次第です。

Word 上でマクロを取ってそのコードを参考に書けばできるかと。
Private Sub Command2_Click()
    Dim wdApp   As Object
    Const wdGoToPage = 1
    Const wdGoToNext = 2
    
    Set wdApp = oDocument.Application
　　'2ページ目に移動
    wdApp.Selection.GoTo What:=wdGoToPage, Which:=wdGoToNext, Name:="2"
    Set wdApp = Nothing
End Sub


> WebBrowserで表示後、WebBrowserに表示されたWord文章をマウスで選択し、
は、特に関係がないような気が。

お返事ありがとうございます。

Document.Applicationを指定してあげる必要があったんですね。
ずっとDocumentのプロパティを調べていました。

上記の方法でページ切替えが出来るようになりました。
ありがとうございました。