-
VB6.0仿迅雷悬浮窗口（图标）的实现源码
VB6.0仿迅雷悬浮窗口（图标）的实现源码，迅雷的悬浮窗相信大家很熟悉了，其实就是显示一个图标，悬浮在屏幕上，通过这个悬浮图标可单击右键调出菜单，双击图标则会显示主窗口，本源码模拟了悬浮窗口的实现，另外是模拟了悬浮窗口双击显示主窗口的功能。代码中注释不多，不过没有使用过多复杂的代码，对VB新手友好。
- 2022-03-24 09:58:35下载
- 积分：1
-
VB 演示如何使用WeekdayName获取星期名称
VB 演示如何获取星期名称，这里获取星期几是使用了VB内置的WeekdayName函数，将获取到的日期和星期几直接显示在Text控件中，下面是这个函数的具体用法：
Private Sub Command1_Click()
Text2.Text = WeekdayName(Weekday(CDate(Text1)), vbMonday)
End Sub
Private Sub Form_Load()
Text1.Text = Date
Text2.Text = WeekdayName(Weekday(CDate(Text1)), vbMonday)
End Sub
在VB6.0 IDE环境中编译此源代码，生成如演示截图所示的运行效果。
- 2022-11-30 01:55:03下载
- 积分：1
-
Vb.NET 贪吃蛇游戏
游戏说明：
1、控制键
“回车键”-----新游戏或终止游戏
“5”（数字键区的）----暂停或恢复
方向控制键（数字键区的）
“8、2、4、6”----对应控制“上、下、左、右”移动
“1”-----“左下”移动
“3”-----“右下”移动
“7”-----“左上”移动
“9”-----“右下”移动
2、地图
蓝色方块----食物（吃到食物后，蛇身长度增加一节）
红色方块----炸弹（吃到炸弹，所得分数会减去当前级别数的2倍）
地图上一次出现2个食物和1个炸弹，被蛇吃掉后会随机位置补充
灰色方块----蛇头
绿色方块----蛇身
暗海洋绿方块----奖品
当玩家吃到的食物或者炸弹达到5个时就会随机出现一次奖品，奖品
上的数字表示吃到奖品后会增加的分数。每个奖品的初始分数是20--50
之间的随机数，当奖品出现后就会开始不断的减少，所以玩家要尽快吃
到才能增加到更多的分数。
3、计分方法
每吃到一个食物，增加的分数等于当前级别的数值；
每吃到一个炸弹，扣掉的分数等于当前级别数值的2倍；
玩家的起始分数等于当前的级别数值的2倍加1
例如 等级为3，则玩家起始分数是7分；每吃到一个食物加3分；
每吃到一个炸弹减6分
4、游戏结束
当总分
- 2022-03-02 23:06:57下载
- 积分：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 顺序文件写操作的操作演示，三种方法写数据，包括了完整的源码项目下载，是学习VB文件读写操作的好范例。
这三种方法是：
把文件的内容一次性的写入
把字符一个一个写入
依次写入顺序文件
- 2022-01-26 17:24:14下载
- 积分：1
-
VisualBasic 6.0 获取网页超链接
VisualBasic 6.0 获取网页超链接，VB根据网址打开指定页面，预览网页并获取该页面中所有的超链接，最后会统计出该网页内有多少个链接。
同时本源码还可区分网页中的文本和图片，将剔除图片，在文本中查找超链接个数，主要是针对href进行精准匹配统计出出现的次数，运行效果如下图所示。
具体源代码请下载本源码查看。
- 2022-10-27 08:40:03下载
- 积分：1
-
VB 网络连通检测
VB 网络连通检测，单击命令按钮可进行网络连通检测，判断是本机否连接到Internet。操作很简单，将连通测试检测结果输出到屏幕上。
- 2023-08-30 14:45:02下载
- 积分：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.NET实现附源码
一款基于VB.NET和sqlserver数据库实现的考勤程序，实现公司员工的日常考勤功能，可实现指定日期的员工考勤，考勤时可选择考勤天数、考勤人，可查询本人的考勤记录，实现的是挺基本的考勤模块，还可显示当前用户的历史记录。
本实例的数据库文件在db文件夹下，请自行添加，并配置数据库信息。
源代码运行于VS2015环境下。
- 2022-12-02 11:45:03下载
- 积分：1
-
VB6 给窗体添加滚动条
VB6 给窗体添加滚动条，调整水平滚动条的一些属性。当窗体的大小发生变化时发生，垂直滚动条与窗体相对位置不变，滚动条的大小随着窗体大小的改变而改变，命令按钮作水平滚动条与垂直滚动条交接处的填充。
因代码注释较多，详细代码情况请您下载本源码包，自行解压查看。
- 2023-02-22 07:50:04下载
- 积分：1
