How to draw text at aero glass in visual basic

[EDN Admin]

Hi All, I had following coding to make form have aero glass effect. but the text is become transparent too when i run it. how to make the text become no transparent? Thnx<br/>
<pre><StructLayout(LayoutKind.Sequential)> _
Public Structure MARGINS
Public cxLeftWidth As Integer
Public cxRightWidth As Integer
Public cyTopHeight As Integer
Public cyButtomheight As Integer
End Structure
<DllImport("dwmapi.dll")> _
Private Shared Function DwmExtendFrameIntoClientArea(ByVal hwnd As IntPtr, ByRef margin As MARGINS) As Integer
End Function

Me.BackColor = Color.Black
Dim mg As MARGINS = New MARGINS
mg.cxLeftWidth = -1
mg.cxRightWidth = -1
mg.cyTopHeight = -1
mg.cyButtomheight = -1
set all value -1 to apply glass effect to the all of visible window
Try
DwmExtendFrameIntoClientArea(Me.Handle, mg)
Catch ex As Exception
End Try[/code]
<br/>
<img src="http://social.microsoft.com/Forums/getfile/35666/" alt="

View the full article