VB写的一个轻型仿写字板文档编辑器源码

vb 演示如何去除字符串结尾空格，把输入框中的含有空格的字符串，全部过滤掉空格，这个源码似乎有上结简单了，使用RTrim()，一行代码即可搞定： 　　Private Sub Command1_Click() 　　 Text2.Text = RTrim(Text1) 　　End Sub 　　主要是使用了RTrim()函数，这个函数不只是过滤行尾空格，也会将字符串中间空格过滤掉。

vb.net vs2008读取INI文件示例，ini文件名为 Send.ini，代码中包括了一个读ini API函数。 　　Ini文件说明： 　　[节名] []中的节名对应此API的第一参数 　　Name=内容 Name对应此API的第二参数 　　API的第三参数是没有取到匹配内容时返回的字符串; 　　API的第四参数是要返回的字符串; 　　API的第五参数是字符串缓冲的长度，一般255; 　　API的第六参数是INI文件的路径。

VB利用地址偏移访问内存，整个处理过程 封装在事件函数中，用户单击后，执行以下代码： 　　Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long) 　　Private Sub Form_Load() 　　 Dim i As Long 　　 Dim j As Long 　　 i = 1234 　　 j = 4321 　　 Debug.Print VarPtr(i) 　　 Debug.Print VarPtr(j) 　　 CopyMemory ByVal VarPtr(i), ByVal VarPtr(i) - 4, 4 　　 Text1.Text = i 　　End Sub

VB 演示如何获取星期名称，这里获取星期几是使用了VB内置的WeekdayName函数，将获取到的日期和星期几直接显示在Text控件中，下面是这个函数的具体用法： 　　Private Sub Command1_Click() 　　Text2.Text = WeekdayName(Weekday(CDate(Text1)), vbMonday) 　　End Sub 　　Private Sub Form_Load() 　　Text1.Text = Date 　　Text2.Text = WeekdayName(Weekday(CDate(Text1)), vbMonday) 　　End Sub 　　在VB6.0 IDE环境中编译此源代码，生成如演示截图所示的运行效果。

VB.NET 多线程TCP端口扫描工具，使用前请输入要扫描的网段IP和端口，本程序可将扫描到的开放端口数量显示在窗口中，扫描时应用了多线程技术，扫描时显示当前线程数，适时显示扫描进度和扫描时间，以毫秒计时，扫描速度提升了不少。 　　注：本程序仅能扫描开放的端口，被禁止和未开放的端口不能被扫描到。

VB制作可移动按钮位置的工具栏，这个窗口中的Toolbar允许用户自己调整位置，可以拖动至指定位置，记得word中的工具栏就是这样，当你改变默认的工具栏布局时，程序会使用 MsgBox ("您确实要调整工具栏按钮的位置吗？")弹出确认信息。另外，本范例也可看作是一个在VB窗口中制作图标菜单的好范例，如示例图所示的效果。

内核为VB6的一个下载软件开源源码， 界面方面支持悬浮窗、支持TAB窗口选项卡切换内容，操作方便，关于下载文件方面，已经实现的功能： 　　1.同时下载两个文件 　　2.支持断点续传 　　3.支持代理服务器 　　使用方法： 　　1.双击开始或停止 　　2.其他按鼠标右键

VB6.0 删除指定路径下的文件夹【目录】 ，删除时请输入要删除文件夹的所在路径和名称，单击按钮即可。支持遍历目录删除文件，我觉得这是一个挺好的使用FSO操作的VB范例，对于VB新手学习相关的文件操作有很好的帮助。

一个实现图像的旋转效果实例，由VB6.0编写，前几年的源码，本程序实现图片的逆时针旋转90度，单击窗口中的按钮即可实现旋转功能，这部分代码，可参考如下代码： 　　逆时针旋转90度 　　Private Sub Command2_Click() 　　 For j = 0 To h Step 1 　　 For i = 0 To w Step 1 　　 BitBlt Picture2.hDC, i, j, 1, 1, Me.Picture1.hDC, j, i, srCopy 　　 Next i 　　 Next j 　　End Sub

vb6.0 编程实现字节数组和字符串的相互转换，演示如何进行字节数组和字符串的相互转换.