WebBrowser1控件打开文件问题

If rs.RecordCount > 0 Then
        TempPath = rs.Fields(3).Value
        WebBrowser1.Visible = True
        Image1.Visible = False
        WebBrowser1.Navigate TempPath
        SetAttr (rs.Fields(3).Value), vbReadOnly
rs.Close
打开的word excel 内容
不是在WebBrowser1 中显示，而是调用了 word.exe  excel.exe  在word excel 本身显示的
如何让它在在WebBrowser1 中显示？？