说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB如何将文件删除到回收站

HTML文档下载 WORD文档下载 PDF文档下载
VB如何将文件删除到回收站

VB提供的Kill语句将文件直接彻底删除,而不是放到回收站中。
那么,如何将文件删除到回收站中呢?
下面就是答案:

Option Explicit
Public Type SHFILEOPSTRUCT
hWnd As Long
wFunc As Long
pFrom As String
pTo As String
fFlags As Integer
fAnyOperationsAborted As Boolean
hNameMappings As Long
lpszProgressTitle As String
End Type
Public Declare Function SHFileOperation Lib "shell32.dll" Alias _
"SHFileOperationA" (lpFileOp As SHFILEOPSTRUCT) As Long
Public Const FO_DELETE = &H3
Public Const FOF_ALLOWUNDO = &H40

Public Sub Recycle(ByVal FileName As String)
Dim SHFileOp As SHFILEOPSTRUCT
Dim RetVal As Long
With SHFileOp
.wFunc = FO_DELETE
.pFrom = FileName
.fFlags = FOF_ALLOWUNDO
End With
'Send this poor soul to file hell
RetVal = SHFileOperation(SHFileOp)
End Sub
编程获取Google PR值方法集锦 第一个F#入门程序Hello world 在F#中将函数作为一等对象的值 PHP获取Google PR值 ASP.NET(C#)获取Google PR值 android.appwidget类剖析 Android NDK之JNI使用例子 RemoteViews - Android Widget开发入门 ASP.NET如何用正则表达式得到网站页面中的所有链接 PHP实现图形验证码案例(1) Android Widget开发实例-电量监控 Android自带Widget - Clock指针钟表源代码分析 C#实现文件批量改名工具 PHP利用Google Chart API生成饼图 PHP操作SQLite数据库 PHP利用DomDocument创建XML文件 ASP.NET如何加密/解密URL网址 如何使用C#读取csv文件 三步骤实现ASP.NET(C#)项目中添加谷歌(Google Map)地图 使用C# ASP.NET以FTP客户端方式下载文件 ASP.NET如何用C#代码检测手机浏览器 使用C#读取上传的Excel文件 新版本SQL Helper类 C#使用iTextsharp生成PDF 在.NET里用iTextSharp库生成PDF文档 用itextsharp将ASP.NET页面导出到PDF中 什么是JQuery-JQuery API jQuery入门指南-JQuery API jQuery的核心部分-JQuery API $(elements)-JQuery API $(expr, context)-JQuery API 大虾们,帮我看看,这个错误和警告是什么原因造成的? 帮帮我吧 关于B/S报表? 怎样设置msflexgrid某一列的颜色? 用 DHCP 分配了二个网段的IP。 怎么能抓到密码? 在运行时想改变一个label的字体怎么改变,有没有做过的,label的属性在设计时是可以改的 fatal error C1010 找一个和VB的属性区一样的代码,控件或类库均可 如何调用在不同的窗体里自定义的过程 一个技术探讨问题,我想知道象在WORD等软件中插入图形或图象后,还能把它选择,并移动是怎样实现的? 请问:在另一个.asp文件中如何调用相同的变量? WEB初级应用问题 DIALOGBAR问题 请想报考明年的网络设计师的朋友进来聊聊 Oracle面向对象特征讨论,请进! 我学会VISUAL C++ 到底要多少时间 线程调试问题 大家一起进来讨论oracle和sql server的日志哦 请指教如果设置服务器端COM组件的权限,使终端可以访问到?分数好说啦,急,高手快帮忙! 如何把程序嵌入到widows Expolore 中? 今天心情特好!散分 在vc下怎样调出window下的“打开方式”对话框,他是类还是控件!请高手指点! 一个门外汉的问题~~~~ 谁知道windows共享密码如何算的 vc中asm怎么不執行? 在开始菜单点右键,拉出的菜单里的内容,怎么添加删除?? 帮忙找一个和VB的属性区一样的代码,控件或类库均可。 Word 中字体的问题 我买了一台SLE4442读写器, 为什么不能写 谁用过FAST REPORT 请求帮助 realplayer中文件菜单栏中的以看过的文件名,怎么删除??? php如何改写或者是添加一个cron的命令参数给linux服务器? SQL Server 能制作表单和报表吗?????? DirectDraw页面格式问题(两个)。答对100分绝对送上,从不食言!(附源码) VC++中的内部交互调试器在哪? 人邮版的C++面向对象高效编程如何? realplayer中文件菜单栏中的以看过的文件名,怎么删除? 如何实现真正的无标题栏的拖动? 用"select top n"取了前n纪录后,要再接着取n+1至2n条纪录,接着再取2n+1至3n……,这种取法要怎样实现呢? 如何在Excel中编制一个宏? 如何得知程序的一个实例正在运行? 送分了,送分了,虽然不多,但天天有! 为什么select count(*) from test 时,提示表或示图不存在!!! 请问如何设置mp3文件的在线播放?? 请问在内部局域网正常的情况下,打印机无法共享(共享以后没有效果)的主要原因是什么?谢谢! ===我对Linux上的Oracle8.1.7.0.1操作的时候只读,为什么啊???==== 请给我一个GetCurrentDirectory使用实例, 问一个深入MFC的简单问题 请问有关delphi项目编译的一个小问题。 各位,那里有VisualAge for Java4.0下在?我从ibm的网站上下载了,但是安装不了,说是语言不对! 两个数相除,商4余1,被除数,除数,商和余数的和是156,被除数,除数各是多少? 在三相异步电动机正反转控制电路中,若按下反转按钮,会出现什么情况 10千瓦以下的三相异步电动机的启动电流是多少?应该如何计算并选取空气开关?10千瓦以下的三相异步电动机启动时该如何选取空气开关大小?本人是个初学者, {an}为等比数列,公比r>1.a1+a2+a3=21及a1a2a3=216.(a)求通项an.用(a)结果求a1^a1a2^a2...an^an,n=1,2... 电气正反转控制电路中,自锁,机械互锁,电气互锁,分别有什么作用 求三相异步电动机的降压起动控制电路图 二项式 奇数项的二项式系数之和 与 偶数项的二项式系数之和 怎么求 ,求详解x=1,奇数项加偶数项之和x=-1,偶数项减奇数项为什么啊 两个数相除商是7.2,如果把被除数扩大10倍,除数不变,则商是().如果被除数、除数同时扩大5倍,则商是() 已知一长方形教室面积65平方米,如果把它的长扩大到原来的10倍,宽缩小到原来的1%,这个教室的面积应是多少? 三相异步电动机的正反转双重连锁加点动的控制电路图 两个数相除的商是15,如果除数不变,被除数缩小3倍,商应是().被除数乘10,除数(),商不变. 以知一个长方形的面积是65平方米,如果扩大到原来的10倍,宽缩小到原数的百分之一,面积是多少?如果有人知道4年级下的数学做业之数学广角? 求三相异步电动机控制回路及主电路图(要正反转能点动和连续运行) 两个数相除商是30,除数扩大5倍,使商不变,被除数必须()A.扩大5倍,B.缩小5倍,C.不变 一间教室的面积约为56平方米,它的百分之一和百万分之一是多少,用科学计数法表示.它的百分之一和百万分之一是多少平方千米? 下列式子的计算过程正确的是()A、5千克=49牛 B、5千克=5千克力=49牛 C、5千克=5千克X9.8牛/千克=49牛D、5千克x9.8牛/千克=49牛快,现在就要 两个数相除的商是6.2,如果被除数和除数都扩大到原来的10倍,商是( );如果被除数不变,除数缩小到原来的100分之一,商就( ),结果是( ) 3/4*3.14的x次幂的系数是多少 以下算式如何算?(1+7/505)+(1+7/505x2)+(1+7/505x3)+...+(1+7/505x99)+(1+7/505x100)1+1/2+2/2+1/2+1/3+2/3+3/3+2/3+1/3+...+1/10+//2/10+...+10/10+9/10+...+1/10 求图形的体积要体积公式和计算过程以及答案快 在单台的三相异步电动机的控制指示灯中,故障指示灯与哪个指示灯同亮,或者是单独亮? 下列程序段是计算 公式的:下列程序段是计算   公式的:  s=0;t=1  for I =1 to 10     t:=t*I    s:=s+t  Next I  A、s=1+2+3+……10       B、s=1*2*3*……10  C、s=1!+ (3x²+1/x)八次方 展开式中,则x七次方的二项式系数是? 三相异步电动机控制电路中如何使用发光二极管做指示灯三个电动机,两用一备,当某个电动机出故障时自动切换备用电机,要求用发光二极管做电源指示,运行指示,故障指示,每个电动机上都有 数学(2x+1/x^2)^n的展开式中,第三项的二项式系数比第二项的二项式系数大27,求展开式中的常数项 等比数列{an}中,a4=6,则a2·a6等于 把一块长和宽的比为5:3的长方形土地,用1/1000的比例尺画在图纸上,周长是16cm,实际面积是? (x-1/2x)^n的展开式第三项的二项式系数是15,则展开式中所有项的系数之和为……?我怎么也算不出n值~ 15KW的三相异步电动机的额定电流是多少啊? 已知an是等比数列,(a4+a8)(a6+a10)=49,则a5+a9等于 用计算机计算(6+2)*3时的按键顺序是/按7 x^ / (-) 5 * 3 .2 =能计算的算式是用计算机计算(6+2)*3时的按键顺序是按7 x^ / (-) 5 * 3 .2 =能计算的算式是A.7^2/8*3.2B.-7^2/5*3.2C.7^2/(-5)*3.2 D.7^2/5*(-3.2) 一台三相异步电动机为17千瓦,计算这台电动机的额定电流是多少? 在等比数列{an}中,a4+a5=10,a6+a7=20,则a8+a9等于 两个数相除商是2.33,如果被除数扩大5倍,除数缩小2倍,则商变为( ). 三相异步电动机的额定电流如何求?有一台三相异步电动机,额定功率为2.2千瓦,额定电压380v,功率因数0.86,效率0.88,求额定电流. (x+1/x)的九次方的展开式中X的三次方的系数为多少 若(3x-1/x)^n的二项式中,所有项系数和为64,n等于?为什么设x=0?是不是类似这种问题都能设x=0? 三相异步电动机知道额定功率求额定电流的算法要不要考虑电机的效率,那样可以经济些, 利用延时器星形转三角形降压启动电路图 若(3x-1/x)^n的二项式中,所有项系数和为64,n等于多少?为什么要令x=1,这是什么公式 关于三相异步电动机电动机额定电流的问题3KW以下的三相异步电动机 380V Y接法的额定电流和220V 三角接法时的额定电流是否是一样的? 鼠笼式三相异步电动机做星形连接时的线电流是做三角形连接时线电流的多少倍? 三相异步电动机双重互锁正反转启动反接制动的控制电路讲义 已知数列{an}中,a1=-2008点P(an,a(n+1))在直线x-y+3=0上,(1)求数列{an}通项公式(2)数列{an}的前多少项的和最小 星三角形降压启动电路帮忙分析下电路原理啊!和排故步骤! 请问怎么求二项式系数之和如题 技术经济题.贷款问题.求详细步骤.计算公式1. 某企业获得一笔10万元的贷款,偿还期为5年,按年利率10%计复利,分别计算以下4种还款方式每年还款额、5年还款总额及还款额的现值.(20分)(1) 三相异步电动机星-三角形降压启动控制1、画出继电器-控制器控制电路,说明工作原理.2、画可编程序控制器控制的I/O配线图.3、画可编程序控制器控制的梯形图. 9、设m为正整数,(x+y)2m展开式的二项式系数的最大值为a,(x+y)2m+1展开式的二项式系数的最大值为b若13a=7b,则m= ( )A、5 B、6 C、7 D、8 二项式系数与项的系数的区别 已知等比数列{an}中,a4=7,a6=21,则a8等于? (a+b)的九次方的各项二项式系数的最大值是多少 如何求证二项式系数之和Cn0,Cn1,Cn2,...,Cnn叫做展开式中的二项式系数,有Cn0+Cn1+Cn2+...+Cnn=2^n成立.如何求证以上公式? 一间教室长12米,宽8米,画在比例尺为1:300的平面图上,长应画()厘米,宽应画()厘米. 在二项式(a+b)^n的展开式中若第三项的系数是第二项系数的3倍,则n= 二项式系数的和是什么? 一间教室长12米,宽8米,画在比例尺是1比400的平面图上,长应该画()厘米,宽应该画()厘米 两个数相除商4余1,被除数、除数、商、余数的和是156,求被除数和除数各是多少?用分步 这个计算公式,是什么? 计算这个式子,详细过程
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn