-
VB.NET应用程序管理工具-类似360桌布助手
这是一个用VB.NET开发的应用程序管理工具-类似360桌布助手的某此功能,通过导入保存有常用程序列表的XML文件,来通过程序来管理各应用程序的快捷方式,用户可以把常用的程序收集起来,在这里可以直接双击列表中程序名称或点击【启动程序】来启动每个程序。不用到处找你所安装的程序或软件。方便,快捷,常用程序列表:(用户可以拖放任何文件到下面列表中)。
程序列表的操作有导入和导出。
- 2022-08-20 10:25:11下载
- 积分:1
-
VB 为菜单添加分割线
VB6为菜单制作添加分割线,在菜单项与菜单项之间显示一个分隔线,这个在Windows经典风格的窗口中,十分常见,像一个水平线那样,把菜单分成多个部分,这个水平线带有阴影效果,视觉效果更立体。
本窗口中的菜单,是一个企业综合管理系统的主界面面板,那些菜单都是测试用的,你可以看一下菜单中的分隔线是如何嵌入到菜单中的。
- 2022-09-22 23:30: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 删除指定类型文件
VB 删除指定类型文件,用户选择电脑中指定路径下的文件类型后,可删除该目录下所有此类型的文件。
- 2022-10-25 21:50:02下载
- 积分: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利用数据窗口辅助录入数据,也就是本程序窗口中,生成了一些数据辅助窗口,可对用户的录入工作提供一些帮助,其实就是一些供用户选择的组件之类的,用户了用户,又提升了数据录入的准确性,在VB6.0中,本源码可顺利编译成功,运行后如示例图所示。
- 2023-07-26 19:20:03下载
- 积分:1
-
药品管理程序源码Vb 6.0 SqlServer
一款基于VB开发的药品管理程序,数据库采用SqlServer,运行之前首先在SQL查询分析器里执行SQL目录下的myMedsys.sql脚本.大家可根据源程序代码自行扩展程序,二次开发完善。
- 2022-04-24 20:15:24下载
- 积分:1
-
vb 将数字格式化为金额
vb 将数字格式化为金额,这个更像是一个自动计算程序,根据用户输入的单位、数量、价格等参数,自动计算出金额,这才是程序要表达的功能,相差代码:
Private Sub Text1_LostFocus(Index As Integer)
Text1(Index).BackColor = &H80000005
If Index = 3 Then Text1(3) = Format(Text1(3), "0.00")
End Sub
- 2023-01-25 23:50:04下载
- 积分:1
-
VB 值参与变参举例
VB 值参与变参如何用的小例子源码,这个其实平时有时候也用到了,只是不知道这是值参或是变参,通过这个小实例,你或许对这两者的用法会更熟悉些,以下代码仅供参考:
Private Sub Command2_Click()
Dim a As Integer, b As Integer
a = 10: b = 20
Picture2.Print "交换前:a="; a; " b= "; b
Swap2 a, b
Picture2.Print "交换后:a="; a; " b= "; b
End Sub
- 2022-07-25 08:20:44下载
- 积分:1
-
VB.NET 多线程TCP端口扫描工具
VB.NET 多线程TCP端口扫描工具,使用前请输入要扫描的网段IP和端口,本程序可将扫描到的开放端口数量显示在窗口中,扫描时应用了多线程技术,扫描时显示当前线程数,适时显示扫描进度和扫描时间,以毫秒计时,扫描速度提升了不少。
注:本程序仅能扫描开放的端口,被禁止和未开放的端口不能被扫描到。
- 2022-05-25 05:47:04下载
- 积分:1