近期，火绒工程师在日常关注安全动态时发现，以仿冒软件的方式传播病毒

不要盲目地关闭windows11 VBS功能，全网都在讨论关闭WIN11 VBS功能可以提升电脑性能20%，WIN11用户听到这个消息恨不得立刻关闭 VBS功能，不要慌这关闭这个功能，先分析下你电脑的使用场景，如果使用场景有必要关闭此功能，在关闭也不迟。

在数据处理中，我们经常遇到时间数据存储为文本格式的问题，例如“3小时15分20秒”。这样的数据无法直接用于计算，而手动转换又非常繁琐。因此，我们可以使用 VBA 代码自动提取时间信息，并转换为标准的时间格式！

下面的 VBA 代码可以从包含“时、分、秒”的文本中提取时间，并转换为 Excel 可识别的 hh:mm:ss 格式。

本文于2023年9月21日首发于本人同名公众号：Excel活学活用，更多文章案例请搜索关注！

内容提要

思路与之前发送信息一样，将“文件”放入剪贴板中，就可以用CTRL+V，粘贴到微信信息框中实现发送文件了。

可是VBA 自带函数FileCopy 并不产生文件复制到剪贴板的效果，需调用Window API接口操作，代码如下。（来自EXCEL HOME论坛）

Private Declare PtrSafe Function RegisterClipboardFormat Lib "user32.dll" Alias "RegisterClipboardFormatW" (ByVal lpString As LongPtr) As Long
Private Declare PtrSafe Function OpenClipboard Lib "user32" (ByVal hWnd As LongPtr) As Long
Private Declare PtrSafe Function CloseClipboard Lib "user32" () As Long
Private Declare PtrSafe Function SetClipboardData Lib "user32" (ByVal wFormat As Long, ByVal hMem As LongPtr) As Long
Private Declare PtrSafe Function EmptyClipboard Lib "user32" () As Long
Private Declare PtrSafe Function GlobalLock Lib "kernel32" (ByVal hMem As LongPtr) As LongPtr
Private Declare PtrSafe Function GlobalUnlock Lib "kernel32" (ByVal hMem As LongPtr) As Long
Private Declare PtrSafe Function GlobalAlloc Lib "kernel32" (ByVal flags As Long, ByVal Size As Long) As LongPtr
Private Declare PtrSafe Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (ByVal hpvDest As LongPtr, ByVal hpvSource As LongPtr, ByVal cbCopy As Long)
'   API函数定义结束
Private Const CF_HDROP As Long = 15&
Private Const DROPEFFECT_COPY As Long = 1
Private Const DROPEFFECT_MOVE As Long = 2
Private Const GMEM_ZEROINIT As Long = &H40
Private Const GMEM_MOVEABLE As Long = &H2
Private Const GMEM_DDESHARE As Long = &H2000
'  结构定义开始
Private Type POINTAPI
  X As Long
  Y As Long
End Type
Private Type dropFiles
  pFiles As Long
  pt As POINTAPI
  fNC As Long
  fWide As Long
End Type
'  结构定义结束
Public Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

最近待在家太无聊，看了一下VB，下面教大家用VB做一个属于自己的小程序恶搞你的好友吧。

一.消息轰炸器

1.在桌面点击鼠标右键，新建一个文本文档。

2.在里面输入以下代码。

这里面有三行代码是可以根据你自己的需求进行更改的。

wshshell.AppActive"库里" ，双引号里面的文字是你的好友昵称，你要恶搞谁就把他的昵称填写进去。

欢迎搜索公众号：白帽子左一

每天分享更多黑客技能，工具及体系化视频教程（免费领）

微软在发布Windows 11时默认开启了基于虚拟化的安全性（VBS）和Hypervisor强制代码一致性检查（HVCI）两项功能，但这个决定引起了不小的争议。人们担心这些功能会对性能造成负面影响。

近日，有消息称Windows 10也开始默认打开了VBS功能。为了测试VBS是否会影响游戏性能，科技网站Tom's Hardware进行了一项测试。他们测试了15款游戏，包括DX11、DX12、Vulkan和光追游戏。

结果显示，关闭VBS之后有多达118组数据提升，而唯二下降的幅度属于误差范围。在分辨率和画质较低的情况下，VBS关闭后的性能提升最为明显，超过5%的变化有26组。

系统的学习了VBA之后，可以把一些重复的功能即成为一个函数过程，使用时直接调用即可。以下整理了一些实用的技巧，这些函数和子过程涵盖了文件操作、数据验证、地理计算、自动化任务等场景，可根据实际需求调整参数（如分隔符、保存路径等）。对于敏感操作，建议先在小范围测试后再全面使用。

　　之前写了一段vbs调用bat的代码，需要将vbs中的文件夹名称以参数的形式传递给bat，今天在使用过程中发现：当文件夹名称中含有空格的时候，bat会截取空格之前的部分。比如，当前文件夹C:\Program Files