-
vb禁用窗体最大化、最小化和关闭快捷菜单
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
- 2022-08-06 00:49:36下载
- 积分:1
-
VB6.0演示的AutoSize实例
VB6.0演示的AutoSize实例,自动改变图片框的大小以显示图形全部内容,当图片框比图形小时,图形超出部分不被显示,减少图片框高度,使图片框小于图形。
- 2022-08-07 04:59:17下载
- 积分: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 交换两个变量的值
vb 不借助第3个变量实现两个变量互换,交换两个变量的值,在窗口上输入a和b的值,从运行效果截图你可看出这个功能:
If IsNumeric(Txt_a.Text) Then
a = Val(Txt_a.Text)
Else
MsgBox "请输入数字!"
Exit Sub
End If
If IsNumeric(Txt_b.Text) Then
b = Val(Txt_b.Text)
Else
MsgBox "请输入数字!"
Exit Sub
End If
a = a + b
b = a - b
a = a - b
Lbl_Info.Caption = "a的值是:" & a & " b的值是:" & b
- 2023-09-06 03:35:03下载
- 积分:1
-
vb.net 故意引发错误演示全局异常捕获处理
本程序主要是演示vb.net全局错误异常消息的捕获处理,程序运行后故意引发错误,并弹出消息处理框,类似于在VB.NET调试器中显示的错误消息,指出错误原因、错误位置和具体代码,方便程序员对错误及时纠正处理,程序运行效果如图所示。
- 2022-09-01 05:15:03下载
- 积分:1
-
树状导航菜单 +窗体分隔+框架窗口VB源码范例
本实例是一个比较综合、完整的窗口制作实例,演示了树状导航菜单的制作方法,还有窗口中各种菜单的实现步骤,同时还演示了如何对窗口进行分隔显示,实现了一个带树形菜单的框架式程序主窗口界面,可广泛应用于VB的各种信息管理系统的开发中。VB源代码范例,在VB6.0环境下完美编译运行。
- 2022-09-10 22:15: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 使用鼠标分割窗体的Split实例源码
VB6.0 使用鼠标分割窗体,用鼠标切分主窗体,实现SplitForm,可以用鼠标切分的窗体,在一些流行的应用程序中,经常见到窗体上有二个相邻的列表框,可以用鼠标任意拉动中间分割条,改变列表框的大校
演示窗口其实是一个布满了各种导航菜单的窗口,这也是大家学习的一个亮点哦,作为一个信息管理系统的主界面效果还是相当不错的,分隔窗体在很多时候我们也用得上的。
- 2022-08-08 21:38:42下载
- 积分:1
-
VB写的一个轻型仿写字板文档编辑器源码
VB6.0编写的一个轻型仿写字板的多功能文档编辑器源码,具备新建、打开、保存、打英剪切、复制、粘贴、粗体、斜体、下划线、左对齐、置中、右对齐等功能,界面还是挺友好的,文件格式支持DOC格式 (*.doc)|*.doc|RTF格式 (*.rtf)|*.rtf|文本文件 (*.txt)。
注:如果这个工程没有帮助文件,显示消息给用户,可以在“工程属性”对话框中为应用程序设置帮助文件。完整源码请下载查看。
- 2022-03-15 05:13:20下载
- 积分:1
-
VB6.0 获取网络连接信息
VB6.0 获取网络连接信息,在如图所示的窗口中,点击按钮即可获取显示本机的网络连接信息,这些信息包括:
是否通过LAN连接、是否通过Modem连接、是否通过Proxy连接、是否在线连接、是否安装了网络RAS等信息。获取完成最后可提示:“系统通过LAN与Internet连接,系统安装了远程访问服务”。
- 2023-05-26 06:40:02下载
- 积分:1