-
VB6.0 获取网络连接信息
VB6.0 获取网络连接信息,在如图所示的窗口中,点击按钮即可获取显示本机的网络连接信息,这些信息包括:
是否通过LAN连接、是否通过Modem连接、是否通过Proxy连接、是否在线连接、是否安装了网络RAS等信息。获取完成最后可提示:“系统通过LAN与Internet连接,系统安装了远程访问服务”。
- 2023-05-26 06:40:02下载
- 积分: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
-
VB NET sqlserver 销售管理系统
VB NET sqlserver 销售管理系统,销售业务,销售发货,销售退货,回款管理,统计报表,基础信息管理、系统设置、备份和恢复数据、货品基本信息管理、业务员管理等。
版权所有(C) 作者个人自由创作室
VB.NET 销售管理系统 V1.0,SQLSERVER2000数据库。
- 2022-03-16 19:52:06下载
- 积分:1
-
VB 写的拼图 用数字代表图片
VB 写的拼图 用数字代表图片,将数字的顺序排列好,就完成了拼图,比起图片版的拼图,要简单多了。
玩法:将数字1挪动到最开始的位置,如何移动?要把占位的数字一个一个挪开,依次为1、2、3等数字让位,把整体排序好,就拼好了。
- 2022-07-23 16:53:18下载
- 积分:1
-
VB.NET 多线程TCP端口扫描工具
VB.NET 多线程TCP端口扫描工具,使用前请输入要扫描的网段IP和端口,本程序可将扫描到的开放端口数量显示在窗口中,扫描时应用了多线程技术,扫描时显示当前线程数,适时显示扫描进度和扫描时间,以毫秒计时,扫描速度提升了不少。
注:本程序仅能扫描开放的端口,被禁止和未开放的端口不能被扫描到。
- 2022-05-25 05:47:04下载
- 积分:1
-
药品管理程序源码Vb 6.0 SqlServer
一款基于VB开发的药品管理程序,数据库采用SqlServer,运行之前首先在SQL查询分析器里执行SQL目录下的myMedsys.sql脚本.大家可根据源程序代码自行扩展程序,二次开发完善。
- 2022-04-24 20:15:24下载
- 积分:1
-
VB删除指定路径下的文件夹【目录】
VB6.0 删除指定路径下的文件夹【目录】 ,删除时请输入要删除文件夹的所在路径和名称,单击按钮即可。支持遍历目录删除文件,我觉得这是一个挺好的使用FSO操作的VB范例,对于VB新手学习相关的文件操作有很好的帮助。
- 2022-03-19 05:31:28下载
- 积分:1
-
VB 利用Tag属性存储用户名
VB 利用Tag属性存储用户名
If Text1.Text = "" Or Text2.Text = "" Then
MsgBox "用户名或密码不能为空", vbCritical, "信息提示"
Exit Sub
Else
If Text1.Text = "TSoft" And Text2.Text = "111" Then
Me.Tag = Text1.Text
Frm_Main.Show 1
Unload Me
Else
MsgBox "输入的名户名或密码不正确", vbCritical, "信息提示"
End If
End If
- 2022-02-04 07:45:58下载
- 积分:1
-
VB6.0 使用递归过程实现阶乘运算
VB6.0 使用递归过程实现阶乘运算
Function F(n As Integer) As Single
If n > 1 And n
- 2022-04-27 22:53:13下载
- 积分:1
-
VB为Lable标签着色(填充不同颜色)
VB6.0为Lable标签着色(填充不同颜色),把标签分别填充上不同的颜色,在显示一些统计数据的时候,可清淅的显示出各种数据类型,提升用户浏览体验。
为Lable着色是非常简单的,你可以从本例子中学会用法。
- 2022-02-05 08:55:36下载
- 积分:1