网站首页

vb禁用窗体最大化、最小化和关闭快捷菜单

于 2022-08-06 发布文件大小:2.26 kB

 0  96

下载积分: 2 下载次数: 2

我要下载

代码说明：

vb禁用窗体最大化、最小化和关闭快捷菜单，禁用最大化、最小化不可用，重点实现了禁止关闭窗口的功能，禁止后窗口上的关闭按钮变成灰色不可点击了，在实现方面，核心代码如下：　　Private Sub Form_Load() 　　 RemoveMenu GetSystemMenu(Me.hWnd, 0), SC_COLSE, MF_REMOVE//禁止关闭　　 RemoveMenu GetSystemMenu(Me.hWnd, 0), SC_MAXIMIZE, MF_REMOVE//禁止最大化　　 RemoveMenu GetSystemMenu(Me.hWnd, 0), SC_MINIMIZE, MF_REMOVE//禁止最小化　　End Sub

下载说明：请别用迅雷下载，失败请重下，重下不扣分！

发表评论

0 个回复

VB6.0仿迅雷悬浮窗口（图标）的实现源码
VB6.0仿迅雷悬浮窗口（图标）的实现源码，迅雷的悬浮窗相信大家很熟悉了，其实就是显示一个图标，悬浮在屏幕上，通过这个悬浮图标可单击右键调出菜单，双击图标则会显示主窗口，本源码模拟了悬浮窗口的实现，另外是模拟了悬浮窗口双击显示主窗口的功能。代码中注释不多，不过没有使用过多复杂的代码，对VB新手友好。

2022-03-24 09:58:35下载

积分：1
vb 6.0 排队叫号系统
vb 排队叫号系统源代码，Cobeyond排队系统，程序分为了中心控制端、CyMobile管理系统、系统通讯端口设置、系统数据库设置、最大终端客户数设置、检查服务器名和端口号等众多子程序。本排队叫号系统可广泛应用于银行大厅排队叫号、便民服务大厅排队叫号等公共服务场所，系统涉及硬件、数据库及网络各方面的编程知识，是一套比较综合的VB管理系统。其中服务人员子程序打开后的界面如截图所示，源码包中还包括了排队叫号系统设计的流程图、网络拓扑结构图等编程资料，请下载源码包查看详情。

2022-02-21 04:44:48下载

积分：1
VB.NET自制的看图工具软件
VB.NET自制图片查看器，一个看图工具软件，功能方面主要有图片原图显示、自动缩放图片、图片居中、自动缩放图片框、背景色设置、文件名及其路径、视图ToolStripMenuItem等。你可以通过这个小程序了解一些VB.NET与图片之间的操作技巧，另外还可以学习到窗口对话框的一些基本操作、PictureBox控件用法、目录和文件列表框的使用、处理鼠标事件、偏移量计算图片位置，重画图片、绘图画面，颜色填充、窗体界面元素控制等的控制方法。。

2022-12-25 17:15:03下载

积分：1
VB演示操作存储过程的方法
VB演示操作带参数和不带参数的存储过程的方法，通过一个数据库查询来体现功能的差别。同时还包括了创建存储过程信息。　　我们从打开数据链接开始，演示如何简单创建一个存储过程，下面是核心的几何代码：　　con.Open 　　con.Execute ("Create Procedure book1 @price int As Select * From 书名 where 单价>=@price") 　　MsgBox "成功创建存储过程" 　　con.Close 　　SQL语句是一个查询书名对应价格的例子，仅供参考。

2022-01-25 20:38:51下载

积分：1
VB6 给窗体添加滚动条
VB6 给窗体添加滚动条，调整水平滚动条的一些属性。当窗体的大小发生变化时发生，垂直滚动条与窗体相对位置不变，滚动条的大小随着窗体大小的改变而改变，命令按钮作水平滚动条与垂直滚动条交接处的填充。　　因代码注释较多，详细代码情况请您下载本源码包，自行解压查看。

2023-02-22 07:50:04下载

积分：1
VB.NET API函数画线条示例
VB.NET API函数示例，使用VB api函数画线条的一个例子，如图所示的效果中，鼠标单击两端，即可画出一条直线，主要是学习使用VB.NET中的API画图函数用法。示例运行效果请参见截图所示，本页提供该实例的源码下载。

2022-03-22 10:44:12下载

积分：1
Vb6.0 仿制资源管理器界面折叠菜单
Vb6.0 仿制资源管理器界面折叠菜单，这个菜单的形式估计大家都见到过，像Windows窗口右侧的资源管理器窗口那样，鼠标单击的时候会折叠起来，再次点击会展开所属子菜单项，相信这个菜单的功能不用多介绍了，代码方面实现还是挺麻烦的，有兴趣的下载源码参见代码。

2023-01-05 08:10:03下载

积分：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.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 值参与变参如何用的小例子源码，这个其实平时有时候也用到了，只是不知道这是值参或是变参，通过这个小实例，你或许对这两者的用法会更熟悉些，以下代码仅供参考：　　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

696518资源总数
105901会员总数
40今日下载

vb禁用窗体最大化、最小化和关闭快捷菜单

0 个回复

热门标签

热门下载