在自定义工具箱中选择dirlistbox，drivelistbox，filelistbox，添加这3个控件，然后在窗体上添加这些控件和一个picturebox控件，代码如下：
创新互联拥有一支富有激情的企业网站制作团队，在互联网网站建设行业深耕10年，专业且经验丰富。10年网站优化营销经验，我们已为1000多家中小企业提供了网站制作、成都网站建设解决方案，按需网站制作，设计满意，售后服务无忧。所有客户皆提供一年免费网站维护!
Public Class Form1
Private Sub DirListBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DirListBox1.SelectedIndexChanged
FileListBox1.Path = DirListBox1.Path
End Sub
Private Sub DriveListBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DriveListBox1.SelectedIndexChanged
DirListBox1.Path = DriveListBox1.Drive
End Sub
Private Sub FileListBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles FileListBox1.SelectedIndexChanged
PictureBox1.Image = Image.FromFile(FileListBox1.Path + "\搏信岩" + FileListBox1.SelectedItem.ToString())
End Sub
End Class
你可以自己在修改下，这只是坦悉个模型，呵呵！基御
webbrowser本身是不可运游兄能直接显示word的，webbrowser就是个浏览器的内核，只具备基本的浏览器功能，能解析html跟常见的javascript..
功能强大的firefox, IE9也不能直接显示word, 你看到的百度文库里显示的word,有些是转换了html显示出来的，有些是转旁袭成磨野了一种flash格式……
还有邮箱里的预览功能，有的是采用的microsoft 的web office app, 有的是永中office..这些都是购买的服务器软件支持……
.更古老的方式是做浏览器Activ X插件……
当然不行，那个是整个网页的
要这样猜正
web1=webbrowser1
For i = 0 To Web1.Document.All.Count - 1
'要具体判陪枣断是哪芦兆拆个控件还要看这两个
'Web1.Document.All(i).TagName
'Web1.Document.All(i).Name
Text1.Text=Web1.Document.All(i).InnerText
Next i
