如何用VB实现半透明控件

原创 2008年09月29日 16:30:00

    本代码演示半透明控件的实现过程。如果是自定义控件,实现起来非常简单,如果是系统控件,则要复杂一些。如果系统控件支持属主画,跟自定义控件思路完全是一样的,只不过代码是写在子类化的过程里。 

    先建一个标准EXE工程,然后添加一个用户控件,把以下代码复制到控件代码中,再把此控件放置到Form1上。

    在Form1的Form_Activate事件里输入以下代码:

    最后,你将看到一个粉红色半透明的方块,该方块就是你所需要的半透明的控件。至于控件的其它功能,读者可以自行扩展。

vb 窗体透明效果(控件不透明)

'窗体透明,控件不透明的代码: Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hw...
  • kalision
  • kalision
  • 2012年02月06日 17:46
  • 7773

【VB】窗体透明三:窗体、控件变透明

Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVa...
  • kajweb
  • kajweb
  • 2017年03月17日 16:41
  • 1379

如何用VB实现半透明控件

本代码演示半透明控件的实现过程。如果是自定义控件,实现起来非常简单,如果是系统控件,则要复杂一些。如果系统控件支持属主画,跟自定义控件思路完全是一样的,只不过代码是写在子类化的过程里。     先建一...
  • lyserver
  • lyserver
  • 2008年09月29日 16:30
  • 6044

vb 透明按钮

  • 2013年01月12日 18:58
  • 2.75MB
  • 下载

自己编写vb进度条控件

主程序代码:Option ExplicitDim i As DoublePrivate Sub Command1_Click() i = 0 Timer1.Enabled = TrueEn...
  • sysdzw
  • sysdzw
  • 2009年10月09日 15:55
  • 5460

win7 下完美解决VB 动态添加的flash 控件 fscommand 消息未触发的方法

Private WithEvents ShockwaveFlash1 As ShockwaveFlashObjectsCtl.ShockwaveFlash//一定要放到外边声明 Private ...
  • lxnkobe
  • lxnkobe
  • 2011年09月03日 10:22
  • 3418

可双击,可拖动,半透明效果按钮实现[VB.NET]

自己建个类,代码copy即可Public Class CustomizeButton Inherits Button 'inherits the system button Pro...
  • Sugar_Tiger
  • Sugar_Tiger
  • 2010年08月03日 13:00
  • 3473

美化皮肤和界面 vb无控件美化

  • 2010年05月16日 10:04
  • 126KB
  • 下载

vb6.0做一个半透明窗体(全透)

步骤一:打开VB建立一个窗体Form 步骤二:将窗体背景颜色设为:&HFF0000 步骤三:将下面代码粘贴到程序中: Declare Function GetWindow...
  • a771948524
  • a771948524
  • 2013年05月06日 12:47
  • 1673

[MFC] 几种子控件半透明效果的实现办法

什么是 ? 如下图所示 美图秀秀中间的四个按钮 边缘都有椭圆效果: 熟悉MFC开发的都知道 虽然四个按钮的边缘是椭圆的 实际上椭圆之外的角落里 也属于子控件的窗口区域  即:如下图所示 虽然子控件...
  • felicityWSH
  • felicityWSH
  • 2017年03月30日 15:55
  • 708
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:如何用VB实现半透明控件
举报原因:
原因补充:

(最多只允许输入30个字)