-
VB6 获取当前打开窗口数量
VB6 获取当前打开窗口数量，如何获取当前打开窗口数量，本示例打开一个窗口后，在测试时会打开另外一个窗口，然后主窗口中会统计到这个打开的窗口，把当前打开窗口的数量填入文本框中。本程序可学习一下DoEvents()的用法。调用新窗口显示可参考以下代码：
Private Sub Command1_Click()
Form2.Show
Call Form_Activate
End Sub
Private Sub Form_Activate()
Text1.Text = DoEvents()
End Sub
- 2022-07-19 06:40:19下载
- 积分：1
-
vb.net 键盘鼠标全局线程钩子
vb.net 键盘鼠标全局线程钩子实例源码，源码中包括了HOOk的源码和Test项目源码，HookCode目录中是HOOk的源代码，TestForm为测试源码。测试时请把hookcode目录中生成的TheHook.dll文件拷贝至TestForm目录的bin目录下，与exe同级，运行效果如下图所示。
- 2022-01-21 21:24:31下载
- 积分：1
-
VB MSChart图表控件实例:柱状图的实现
VB 柱状图生成的例子,看看,是不是很实用的图表效果,这种图表也叫做直方图表,这是纵向的,也有横向的柱状图.本柱状图的生成是使用了Vb内置的微软图表控件MSChart控件,因此可看作是此控件的应用范例.
- 2022-04-15 23:55:01下载
- 积分：1
-
VB.net与OMRON CP系列PLC通讯的实例
VB.net与OMRON CP系列PLC通讯，截图是辅助程序：FCS校验计算器的运行效果，与PLC通讯的实例在PLC-PC文件夹下，源码在VB.NET环境编译。
LBIndustrialCtrls.dll放在debug目录中，与exe文件同级。
- 2023-03-30 11:55:03下载
- 积分：1
-
vb 判断经历多少个工作日
vb 判断经历多少个工作日，在两个日期选择器中选择日期值，然后判断选定的两个日期之间相差了多少天，判断两个定点之间的天数，比较基础，但也很有必要学习，时间和日期计算在很多软件中都要用到，这个例子相对简单些。大致代码：
If IsDate(Text1) = True And IsDate(Text2) = True Then
Dim i As Integer
i = gongzuori(CDate(Text1), CDate(Text2))
Label3.Caption = "经历" & i & "个工作日"
Else
MsgBox "请输入日期型"
End If
- 2022-03-03 21:14:10下载
- 积分：1
-
VB Socket获取主机名和IP地址
VB Socket获取主机名和IP地址，获取主机名是使用了VB中的GetComputerName直接得到，然后对Socket初始化，使用gethostbyname取得主机地址，再获取到IP后进行转化为标准的IP格式。转换过程如下：
RtlMoveMemory host, hostent_addr, LenB(host)
RtlMoveMemory hostip_addr, host.hAddrList, 4
ReDim temp_ip_address(1 To host.hLength)
RtlMoveMemory temp_ip_address(1), hostip_addr, host.hLength
For i = 1 To host.hLength
ip_address = ip_address & temp_ip_address(i) & "."
Next i
ip_address = Mid$(ip_address, 1, Len(ip_address) - 1)
MsgBox "IP:" + ip_address
- 2022-10-23 19:55:03下载
- 积分：1
-
简单的VB6 播放视频文件程序
简单的VB6 播放视频文件程序，也算是一个简单的视频文件播放器吧，核心基于Windows中的msdxm.ocx控件，可控制播放文件开始暂停、快进快退等简单操作，在测试时如果程序不能运行,将本目录中的msdxm.ocx文件拷贝到C:WINDOWSsystem32目录下,然后,在"开始"/"运行"中键入regsvr32 C:WINDOWSsystem32msdxm.ocx, 回车再运行程序即可.
- 2022-09-24 03:35:03下载
- 积分：1
-
超强的音频格式文件处理动态库
这个代码是一个支持不同音频格式的声音动态库文件，支持声音回放、音频编码、解码。他能解码（所以也能播放）WAV, MP3, OGG Vorbis, WMA, APE和CDA, 以及编码 WAV, MP3, OGG Vorbis, WMA和APE。在音频流回放上使用了 DirectSound 8(所以你需要dx8vb.dll),支持DSP,频谱分析，可视化效果等数据控制。文件夹内的示例说明：1、通吃音乐播放器 Ver 2.0（支持播放所有格式的音频文件，支持显示文件TAG,3种可视化效果（频率、时间、dBFS显示）；2、CD提取转换工具 Ver 1.0（提取CD内音轨并转换为所有的支持格式）；3、音频格式文件转换器 Ver 1.0（各种音频格式的相互转换）；4、简单示例（一个简单的背景回放示例）。需要说明的是其中需要的部分编解码文件需要第三方的支持，以下是下载地址： APE 和 MP3:
源码中已经包含了dx8vb.dll，编译前记得引用。
- 2023-04-25 07:40:03下载
- 积分：1
-
VB.NET 多线程TCP端口扫描工具
VB.NET 多线程TCP端口扫描工具，使用前请输入要扫描的网段IP和端口，本程序可将扫描到的开放端口数量显示在窗口中，扫描时应用了多线程技术，扫描时显示当前线程数，适时显示扫描进度和扫描时间，以毫秒计时，扫描速度提升了不少。
注：本程序仅能扫描开放的端口，被禁止和未开放的端口不能被扫描到。
- 2022-05-25 05:47:04下载
- 积分：1
-
一个使用Winsock控件的VB典型范例
一个使用Winsock控件的VB典型范例，架构为CS结构，由服务端和客户端组成，两者都运行后，可互通消息。调试步骤：
1）打开服务器端的“工程1.dsw”工程
2）点击运行按钮。
1）打开客户端的“工程1.dsw”工程
2）点击运行按钮。
3）此时服务器端和客户端已经建立连接
4）在服务器和客户端分别输入任何内容，另一端将会收到该内容并显示出来。
说明：必须先运行服务器端工程，再运行客户端工程。
- 2022-03-17 18:04:14下载
- 积分：1
