VB 程序 :如何让已经打开的Word文件前端显示?
通过在打开之前进行窗口查找,如果查找成功,则调用SetWindowPos 置顶窗体,否则打开Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As LongPrivate Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As LongPrivate Const HWND_TOPMOST = -1Private Const SWP_NOMOVE = &H2Private Const SWP_NOSIZE = &H1Private Const SWP_SHOWWINDOW = &H40Private Sub Form_Load()Dim n As Long, m As LongDim sName As StringsName = "1.doc" & " - Microsoft Word" '这里的1.doc 改成你的文件名n = FindWindow(vbNullString, sName)If n <> 0 Thenm = SetWindowPos(n, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE Or SWP_SHOWWINDOW)Else'打开Word代码End IfEnd Sub
怎么让word始终显示在最上层?
Word自身不具备“窗口前端显示”功能。
但可以通过下载、安装“窗口前端显示功能”软件来实现这一点。
相关的软件,比如:DeskPins、V0.0.0.1等都非常小(只有几百K),下载、安装、使用都很方便,可以试一下。
以下以V0.0.0.1为例:下载、安装好了之后,打开该软件,在打开的窗口中,点击“选择窗口”按钮,然后选择一个希望放在最上面的窗口,即可实现指定窗口置顶的功能。
win7 64位 如何实现某个窗口最前端显示?
1、有些应用程序自带窗口置顶功能,用户可以在相应软件的设置中进行设置,一般的视频播放器都会有功能、另外一些桌面插件类的小应用也会自带此功能;2、如果应用程序没有窗口置顶的功能,用户可以使用”窗口置顶“、”窗口置顶辅助“等工具,来设置任意窗口为”置顶窗口“。
如何让WORD窗口保持在最前端
解决办法,试试一、替换格式法就是把损坏的Word文档存为另一种格式。
1、打开被损坏的文档单击“文件/另存为”菜单,在“保存类型”列表中,选择“RTF格式”,然后单击“保存”按钮,并关闭Word。
2、打开刚才保存的RTF格式文件,再次使用“另存为”将文件重新保存为“Word文档”,现在打开这个Word文件就可以发现文件已经被恢复过来了。
如果在转换成rtf格式后文件仍然不能被恢复,可以将文件再次转换为纯文本格式(*.txt),再转换回Word格式。
当然在转换为txt文件的时候其图片等信息会丢失掉。
二、删除格式信息法Word文档的最后一个段落符号记录着全篇文档的格式信息,有时删除这些格式信息就可以恢复变成乱码的文件。
1、在打开损坏的文档后,单击“工具/选项”菜单,选择“编辑”标签,取消对“使用智能段落选择范围”复选框的勾选,然后单击按钮。
这样就可以修复文件了。
2、选定最后一个段落符之外的全部内容,然后将这些内容粘贴复制到新的Word文件中即可。
用thinkPHP上传一份word文件,怎样显示出来
Version}";//把它的可见性设置为0(假),如果要使它在最前端打开,使用1(真)$word->Visible = 1;//---------------------------------读取Word内容操作 START-----------------------------------------//打开一个word文档$word->Documents->Open($url.$wordname);//将filename.doc转换为html格式,并保存为html文件$word->Documents[1]->SaveAs(dirname(__FILE__)."/".$htmlname,8);//获取htm文件内容并输出到页面 (文本的样式不会丢失)$content = file_get_contents($url.$htmlname);echo $content;//获取word文档内容并输出到页面(文本的原样式已丢失)$content= $word->ActiveDocument->content->Text;echo $content;//关闭与COM组件之间的连接$word->Documents->close(true);$word->Quit();$word = null;unset($word);//---------------------------------新建立Word文档操作 START--------------------------------------//建立一个空的word文档$word->Documents->Add();//写入内容到新建word$word->Selection->TypeText("$content");//保存新建的word文档$word->Documents[1]->SaveAs(dirname(__FILE__)."/".$wordname);//关闭与COM组件之间的连接$word->Quit();}php_Word("tesw.doc","filename.html","写入word的内容");?>