[أمجد وضاح]

هذا كود لجعل الفورم شفافا 

كود :

Public Class Form1
   Public Pont As Point
   Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown
       If e.Button = Windows.Forms.MouseButtons.Left Then
           Pont = e.Location
       End If
   End Sub
   Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
       If e.Button = Windows.Forms.MouseButtons.Left Then
           Me.Location += e.Location - Pont
       End If
   End Sub
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Me.TransparencyKey = BackColor
   End Sub

كما يحب البعض عمل صوره لكيجن وجعل الفورم شفافا

وهذا كود زر النسخ 

كود :

Clipboard.SetText(Text1.text)
Label1.text="تم النسخ بنجاح"