-
VB6.0 获取网络连接信息
VB6.0 获取网络连接信息，在如图所示的窗口中，点击按钮即可获取显示本机的网络连接信息，这些信息包括：
是否通过LAN连接、是否通过Modem连接、是否通过Proxy连接、是否在线连接、是否安装了网络RAS等信息。获取完成最后可提示：“系统通过LAN与Internet连接，系统安装了远程访问服务”。
- 2023-05-26 06:40:02下载
- 积分：1
-
vb 拉霸游戏源代码
vb 拉霸游戏，这个游戏我没玩过，玩上去像是抽奖的游戏，有个杠杆可以搬动，搬动后左边的数字滚轮会不停的变化，右边可以设置难度等级，同时这个游戏的窗口也是很特别的，采用不规划的椭圆形，在设计创建不规则的VB窗口时，本源码中的窗口编写技巧也是可以用上的，本游戏是由国外源码改写，在VB6.0环境下可直接编译运行。
- 2022-04-29 19:05:48下载
- 积分：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范例
VB6.0在状态栏中显示当前状态，演示程序以一个画图程序来演示窗口状态栏的变化，当我们画直线、执行操作： 画正方形，执行操作： 画圆的时候，会显示出状态，要注意观察窗口的状态栏上的文字提示信息。这种形式现在不算什么高大上功能了，很早的VB示例中就实现了，因此本源码比较基础了，高手请绕行。
- 2023-03-24 17:45:04下载
- 积分：1
-
VB NET写的DVD播放器源代码
播放器窗口界面中的操作菜单，实现了弹出菜单的功能，把控制菜下的各菜单项添加到弹出式菜单ContextMenuStrip1中。
播放器功能支持DVD格式的视频播放，包括了暂停、播放、停止、弹出等功能。
本播放器程序依赖于AxInterop.MSWEBDVDLib.dll、Interop.MSWEBDVDLib.dll。
- 2023-05-18 15:05:03下载
- 积分：1
-
vb.net 串口通讯测试项目源码
vb.net 串口通讯测试项目源码，本源码用于练习SerialPort控件、DataReceived事件、16进制操作，同时用于工程需要。作者：李潇海。
运行后先检测测试需用的COM端口是否打开，弹出提示。
测试时请确保发送周期为正整数！串口测试窗口中，可配置参数：端口、波特率、检验位、数据位、停止位等，支持以十六进制发送和接收数据，还可以毫秒定时发送数据。操作方式上，可设置自动清空测试数据，发送文件或发送数据等。右侧为串口测试时的结果显示区。
- 2023-02-14 09:00:03下载
- 积分：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
-
VB6.0 WinLock-锁住计算机 沐风视窗锁
VB6.0 WinLock-锁住计算机 实现锁定电脑的功能，沐风视窗锁，程序由沐风工作室开发编写，锁定计算机后，按下回车键后请输入解锁密码才能解锁屏幕，另外这个锁屏程序还可以设置自启动、效验密码等功能。
本程序同时支持卸载，当用户点击 卸载按钮后，即将完成删除，程序将运行卸载程序。
温馨提示：第一次使用,请输入密码。密码设置成功,程序将重新启动。
- 2022-08-12 14:41:19下载
- 积分：1
-
VB6.0使用InPutBox显示密码输入框
VB6.0使用InPutBox显示密码输入框，InPutBox大部分情况下是用于输入数据，与用户交互，但这些数据并不是密码类型的，本实例是展示是使用InPutBox作为密码输入框，其实也是挺简单的：
Private Sub Command1_Click()
On Error GoTo Err_Out
Dim lTemp As Long
Dim sTemp As String
lTemp = SetTimer(Me.hwnd, NV_INPUTBOX, 1, AddressOf TimerProc)
sTemp = InputBox("请输入密码", "密码输入框")
Err_Out: End Sub
- 2023-02-13 07:30:04下载
- 积分：1
-
telnet VB源代码
一个不错的VB TELNET实现源码,虽然很简单,但是对于新手来说比较容易学习
- 2023-02-26 22:25:03下载
- 积分：1
