opacity not works every-time for example if i want to use a image as my form base then every thing else must be hidden including form border.
to achieve this you have to set first form.border=none
and now to move form without border you need this code .....
http://www.daniweb.com/forums/thread31022.html
and to make the form transparent use
form.backcolor=color.hottrack
form.transperencykey=color.hottrack
you can change the colors but i suggest to use non regular colors only.
Public Class Form1
<Runtime.InteropServices.StructLayout(Runtime.InteropServices.LayoutKind.Sequential)> Public Structure MARGINS
Public LeftWidth As Integer
Public RightWidth As Integer
Public TopHeight As Integer
Public Buttomheight As Integer
End Structure
<Runtime.InteropServices.DllImport("dwmapi.dll")> Public Shared Function DwmExtendFrameIntoClientArea(ByVal hWnd As IntPtr, ByRef pMarinset As MARGINS) 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
Dim margins As MARGINS = New MARGINS
margins.LeftWidth = -1
margins.RightWidth = -1
margins.TopHeight = -1
margins.Buttomheight = -1
Dim result As Integer = DwmExtendFrameIntoClientArea(Me.Handle, margins)
Catch ex As Exception
MsgBox("Sistemul tau de operare nu are aero style!", vbCritical, "Fatal Error")
Application.Exit()
End Try
End Sub
End Class
Offline 
Online 
Unsolved 
