Sub删除所有空文件夹()DimstrpathAsStringstrpath=Application.InputBox(prompt:="请输入文件夹,名称:",_Title:="输入文件夹名称",Default:=thisworbook.Path,Type:=2)Ifstrpath="False"Orstrpath=""ThenExitSubCalldelemtydir(st

///<summary>///保存图像到本地///</summary>///<paramname="wtbBmp"></param>///<paramname="name"></param>///<paramname="strDir"></param>///<returns></returns>

网上找到一个开源的Qt插件，下载下来，生成头文件和库文件，可以不依赖电脑是否安装Excel软件，是否有Excel驱动，可以直接输出excel文档https://github.com/dbzhang800/QtXlsxWriter/tree/master/src/xlsx#include"CopyAllFileThread.h"#include<QFileInfo>#include"LocalDb.h"#inc

privatevoidFormMain_Load(objectsender,EventArgse){ShareDirec();}publicvoidShareDirec(){ManagementClassmanagement=newManagementClass("Win32_share");ManagementBaseObjectinParams=management.GetMethodParameters(&qu

1SubreadArrByte()2DimstrPathAsString,ArByte()AsByte3DimintFileLenAsInteger4'配置路径、字节数组5strPath=ActivePresentation.Path'6strPath=strPath&"\"&"ByteFile-副本.txt"

使用webview2显示PDF文件需要wvliulanqi--Webview2控件的 AwaitWv2.EnsureCoreWebView2Async函数来启动浏览器否则会报错注意Div的宽度高度PrivateSubButton1_ClickAsync(senderAsObject,eAsEventArgs)HandlesButton1.ClickDimstrPathAs

BOOLWriteCsv(CStringstrText){CStringstrPath;strPath.Format(_T("D:\\CSV"));if(!CFileSystemHelper::IsDirectoryExist(strPath))//判断目录存不存在{CFileSystemHelper::CreateDirectory(strPath);//可创建递归目录}CString