精华内容
下载资源
问答
  • VB窗体透明的实现
    2021-01-31 00:50:55

    在这里插入图片描述
    '添加一个标准模块,代码如下:
    Option Explicit
    Declare Function GetWindowLong Lib “user32” Alias “GetWindowLongA” (ByVal hwnd As Long, ByVal nIndex As Long) As Long
    Declare Function SetWindowLong Lib “user32” Alias “SetWindowLongA” (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
    Declare Function SetLayeredWindowAttributes Lib “user32” (ByVal hwnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long
    Const WS_EX_LAYERED = &H80000
    Const GWL_EXSTYLE = (-20)
    Const LWA_ALPHA = &H2
    Const LWA_COLORKEY = &H1

    '窗体透明或半透明
    'MeLoad函数说明:
    'F:窗体名
    'B:指定透明的颜色或透明度(当LWA=True时为透明度,反之为要透明的颜色值)
    'LWA:全透明或半透明

    Public Sub MeLoad(F As Form, B As Long, LWA As Boolean)
    Dim rtn As Long
    rtn = GetWindowLong(F.hwnd, GWL_EXSTYLE)
    rtn = rtn Or WS_EX_LAYERED
    SetWindowLong F.hwnd, GWL_EXSTYLE, rtn
    If LWA And B > 255 Or B < 0 Then Exit Sub
    SetLayeredWindowAttributes F.hwnd, IIf(LWA <> True, B, 0), IIf(LWA, B, 0), IIf(LWA, LWA_ALPHA, LWA_COLORKEY)
    End Sub

    '在窗体上画两个CommandButton按钮,属性为默认,代码如下:
    Private Sub Command1_Click()
    Call MeLoad(Me, 100, True) '数值在0~255
    End Sub

    Private Sub Command2_Click()
    Me.BackColor = RGB(255, 0, 0)
    Call MeLoad(Me, Me.BackColor, False)
    End Sub

    Private Sub Form_Load()
    Command1.Caption = “半透明”
    Command2.Caption = “指定颜色透明”
    End Sub

    更多相关内容
  • 一个漂亮的vb窗体源码,学习制作VB窗体很有用的技巧实例,隐藏了标题栏文字,去掉了窗体边框,最大小和最小化以及关闭按钮也经过了美化处理,与默认的窗体大不一样,对窗体美化感兴趣的VB爱好者可下载源码参考研究,...
  • VB窗体拖放应用示例

    2021-05-16 19:03:08
    摘要:VB源码,界面编程,窗体拖放 VB窗体拖放应用示例,在本例演示的一个窗口中,用鼠标按住图形能拖动到右侧的方框中,拖放成功与否返回有提示。
  • 内容索引:VB源码,界面编程,控件 VB窗体控件元素自适应窗体大小变化的设置实例,也就是让VB窗体中的控件元素,比如TextBoX之类的,会随依附窗体的大小变化而变化 ,窗体被拖大,它会跟着大,窗体小则它也小,实现本...
  • 两个简单漂亮的VB窗体美化源码
  • 摘要:VB源码,界面编程,字体样式 VB改变窗体的文字大小和样式,将窗口中的文字改成黑体或宋体,另外改变字号大小,一个小技巧吧,窗体中的字体对窗体的整体美观效果起到很大作用,改变字体可以改变外观,让用户...
  • 内容索引:VB源码,界面编程,更换背景,窗体 用VB编程实现窗体中更换背景图,载入指定文件夹中的图片作为背景。
  • 一个VB窗体 TAB控件 实现标签切换,来自国外的VB达人所写,选项卡中嵌套有TAB,点击后可切换窗体中的对应内容,有横向的和纵向的选项卡例子,可根据自己的需要选择使用。本代码参考价值大,希望关注。
  • 一个漂亮的VB窗体界面,可把本代码中用到的美化技巧,应用到你的VB项目中,相信会给您的程序增色不少。虽然示例只是一个蓝色的登录界面,但理解了原理,就可以派生出很多窗体来。
  • 又一个Vb6.0代码实现的窗体分栏功能,在一些流行的应用程序中,经常见到窗体上有二个相邻的列表框,可以用鼠标任意拉动中间分割条,改变列表框大校将窗体分隔成两个或多个部分,完成不同的功能,其实就是实现窗体...
  • 内容索引:VB源码,系统相关,激活,窗体 VB窗体激活专家(新林版),可以激活任意窗体、窗体控件和菜单,就是可以将当前窗体变亮或变灰色,窗体中的元素、按钮、菜单等都将变得不可用或可用。程序小巧,但很实用,原理...
  • 摘要:VB源码,界面编程,TAB,窗体选项卡 TAB框的应用,在网页中很常见,今天发一个VB窗体中的TAB框应用实例,外观还挺不错,在你的窗体中加入TAB,可有效节约窗体空间,布局更多的内容,也可提升用户操作体验。
  • 内容索引:VB源码,界面编程,记忆窗体,菜单历史 很普通的一个Vb窗体菜单,特别之处是它可以记忆曾经打开过的文件路径,像Word文档就有这种功能,能记录下最近10个打开过的文档,实现此功能有不少方法是使用INI文件,...
  • 内容索引:VB源码,界面编程,界面,按钮 几个较传统的VB窗体按钮示例代码,英文名称coolbutton,源代码公开 ,使用了几个按钮绘制类,大家可扩展到你的程序中,修饰一下按钮样式还是挺好的,示例截图如上所示。
  • VB窗体阴影

    2015-04-29 22:29:54
    窗体阴影和玻璃效果重新回归Win10了,这个例子比较完美地实现了VB窗体的透明和玻璃效果。
  • 以前写的程序,模仿了水晶情缘的窗体属性修改专家程序的界面。(主要是实现了程序中“主窗体”选项卡中操作,其余选项卡的操作没有去完全实现。)  窗体属性修改专家是一款使用方便、小巧、实用的窗体控件测试工具...
  • VB窗体美化程序+源码+多款皮肤 详细的步骤再加上你的简单操作,让你用心编写的程序与众不同!!! 有了这款控件后再也不用担心丑陋的VB界面了,为崭新的界面增光添彩让人耳 目一新! 也让自己和别人更加喜欢自己...
  • VB窗体代码

    2017-08-27 09:47:47
    VB窗体简单总结
  • VB 窗体间传送数据

    2014-01-23 23:04:26
    VB写了多种窗体之间传送数据的例子教材,非常适合初学者学习 可以比较多种方法之间的区别
  • 内容索引:VB源码,界面编程,窗体切换 VB窗体切换代码,打开不同颜色的子窗口,主要学习一下VB窗体控制。在窗口上有三个代表红、黄、绿三色的按钮,当你点击的时候,弹出的窗体的背景就是对应的颜色,再次点击...
  • 内容索引:VB源码,界面编程,记忆窗体 一款VB记忆窗体的核心代码部分,重新优化了一下编写为一个独立的小程序,它可以保存VB窗体退出时的大小,具有记忆功能,你可以试着在退出时拖动改变窗体的大小,在下次运行时,...
  • 内容索引:VB源码,界面编程,字体,窗体实例 改变文本框字体的大小和样式,VB窗体实例,调用Windows的字体面板,通过此面板你可对布局在窗体上的文本框控制字体进行控制,改变字体的样式、大孝删除线、下划线、字符集...
  • VB窗体美化Win7界面控件,AeroSuite可以直接调用,也可以生成OCX控件外部调用,界面非常好看。
  • 内容索引:VB源码,界面编程,窗体,界面,控件 VB窗体界面与控件源码集:仿瑞星小狮子界面、控制其他程序成为自己的子窗体、在任务栏上加上程序图标、获取运行程序(控件)名称和内容、锁住Windows直到输入正确的口令、...
  • 使vb窗体可以自适应屏幕分辨率的大小
  • VB窗体最大化后控件跟随变化,很好的例子,可以学习下
  • VB窗体美化源代码

    2021-05-07 02:48:45
    摘要:VB源码,界面编程,窗体美化 VB窗体美化源代码,基于贴图的窗体美化,感谢网友的提供,希望本程序能为VB爱好者提供一份在窗体美化方面的技巧及思路方法。美化后的窗体截图如上所示,黑色风格,很酷的感觉。作者...
  • 内容索引:VB源码,界面编程,窗体控件 自适应大小的漂亮VB窗体控件,可以方便的拖动大小,但是发觉不能移动窗口,有点遗憾,可能我这个示例写的不太好吧,另外还能在窗体中布局菜单,非常方便,效果图如上,类似的...
  • VB窗体显示柱状图,调用数据库表单数据,在窗体上显示柱状图
  • VB窗体设计

    2015-09-24 10:21:53
    VB窗体设计,设计比较简单,可以互相学习下。

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 35,482
精华内容 14,192
关键字:

vb窗体