-
telnet VB源代码
一个不错的VB TELNET实现源码,虽然很简单,但是对于新手来说比较容易学习
- 2023-02-26 22:25:03下载
- 积分：1
-
VB6 FileExists判断文件是否存在
VB6 判断文件是否存在，使用VB内置的函数FileExists来实现，可以说实现方法简单，直接调用函数（文件路径）即可，至于返回的结果，这里有两种形式，一种是以MsgBox的方式弹出窗口告之，另一种是返回布尔值，True或False，然后再进行相关处理。关于FileExists用法，有以下代码供参考：
Dim B As Boolean
B = FileExists(Me.Txt_Path.Text)
If B Then
MsgBox "文件存在"
Else
MsgBox "文件不存在"
End If
以上代码段封装在按钮事件中，用户单击按钮后，执行本段代码，判断指定的文件是否存在。
- 2022-07-04 15:21:27下载
- 积分：1
-
VB 网络连通检测
VB 网络连通检测，单击命令按钮可进行网络连通检测，判断是本机否连接到Internet。操作很简单，将连通测试检测结果输出到屏幕上。
- 2023-08-30 14:45:02下载
- 积分：1
-
VB.NET将任意图像文件设置为鼠标形状
VB.NET将任意图像文件设置为鼠标形状，变换光标，光标文件读取，支持自定义光标的图像文件格式为：图像文件（*.jpg;*.gif;*.png;*.bmp）。操作方法挺简单的，点击 按钮选择一个格式合适的光标文件即可，注意查看鼠标光标的变化。
- 2022-05-05 06:26:41下载
- 积分：1
-
VB生成圆形图表，圆饼百分比图表
VB成绩统计饼图，生成圆形图表，圆饼百分比图表的例子，这种图表相信大家见多了，这个例子介绍了VB简单生成圆饼图的方法，对初学VB的朋友会有帮助，通过这个图表，你可以了解绘图、填充、按比例分配、绘制扇形等是如何实现的，用它来显示优秀人数、良好人数、及格人数、不及格人数所占的比例，各个比例用不同的颜色填充，让结果一清二楚，源代码运行于VB6.0环境 ，运行效果如下图所示。
- 2022-05-15 05:38:34下载
- 积分：1
-
VB 记录鼠标行为，判断左键右键
VB 记录鼠标行为，记录用户是单击了鼠标右键或是左键，监控鼠标被单击了哪个键，核心的代码如下：
If GetAsyncKeyState(VK_LBUTTON) = -32767 Then
Text1.Text = Text1.Text + " 鼠标左键 "
ElseIf GetAsyncKeyState(VK_RBUTTON) = -32767 Then
Text1.Text = Text1.Text + " 鼠标右键 "
End If
- 2022-02-28 11:29:47下载
- 积分：1
-
VB NET写的DVD播放器源代码
播放器窗口界面中的操作菜单，实现了弹出菜单的功能，把控制菜下的各菜单项添加到弹出式菜单ContextMenuStrip1中。
播放器功能支持DVD格式的视频播放，包括了暂停、播放、停止、弹出等功能。
本播放器程序依赖于AxInterop.MSWEBDVDLib.dll、Interop.MSWEBDVDLib.dll。
- 2023-05-18 15:05:03下载
- 积分：1
-
VB 6.0将时、分、秒转换为时间
VB 6.0将时、分、秒转换为时间，就是把输入文本框中的内容，重新组合，并添加连接符，形成人们视觉习惯上的时间格式。
其实实现这个功能，不两行代码就可实现了：
Private Sub Command2_Click()
t = TimeSerial(Text1, Text2, Text3)
Label4.Caption = "时间为：" & t
End Sub
- 2022-08-15 03:56:46下载
- 积分：1
-
VB 6.0 在字符串中用一子串替换另一子串
VB 6.0 在字符串中用一子串替换另一子串，采用VB中内置的Replace函数来实现，类似这种的替换字符串方法，在平时使用十分广泛，在WEB编程的ASP/PHP/ASP.NET中，同样使用广泛。本示例中，主要是替换一个字符串中的指定位字符串，将其替换成其它字符。
关于Replace的用法，请看以下代码片段：
Text3.Text = Replace(Text1, Mid(Text1, 2, 2), Text2)
- 2022-01-26 05:32:59下载
- 积分：1
-
内核为VB6的一个下载软件开源源码
内核为VB6的一个下载软件开源源码， 界面方面支持悬浮窗、支持TAB窗口选项卡切换内容，操作方便，关于下载文件方面，已经实现的功能：
1.同时下载两个文件
2.支持断点续传
3.支持代理服务器
使用方法：
1.双击开始或停止
2.其他按鼠标右键
- 2022-10-17 00:05:03下载
- 积分：1
