用代码 使 form 透明
==============================================
Public Const GWL_EXSTYLE = (-20)
Public Const WS_EX_TRANSPARENT = &H20&
Public Const SWP_FRAMECHANGED = &H20
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOSIZE = &H1
Public Const SWP_SHOWME = SWP_FRAMECHANGED Or _
SWP_NOMOVE Or SWP_NOSIZE
Public Const HWND_NOTOPMOST = -2 Declare Function SetWindowLong Lib "user32" _
Alias "SetWindowLongA" _
(ByVal hwnd As Long, ByVal nIndex As Long, _
ByVal dwNewLong As Long) As Long
Declare Function SetWindowPos Lib "user32" _
(ByVal hwnd As Long, ByVal hWndInsertAfter _
As Long, ByVal x As Long, ByVal y As Long, _
ByVal cx As Long, ByVal cy As Long, _
ByVal wFlags As Long) As Long
==================================================
在控件初始化的时候:SetWindowLong Me.hwnd, GWL_EXSTYLE, _
WS_EX_TRANSPARENT
SetWindowPos Me.hwnd, HWND_NOTOPMOST, _
0&, 0&, 0&, 0&, SWP_SHOWME
==================================================
你试试

解决方案 »

  1.   

    另外,直接 设置:
    UserControl.BackStyle =   0  'Transparent也可使 控件FORM 为透明.
      

  2.   

    添加 Form20 控件 
    试试 其中的 TEXT 和 LABEL 控件.
    它的 TEXT 控件 也可 设置为透明. 
      

  3.   

    UserControl一旦定义为透明,就不能作为容器了,因为上面的所有控件都透明了...所以会出现这种情况。
      

  4.   

    楼上,不对,在USerControl透明的情况下,它仍然是容器,也可以显示LABEL,IMAGEBOX,但是一旦把LABEL也设为透明,在设计器里看得到文字,转到FORM里使用此控件时,文字就无法显示了。我想解决的就是这个问题。
      

  5.   


      添加 Form20 控件 
    试试 其中的 TEXT 和 LABEL 控件. 
    它的 TEXT 控件 也可 设置为透明. 
     
      

  6.   

    为什么不直接在控件上写字呢?
    bitblt
    或者
    print
    可不可以?
      

  7.   

    因为如果直接在控件上写字,就是说写在UserControl上,当UserControl的背景为Transparent时,看不到文字。