VB拦截Windows Explorer删除进程，内含API HOOK，源代码：倒霉蛋儿，程序有时候也会窗口勾挂失败！ 　　勾住了SHFileOperation等函数，DLL用Delphi写的C会的太少，查了半天才知道原来explorer是用SHFileOperation删除文件，经过测试很稳定，没有出现崩溃的情况，由于只勾住了SHFileOperation函数，所以别的程序要是调用DeleteFile删除文件，拦截不到，要是想拦截DeleteFile自己接着写吧。 　　 　　mod_Inject.bas类的注释摘录： 　　Dim MyAddr As Long ‘执行远程线程代码的起始地址。这里等于LoadLibraryA的地址 　　‘dll文件路径 　　MyDllFileLength = LenB(StrConv(MyDllFileName, vbFromUnicode)) + 1 　　 ‘这里把dll文件名从Unicode转换成Ansi，否则英文字母是2个字节。 _ 　　顺便说一下，学过C的应该知道字符串要以/0标志结尾，所以dll文件名长度要加上1个字节存放Chr(0) 　　‘得到进程的句柄 　　在目标进程中申请分配一块空白内存区域。内存的起始地址保存在MyDllFileBuffer中。 _ 　　这块内存区域我们用来存放dll文件路径，并作为参数传递给LoadLibraryA。 　　在分配出来的内存区域中写入dll路径径。注意第二个参数传递的是MyDllFileBuffer的内容， _ 　　而不是MyDllFileBuffer的内存地址? 　　If MyReturn = 0 Then Inject = False 　　MyAddr = GetProcAddress(GetModuleHandle("Kernel32"), "LoadLibraryA") 　　‘得到LoadLibraryA函数的起始地址。他的参数就是我们刚才写入的dll路径。但是LoadLibraryA本身是不知道参数在哪里的。 _ 　　接下来我们就用CreateRemoteThread函数告诉他参数放在哪里了? If MyAddr = 0 Then Inject = False 　　MyResult = CreateRemoteThread(ProcessHandle, 0, 0, MyAddr, MyDllFileBuffer, 0, 0) 　　好了,现在用CreateRemoteThread在目标进程创建一个线程，线程起始地址指向LoadLibraryA， _ 　　参数就是MyDllFileBuffer中保存的dll路径? 　　 If MyResult = 0 Then 　　 Inject = False 　　 Else 　　 Inject = True 　　 End If 　　 ‘接下来你可以使用WaitForSingleObject等待线程执行完毕。 _ 　　 并用GetExitCodeThread得到线程的退出代码，用来判断时候正确执行了dll中的代码。 　　 CloseHandle MyResult 　　 CloseHandle ProcessHandle 　　 ‘扫地工作 　　End Function

标题中的“VB修改文件时间.rar”表明这是一个使用Visual Basic（VB）编程语言编写的程序，其功能是修改文件的创建时间。在计算机系统中，文件的属性包括创建时间、修改时间和访问时间，这些时间戳通常反映了文件在系统中的生命周期。这个程序提供了一种方法来改变这些时间戳，可能用于教学目的或者特定场景下的应用。 描述中提到，“VB修改文件创建的时间”是指通过VB代码可以改变文件的创建日期和时间。这可能涉及Windows API调用，因为VB标准库本身并不直接提供修改文件元数据（如创建时间）的功能。开发者可能使用了如`kernel32.dll`这样的系统库，通过函数如`SetFileTime`来实现这一操作。描述中还暗示了这种技术可能用于“不真实的事情”，这提示我们，尽管这类技术有其教育价值，但滥用可能会有道德或法律风险，比如误导他人或在某些情况下构成欺诈。 “VB源码-文件操作”标签进一步确认了这是一个关于文件操作的VB编程示例。在VB中，处理文件通常涉及到`FileSystemObject`或`IO`命名空间的类。通过这些对象和类，开发者可以读取、写入、移动或重命名文件，以及更改其属性。 虽然没有提供具体的代码细节，但我们可以推测这个压缩包中的“codesc.net”可能是一个源代码文件或者包含源代码的网页链接，展示如何在VB中实现修改文件时间的功能。通常，这样的代码会包括打开文件，获取当前时间戳，设置新的时间戳，然后保存更改的过程。可能的步骤如下： 1. 引用必要的API库，如`kernel32.dll`。 2. 定义结构体以存储文件时间信息，例如`FILETIME`结构。 3. 使用`GetFileTime`函数获取文件的原始创建时间。 4. 创建一个新的`FILETIME`结构，设置为想要的新时间值。 5. 调用`SetFileTime`函数，传入文件句柄和新旧时间信息，更新文件的创建时间。 6. 确保正确关闭文件句柄。 请注意，修改文件时间戳的行为应当谨慎，因为它可能违反数据完整性和安全性规定，甚至触犯法律。在实际应用中，应确保遵循合法和道德的使用原则。

在VB（Visual Basic）编程环境中，使用WebBrowser组件可以实现打开和显示Word文件的功能。WebBrowser组件实际上是一个内置的浏览器控件，它允许我们在应用程序中嵌入网页浏览功能。在这个特定的例子中，开发者利用WebBrowser组件来加载和展示Word文档的内容，而无需直接调用Microsoft Word应用程序。 我们需要理解WebBrowser组件的基本用法。在VB中，添加WebBrowser组件到窗体（Form）是通过控件工具箱完成的。双击该组件，我们可以设置其属性，例如`Url`属性，用于指定要加载的网页或文件地址。在处理Word文件时，这个地址通常会指向一个`.doc`或`.docx`文件的本地路径。 为了实现Word文件的显示，VB代码会使用以下步骤： 1. **创建WebBrowser对象**：在VB代码中，我们需要创建一个WebBrowser对象实例，如`Dim webBrowser1 As WebBrowser`。 2. **设置Url**：将WebBrowser对象的Url属性设置为Word文档的路径，例如`webBrowser1.Url = New Uri("C:\path\to\your\document.docx")`。 3. **导航事件**：由于WebBrowser组件加载文件是异步进行的，我们需要监听`DocumentCompleted`事件，确保文件完全加载后执行后续操作。例如： ```vb Private Sub webBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles webBrowser1.DocumentCompleted ' 在这里处理文件加载完成后的事情 End Sub ``` 4. **兼容性问题**：值得注意的是，WebBrowser组件实际上是基于Internet Explorer的，所以它可能受到IE版本限制的影响。如果Word文档包含较新的格式或特性，旧版本的IE可能无法正确显示。因此，确保系统上的IE版本能够支持Word文件的内容是非常重要的。 5. **权限与安全**：这种方法依赖于用户的系统环境，包括是否安装了Microsoft Office，以及Office的安全设置是否允许WebBrowser组件访问文件。如果用户没有安装Word或者安全设置不允许，可能会导致加载失败。 6. **替代方案**：除了WebBrowser组件，还有其他方法可以实现类似功能，例如使用COM自动化（Automation）直接控制Word进程来读取和显示文档，或者使用第三方库如Aspose.Words等。 总结，VB中基于WebBrowser组件打开Word文件是一种间接但实用的方法，它依赖于系统环境和IE浏览器的兼容性。开发时需要注意文件路径的正确性、文件的加载状态以及用户系统的兼容性问题。此外，对于更复杂的需求，可能需要寻找更为稳定和强大的解决方案。

标题中的“Excel内容异同比对VB代码演示.rar”指出，这是一个使用Visual Basic（VB）编写的程序，其目的是对比和检查两个Excel文件的内容差异。在IT领域，这种功能通常用于数据验证、审计或数据分析，确保两个数据源的一致性。 描述进一步解释了这个程序是一个示例，展示了如何在VB中实现Excel文件的比较。通过分析和运行这个程序，用户可以学习到VB如何处理Excel文件，包括读取、比较和显示不同之处。这涉及到VB的Excel对象模型，如Workbook、Worksheet、Range等，以及相关的编程技巧。 标签“VB源码-文件操作”表明，重点在于VB的文件处理能力，尤其是与Excel文件交互的部分。在VB中，这通常涉及使用Microsoft Excel Object Library，调用诸如Workbooks.Open、Worksheets.Copy、Range.Value等方法来打开、操作和读写Excel文件。 在压缩包内的文件“codesc.net”，很可能包含了源代码和可能的说明文档。如果源代码可用，用户可以查看具体的编程实现，例如： 1. 如何使用`Workbook.Open`打开Excel文件。 2. 如何使用`Worksheets`集合访问工作表，并使用`Range`对象选取特定区域进行比较。 3. 使用循环和条件语句（如If...Then...Else）来检测并标记不一致的数据。 4. 可能会用到的错误处理机制，如`On Error`，以处理可能的运行时错误。 5. 如何将结果输出或者显示给用户，可能是通过消息框（MsgBox）或者在新的Excel工作表上。 学习这样的示例，开发者可以提升在VB中操作Excel文件的技能，这对于需要处理大量结构化数据的项目尤其有用。这不仅可以帮助自动化重复的任务，还能提高数据处理的效率和准确性。同时，理解VB代码的基础结构和逻辑，对于进一步学习其他编程语言和开发工具也有很大帮助。 这个压缩包提供的资源是一个宝贵的VB学习素材，特别是对于那些需要进行Excel数据处理和比较的IT专业人士。通过深入研究和实践，开发者可以掌握更多关于VB文件操作和Excel接口的知识，增强自身的编程技能。

VB关于文件操作的编程小例子，实现目录的复制、删除和移动，设定源目录、目的目录，可快速复制、删除、文件。

VB6.0 批量替换文件，可以遍历文件夹及文件夹下所有文件，指定原始目录后，将文件替换到目标文件夹中，替换过程将显示在目录列表中。这个程序中的一些文件操作类可用到其它的程序中。

VB监控指定文件夹里的文件操作，比如新建、删除、重命名等。当程序发现文件夹内的内容改变时候会弹出提示框，对大家编写文件夹加密、文件夹监控软件应该有点帮助吧。很早前从网上下的，希望大伙共同修改、共同完善; 觉得有待修改的地方有： 1、在该指定文件夹里新建文件夹没有弹出更改提示(除此，建立其他文件都有提示); 2、怎么样控制用户只能在该文件夹里新建或者拷贝指定类型文件，如只允许在该指定文件夹里面建立*.txt文件; 测试时你可以在D盘建立一个checktest目录，点击Begin按钮后，在上述目录里任意建立、删除、重命名文件就可以看到提示了。

VB读取TXT文件内容，读取文件的一个例子，将一段文字保存在“vb100例.txt”中，程序运行后，通过点击“读取文本”按钮，可直接读取出TXT文件中的内容。

VB文本批量修改文件名，批量重命名工具，设置路径，选择根据的文件名，即可批量改名，操作极其简单，功能实用。但是代码比较古老了一些，下载后运行的时候可能会提示缺少控件。

VB在二进制文件中提取图像文件，提取VB源码中二进制文件中的所有图片资源ReadFrxRes，程序将最先分析一些二进制文件，诸如frm/frx,ctl/ctx等文件内的图像文件存储方式，然后把图像文件的Byte数组转换成StdPicture类型，再用PictureBox控件直接显示出图片。要注意，在使用PictureBox的时候，可能后面随着控件的不同会附着一些数据，再后面才是图片数据，使用BytesToPicture不能显示ICO文件和Cur文件,其它一般的图片格式可以正常显示。