Windows Vista & 7 Glass Effect

[Pc_Not_Mac]

The glass effect was the reason why i got Microsoft Windows Vista.
It looks very cool.
In general Microsoft has a better GUI then Apple Mac OSX 10.6 or 10.7 i lost track.
But Windows 7 has to be the best OS\GUI in 2009 - 2010.

With this little code that i have typed up on my typewriter
your program can look like Windows Explore etc...

Requirements

Windows 7 or Vista

Preview


Code

Imports System.Runtime.InteropServices
 
Public Class Form1
    <Runtime.InteropServices.StructLayout(Runtime.InteropServices.LayoutKind.Sequential)> Public Structure Side
        Public Left As Integer
        Public Right As Integer
        Public Top As Integer
        Public Buttom As Integer
    End Structure
 
    <Runtime.InteropServices.DllImport("dwmapi.dll")> Public Shared Function DwmExtendFrameIntoClientArea(ByVal hWnd As IntPtr, ByRef pMarinset As Side) As Integer
    End Function
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Try
            Me.BackColor = Color.Black 'It has to be black 
            Dim side As Side = New Side
            side.Left = -1
            side.Right = -1
            side.Top = -1
            side.Buttom = -1
            Dim result As Integer = DwmExtendFrameIntoClientArea(Me.Handle, side)
        Catch ex As Exception
            MessageBox.Show(ex.Message)
 
        End Try
    End Sub
End Class

Good Luck