现在表的某一列为二进制列，放着Word或Excel文件，打开文件的代码为：If Tables("数据字典").Current Is Nothing Then
Return
End If
Dim dr As DataRow = Tables("数据字典").Current.DataRow
Dim fl As String = ProjectPath & dr("_Identify") & ".doc"
If dr.SQLLoadFile("文件",fl) Then '如果提取文件成功
Dim Proc As New Process '打开文件
Proc.File = fl
Proc.Start()
Panel1.
Else
Messagebox.Show("文件提取失败,可能并不存在文件!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If
这样是将Word文件打开，现在想着将该文件附着在窗口中，应该加什么控件，另外代码该如何写呢？
加好友 
发短信
Post By：2014/10/8 15:05:00 [只看该作者]
