登录
首页 » VB源码 » VB 为菜单添加分割线

VB 为菜单添加分割线

于 2022-09-22 发布 文件大小:3.89 kB
0 138
下载积分: 2 下载次数: 1

代码说明:

VB6为菜单制作添加分割线,在菜单项与菜单项之间显示一个分隔线,这个在Windows经典风格的窗口中,十分常见,像一个水平线那样,把菜单分成多个部分,这个水平线带有阴影效果,视觉效果更立体。   本窗口中的菜单,是一个企业综合管理系统的主界面面板,那些菜单都是测试用的,你可以看一下菜单中的分隔线是如何嵌入到菜单中的。

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • VB.NET 轻松提速打字游戏
    VB.NET 轻松提速打字游戏源代码,同时调用了MID背景音乐文件,边打字边听音乐。程序功能:打字时间设置、倒计时、打字难易程序设置、背景音乐和文字设置、游戏速度设置、窗口背景颜色设置、音乐开关设置等,其实这是一个打字小游戏,从窗口顶部会随机掉下来字母,敲击键盘上对应的字母键即可消除该字符,算打字成功。本趣味打字帮助大家面对键盘只会‘一指弹’炼成‘弹指神功’的炉火纯清的地步。   在编写时保证了窗体大小发生变化时保证窗体下面几个界面元素不会混乱,同时也调用了Windows编程库,比如Windows MediaPlayer的相关组件AxInterop.WMPLib.dll/Interop.WMPLib.dll,用于播放背景声音。程序中的随机生成器,即每次产生的随机种子不一样,很有用,用来生成随机掉下来的字母。
    2022-04-12 19:44:43下载
    积分:1
  • 国外的VB版跳棋游戏
    一款国外的VB版跳棋游戏源码,源代码中同样包括了很多注释,不过注释都是英文。这款跳棋感觉和国内的不一样,走棋方法不同,试着玩了,按照国内的走棋方法,棋子并不走动,不知道如何玩。但是源代码在VB6.0下可顺利编译成功,有兴趣的可下载源代码参考学习。运行效果如下图所示。
    2022-04-21 21:15:12下载
    积分:1
  • Vb6.0 仿制资管理器界面折叠菜单
    Vb6.0 仿制资源管理器界面折叠菜单,这个菜单的形式估计大家都见到过,像Windows窗口右侧的资源管理器窗口那样,鼠标单击的时候会折叠起来,再次点击会展开所属子菜单项,相信这个菜单的功能不用多介绍了,代码方面实现还是挺麻烦的,有兴趣的下载源码参见代码。
    2023-01-05 08:10:03下载
    积分:1
  • VB net 模拟考试系统 SQLSERVER版
    VB net 模拟考试系统,本考试时间为30分钟,系统会进行倒计时。你必须正确输入你所在班级、姓名和学号,交卷后不能再考,即时间未到不要急于点""交卷""!点击""确定""进入考试系统。本考试系统的窗口只允许打开一个,程序会判断窗体是否已经打开,如果已经打开,则不需要重复打开,只是显示。   程序正常运行需要SQL数据库,请在测试前附加并连接好。
    2022-02-07 21:46:47下载
    积分:1
  • VB6 设计带记忆的DataGrid数据录入窗口
    VB6 设计带记忆的数据录入窗口,这种记忆实际上是将DataGrid临时输入的数据存入到数据库中了,是一个数据库应用范例,本例子中的数据库采用的Access。在本例中,用户临时对任意DataGrid行列操作时输入的内容,临时保存至数据库中,使用时及时读取,模拟中了记忆功能,方便了用户操作,不过未做测试,不知道数据量较大的时候,会不会对数据库造成压力,有心者可以自行测试哦。
    2023-04-17 21:20:02下载
    积分:1
  • Visual basic vb6.0 制作个人调查表窗体
    Visual basic vb6.0 制作个人调查表窗体,这个主要是练习一些VB Form 窗体控件中的元素用法,如果你初学习VB的话,这个例子非常适合你学习。   本例子中主要包括了对VB基本控件元素Check、Option、Text、Label、Button的用法进行了演示,具分享出了具体实现某一功能的代码及设置方法,涉及到光标自动归位、清空文本框、判断用户输入是否正确,断用户选择了哪一项按钮等功能,虽然简单,但对于VB打基础还是挺有帮助的。
    2022-04-18 16:36:31下载
    积分:1
  • VB 6 在DataGrid表格中实现下拉列表框
    VB 6.0 在DataGrid表格中实现下拉列表框,大家可以看截图,在如演示效果所示的DataGrid表格中,单击“单位”一列任意行数据,会显示出一个下拉框,供输入者选择单位,扩展了DataGrid的功能,增加了易用性,提升了用户体验。添加这一功能的核心代码为:   Adodc1.CommandType = adCmdTable   Adodc1.RecordSource = "tb_stock"   Set DataGrid1.DataSource = Adodc1   List1.AddItem ("支")   List1.AddItem ("瓶")   List1.AddItem ("盒")   List1.AddItem ("袋")   DataGrid1.Columns(6).Button = True   仅供参考,本示例是配合数据库实现的,请确保测试时数据库是连接的。
    2022-07-26 04:39:52下载
    积分:1
  • VB6.0 使用列表播放midi等媒体文件
    VB6.0 使用列表播放midi等媒体文件,代码中添加了注释,了解VB如何操作MIDI文件进行播放,核心是调用了msdxm.ocx文件,如果程序不能运行,将本目录中的msdxm.ocx文件拷贝到C:WINDOWSsystem32目录下,然后,在"开始"/"运行"中键入regsvr32 C:WINDOWSsystem32msdxm.ocx, 回车再运行程序即可.
    2022-03-23 18:50:41下载
    积分:1
  • VB.net 生成条形code128条
    VB.net绘制生成code128条形码的例子,另外还有EAN128、包括了Code128 A/B/C类型的条形码,程序非常好用,在文本框输入规定要求的数据,即时输入,即时生成。程序中为生成条形码,创建了一些函数,比如显示可见条码文字 如果小于40 不显示文字、获取条形码宽和放大系数、获得条码图形、根据编号获得条纹、获取目标对应的数据、偶数检测判断、获取128图形等,在VB.NET生成条形码的朋友,本范例源码是个很好的参考。
    2022-02-14 15:50:30下载
    积分:1
  • VB 6.0 按字段显示数据库所有值
    VB 6.0 按字段显示Access数据库所有值,是一个按条件查询数据库的例子,这里的数据库为BOOK2.mdb,核心的代码如下:   Private Sub Adodc1_WillMove(ByVal adReason As ADODB.EventReasonEnum, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)   End Sub   Private Sub Form_Load()   Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "ook2.mdb;Persist Security Info=False "   Adodc1.RecordSource = "select * from 作者"   Set DataCombo1.DataSource = Adodc1   DataCombo1.DataField = "城市"   Set DataCombo1.RowSource = Adodc1   DataCombo1.ListField = "姓名"   End Sub
    2022-09-25 11:45:03下载
    积分:1
  • 696516资源总数
  • 106679会员总数
  • 14今日下载