-
VB 为菜单添加分割线
VB6为菜单制作添加分割线,在菜单项与菜单项之间显示一个分隔线,这个在Windows经典风格的窗口中,十分常见,像一个水平线那样,把菜单分成多个部分,这个水平线带有阴影效果,视觉效果更立体。
本窗口中的菜单,是一个企业综合管理系统的主界面面板,那些菜单都是测试用的,你可以看一下菜单中的分隔线是如何嵌入到菜单中的。
- 2022-09-22 23:30:03下载
- 积分: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.NET 轻松提速打字游戏源代码
VB.NET 轻松提速打字游戏源代码,同时调用了MID背景音乐文件,边打字边听音乐。程序功能:打字时间设置、倒计时、打字难易程序设置、背景音乐和文字设置、游戏速度设置、窗口背景颜色设置、音乐开关设置等,其实这是一个打字小游戏,从窗口顶部会随机掉下来字母,敲击键盘上对应的字母键即可消除该字符,算打字成功。本趣味打字帮助大家面对键盘只会‘一指弹’炼成‘弹指神功’的炉火纯清的地步。
在编写时保证了窗体大小发生变化时保证窗体下面几个界面元素不会混乱,同时也调用了Windows编程库,比如Windows MediaPlayer的相关组件AxInterop.WMPLib.dll/Interop.WMPLib.dll,用于播放背景声音。程序中的随机生成器,即每次产生的随机种子不一样,很有用,用来生成随机掉下来的字母。
- 2022-04-12 19:44:43下载
- 积分:1
-
VB模拟输入的成绩判断奖学金等级
VB模拟输入的成绩判断奖学金等级,测试前请输入学生的三门功课的成绩,输入成绩后,程序会根据预设的判定一、二、三等奖学金的条件,来判断该同学成绩应该属于几等奖学金。
这类程序其实容易实现,中间的一些小技巧我觉得不错,比如当用户输入一科成绩后,光标自动定位到下一个文本框,如果需要用户输入内容比较多的时候,这个功能可大大提升用户体验。
更多源码细节请下载查看。
- 2022-02-20 07:54:43下载
- 积分:1
-
VB MSChart图表控件实例:柱状图的实现
VB 柱状图生成的例子,看看,是不是很实用的图表效果,这种图表也叫做直方图表,这是纵向的,也有横向的柱状图.本柱状图的生成是使用了Vb内置的微软图表控件MSChart控件,因此可看作是此控件的应用范例.
- 2022-04-15 23:55:01下载
- 积分:1
-
Vb6.0 仿制资源管理器界面折叠菜单
Vb6.0 仿制资源管理器界面折叠菜单,这个菜单的形式估计大家都见到过,像Windows窗口右侧的资源管理器窗口那样,鼠标单击的时候会折叠起来,再次点击会展开所属子菜单项,相信这个菜单的功能不用多介绍了,代码方面实现还是挺麻烦的,有兴趣的下载源码参见代码。
- 2023-01-05 08:10:03下载
- 积分:1
-
vb根据用户输入的内容决定显示指定内容
vb根据用户输入的内容决定显示指定内容,从例子来看,是一个数据库搜索的例子,也就是用户搜索的什么,列表中会显示出相关内容。只是说法不同而已,为了可以正常运行,本示例中的数据库采用Access数据库,数据库文件为:db_Client.mdb。
- 2022-08-23 09:42:29下载
- 积分:1
-
vb6 批量生成证书、房屋等编号
vb6 批量生成证书、房屋等编号,学会了本例子,是个比较实用的技巧,在一些需要批量生成编号的地方,你都可以借鉴本程序,来实现编号生成,在本例中,是批量生成房屋的编号,用户可选择楼层范围、单元范围等参数后,即可快速生成编号。十分方便哦。这个小程序从界面和功能易用上来说,都设计的都好用的。
- 2022-10-19 14:10:03下载
- 积分: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写的DVD播放器源代码
播放器窗口界面中的操作菜单,实现了弹出菜单的功能,把控制菜下的各菜单项添加到弹出式菜单ContextMenuStrip1中。
播放器功能支持DVD格式的视频播放,包括了暂停、播放、停止、弹出等功能。
本播放器程序依赖于AxInterop.MSWEBDVDLib.dll、Interop.MSWEBDVDLib.dll。
- 2023-05-18 15:05:03下载
- 积分:1