如何使用文件复制对话框

2016-02-19 14:24 18 1 收藏

下面图老师小编跟大家分享一个简单易学的如何使用文件复制对话框教程，get新技能是需要行动的，喜欢的朋友赶紧收藏起来学习下吧！

【 tulaoshi.com - 编程语言】

VisualBasic提供了过时的FileCopy语句.问题是使用该函数时并不显示文件复制对话框,也就是说,当拷贝一个大文件时,用户看不到Windows的标准
　　文件复制对话框,无法从进度条上判断当前复制的进度.那么,如何做到这一点呢？请看下面:
　　
　　PublicTypeSHFILEOPSTRUCT
　　hWndAsLong
　　wFuncAsLong
　　pFromAsString
　　pToAsString
　　fFlagsAsInteger
　　fAnyOperationsAbortedAsBoolean
　　hNameMappingsAsLong
　　lpszProgressTitleAsString
　　EndType
　　
　　PublicDeclareFunctionSHFileOperationLib"shell32.dll"Alias
　　_
　　"SHFileOperationA"(lpFileOpAsSHFILEOPSTRUCT)AsLong
　　PublicConstFO_COPY=&H2
　　PublicConstFOF_ALLOWUNDO=&H40
　　
　　PublicSubShellCopyFile(SourceAsString,DestAsString)
　　DimresultAsLong
　　DimfileopAsSHFILEOPSTRUCT
　　Withfileop
　　.hwnd=0
　　.wFunc=FO_COPY
　　'ThefilestocopyseparatedbyNullsandterminatedby2nulls
　　.pFrom=Source&vbNullChar&vbNullChar
　　'ortocopyallfilesusethisline
　　'.pFrom="C:*.*"&vbNullChar&vbNullChar
　　'Thedirectoryorfilename(s)tocopyintoterminatedin2nulls
　　.pTo=Dest&vbNullChar&vbNullChar
　　.fFlags=FOF_ALLOWUNDO
　　EndWith
　　result=SHFileOperation(fileop)
　　Ifresult＜＞0Then'Operationfailed
　　'MsgboxtheerrorthatoccurredintheAPI.
　　MsgBoxErr.LastDllError,vbCriticalOrvbOKOnly
　　Else
　　Iffileop.fAnyOperationsAborted＜＞0Then
　　MsgBox"OperationFailed",vbCriticalOrvbOKOnly
　　EndIf
　　EndIf
　　EndSub
　　
　　只需调用ShellCopyFileFileA,FileACopy->

来源:http://www.tulaoshi.com/n/20160219/1606928.html

看过《如何使用文件复制对话框》的人还看了以下文章更多>>

将非模态对话框显示为模态对话框

1、意图有时候我们希望将非模态窗口显示为模态窗口。比如在IE的“文件”菜单下选择“打印”，弹出的“打印”对话框就是非模态的（也许我们不太清楚Microsoft的设计意图，一般来说这里的“打印”对话框应该是模态的）。这种情况下如何将“打印”对话框显示为模态的呢（这个对话框对我们来说是Black Box）？ 2、简单实现简单...

使用文本窗口和对话框教程

标签： autocad教程

在执行AutoCAD命令的过程中，用户与AutoCAD之间主要是通过文本窗口和对话框来进行人机交互。 2.3.1使用文本窗口 AutoCAD的文本窗口与AutoCAD窗口相对独立，用户可通过如下方式来显示该窗口： (1)在AutoCAD中按F2键 (2)选择菜单【View（视图）】→【Display（显示）】→【TextWindow（文本窗口）】 (3)在命令行调用“textscr”命令该窗口...

director使用mui xtra创建对话框

标签：设计软件平面设计软件广告设计软件

Director中非常有用的一个Xtra是MUI Dialog Xtra，这是D自代的对话框生成器。在6.0版本中就有这个Xtra了，但是很奇怪大多开发者都只应用了它最基本的特性，如果他们能否充分利用MUI Xtra的话，那么，你就可以自己定义个完全响应的对话框，而不是去用很废内存和磁盘空间的MIAW来实现。你可以去任意定制它，并且你可以完全根据你或者你的客...

自绘对话框

标签： C语言教程 C语言函数

自绘对话框作者：Alon 下载示例源代码闲来无事，写了一个简单的对话框界面，希望给需要的朋友有所帮助。界面如下：界面很单调，我只是想说明一下如何实现界面的自绘。如果有需要，也可以绘制更复杂漂亮的界面。程序的实现也不复杂，接下来就跟着我一步一步做。...

[JAVA100例]017、文件对话框

标签：编程语言网络编程

import java.io.File; import javax.swing.*; import javax.swing.filechooser.*; /** * pTitle: 文件过滤器演示/p * pDescription: FileChooserDemo文件使用的文件过滤器/p * pCopyright: Copyright (c) 2003/p * pFilename: MyFilter.java/p * @version 1.0 */ public class MyFilter extends Fil...

查看更多精彩>>