登录
首页 » VB源码 » VB6.0检查是否有拨号连接

VB6.0检查是否有拨号连接

于 2022-07-25 发布 文件大小:2.98 kB
0 66
下载积分: 2 下载次数: 1

代码说明:

VB6.0检查你的电脑是否有拨号连接,获取本机的网络连接列表,重点是检测是否有拨号网络连接。

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • 一个实现图像旋转效果的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
    2023-07-06 04:55:02下载
    积分:1
  • VB演示三种FileSystemObject文件操作方法
    FSO对象模型提供了三种创建和打开文件的方法:其实本示例是创建了FileSystemObject对象,然后用FSO对象的FileExists、CreateTextFile、OpenTextFile方法,对文件进行操作,演示了三种FSO对象的操作方法,对学习初级的FSO文件操作有相当好的帮助作用。
    2022-02-07 21:26:36下载
    积分:1
  • visual studio VB 学生信息管理系统
    用visual studio VB语言编写的学生信息管理系统 WINFORM 数据库采用的是ORACLE 
    2022-02-24 12:49:02下载
    积分:1
  • vb 6.0 排队叫号系统
    vb 排队叫号系统源代码,Cobeyond排队系统,程序分为了中心控制端、CyMobile管理系统、系统通讯端口设置、系统数据库设置、最大终端客户数设置、检查服务器名和端口号等众多子程序。本排队叫号系统可广泛应用于银行大厅排队叫号、便民服务大厅排队叫号等公共服务场所,系统涉及硬件、数据库及网络各方面的编程知识,是一套比较综合的VB管理系统。其中服务人员子程序打开后的界面如截图所示,源码包中还包括了排队叫号系统设计的流程图、网络拓扑结构图等编程资料,请下载源码包查看详情。
    2022-02-21 04:44:48下载
    积分:1
  • VB Http proxy代理服务器
    Http proxy,由VB6.0编写的代理服务器的源码,要测试代理示例,请单击“LISTEN”按钮并使用浏览器访问代理。 代理端口是3280.您当前的IP是192.168.1.2,此例程等待浏览器发送HTTP请求标头。 收集所有必要信息后,它连接到真实服务器并传递标头数据。   打开程序后,可单击监听按钮,实现代码服务的监听功能,也可适时停止这个功能。   本源码来自于国外。
    2022-09-10 03:25:03下载
    积分:1
  • vb6.0 字节数组和字符串的相互转换
    vb6.0 编程实现字节数组和字符串的相互转换,演示如何进行字节数组和字符串的相互转换.
    2023-03-14 07:50:04下载
    积分:1
  • vb IsDate判断字符串是否为日期或时间
    vb 判断字符串是否为日期或时间,在输入框输入任意字符串类型,程序将会判断出该字符串是否是时间字符串,这个判断方法VB员自带有函数,使用IsDate即可实现,下面是使用IsDate的简单用法示例:   If IsDate(Text1) = True Then    Text2.Text = "是日期"   Else    Text2.Text = "不是日期"   End If   您也可以在本页下载完整的源码实例。
    2022-08-18 06:21:54下载
    积分:1
  • VB在数据库端禁止录入重复数据
    VB在数据库端禁止录入重复数据,对插入的数据进行判断,在写入数据库时进行判断是否已经存在于数据库中,判断是基于数据库的,数据库采用的是Access,在数据库端进行重复数据判断:   rs1.Open "select * from 客户类别表 where 客户类别= + Text1(0) + _    ", Cnn, adOpenKeyset, adLockOptimistic   If rs1.RecordCount > 0 And Text1(0) DataGrid1.Columns(0) Then    MsgBox "此记录已存在!", , "提示窗口"   Else    Cnn.Execute ("update 客户类别表 set 客户类别 = + Text1(0) + ,备注= + Text1(1) + _    ,修改日期= + Str(Date) + where 客户类别= + DataGrid1.Columns(0) + ")    Adodc1.Refresh    tlbState Toolbar1, False    Text1(0).Locked = True: Text1(1).Locked = True   End If
    2022-08-14 15:01:13下载
    积分:1
  • VB6.0 获取汉字拼音简(首字母)
    VB6.0 获取汉字拼音简码,获取汉字拼音首字母,这个比较实用了,现在很多地方都会取首字母作为编号、帐号之类的,代码比较多,这里就不帖核心代码了,大家自行下载本源码吧,运行的效果如截图所示。
    2022-04-15 06:44:52下载
    积分:1
  • VB.NET API函数画线条示例
    VB.NET API函数示例,使用VB api函数画线条的一个例子,如图所示的效果中,鼠标单击两端,即可画出一条直线,主要是学习使用VB.NET中的API画图函数用法。示例运行效果请参见截图所示,本页提供该实例的源码下载。
    2022-03-22 10:44:12下载
    积分:1
  • 696518资源总数
  • 105570会员总数
  • 13今日下载