Vb.net - Mover formulário Transparente

Para mover um formulário transparente no VB.net utilizem o código abaixo  dentro da Classe do Formulário e pronto.

Public Class Form1

    Const WM_NCHITTEST As Integer = &H84
    Const HTCLIENT As Integer = &H1
    Const HTCAPTION As Integer = &H2

    Protected Overrides Sub WndProc(ByRef m As Message)
        Select Case m.Msg
            Case WM_NCHITTEST
                MyBase.WndProc(m)
                If m.Result = HTCLIENT Then m.Result = HTCAPTION
            Case Else
                MyBase.WndProc(m)
        End Select
    End Sub
End Class

Editor Script Batch

Masvat-v2.0 

Além de editar também podemos compilar e gerar um executável

font: http://masim-masosoft.blogspot.com.br/2012/08/masbat-v20-beta.html

Batch Script que retorna tamanho da string

Retornando tamanho de variável

Script StrLen

@echo off :novo echo Entre com um texto: set /p "mystring=" call :strlen result myString echo %result% goto :eof :strlen <resultVar> <stringVar> (        setlocal EnableDelayedExpansion     set "s=!%~2!#"     set "len=0"     for %%P in (4096 2048 1024 512 256 128 64 32 16 8 4 2 1) do (         if "!s:~%%P,1!" NEQ "" (              set /a "len+=%%P"             set "s=!s:~%%P!"         )     ) ) (      endlocal     set "%~1=%len%"     exit /b ) :eof pause < nul