Es bastante fácil, mira:

1.Como contenedor usa un panel.

2.Metes dentro los pictureboxes que quieras (preferiblemente añádelos en tiempo de ejecución, porque si tienes que meter 30 o 50 pictureboxes... se te va a quedar pequeña la pantalla para agrandar el panel e ir metiendoles desde el designer xD)

3. Y ya el resto es símplemente usar las scrollbar del panel "Panel1.VerticalScroll." (Aunque no las tengas activas ni estén visibles, puedes usarlas para scrollear).

Puedes capturar la rueda del botón en el evento "Panel1.MouseWheel" de la forma que ya has visto en uno de mis codes,
Y si quieres hacer medio transparente el panel es suficiente con que uses un color ARGB, donde la A es el canal Alpha (transparencia), el valor máximo es 255, si lo pones a 125 pues el panel se verá al 50% de transparencia.


Es una versión barata, te puede dar algunos problemas de Flickering (parpadeos) como se puede apreciar en el vídeo, me gustaría saber evitar los problemas de flickering, pero esto es WindowsForms y creeme que he preguntado a 1.000 expertos y nadie tiene la respuesta xD, es lo que hay.

PD: ¿Esperabas un code?  

Saludos

EleKtro si no quieres flickering no utilices Windows Forms. Para ello tienes WPF, tecnología que utiliza la aceleración por hardware (GPU) para el procesamiento gráfico, no como Windows Forms que utiliza el procesador para todo tipo de cómputo.

Ahora estoy sufriendo ya que he lanzado una aplicación comercial bastante amplia y necesita un par de toques gráficos. Al haberla implementado en Win Forms la app consume bastantes recursos al presentar gráficos y animaciones. Espero que si todo me va bien poder portarla a WPF.

P.D = WPF trabaja en el diseño de los controles con XAML, ni te puedes imaginar las maravillas que se pueden conseguir con éste.

Seazoux, no te recomiendo "petar" mucho la aplicación o ya verás lo que pasará xD.

Saludos!

Por las transparencias no te preocupes... Me vas a tener que ayudar con los codes... ya que no puedo estar mucho tiempo en el PC  

Puedes ayudarme?  

---

Tengo un pequeño problema...

Uno quiero hacer que cuando este sobre la imagen la imagen se amplie, y que salga los dos botones que se puede ver en el pantallazo...

Dos quiero hacer que cuando se clique en un boton (el de añadir) y lo selecciones de una lista que usara PHP y MySQL te cree un control (PictureBox) con los datos que no se aun si sacaros de un TXT  

---

Que puede pasar?

Ahora que leo ese último comentario, se me olvidó pasarte el form del video xD:

Añade en el form:
1 un panel y métele pictureboxes
1 botón para scrollear hacia arriba
1 botón apra scrollear hacia abajo

Public Class Form1
 
    Dim Scroll_Position As Int32 = 0
    Dim Button_Down_Is_Pressed As Boolean = False
    Dim Button_Up_Is_Pressed As Boolean = False
    Dim WithEvents Progressive_Scroll_Timer As New Timer
    Dim SmallChange As Int32 = 5
    Dim Largechange As Int32 = 10
 
    ' Sub which reduces the Flickering, but this sub makes x20 times slower any operation of any Form/Application.
    Protected Overrides ReadOnly Property CreateParams() As CreateParams
        Get
            Dim cp As CreateParams = MyBase.CreateParams
            cp.ExStyle = cp.ExStyle Or &H2000000
            Return cp
        End Get
    End Property 'CreateParams
 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.ResumeLayout(False)
        Panel1.ResumeLayout(False)
 
        Panel1.VerticalScroll.Maximum = 999999999
        Progressive_Scroll_Timer.Interval = 50
        Panel1.BackColor = Color.FromArgb(150, 0, 0, 0)
    End Sub
 
    Private Sub Panel_MouseHover(sender As Object, e As EventArgs) Handles Panel1.MouseHover
        sender.focus()
    End Sub
 
    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Progressive_Scroll_Timer.Tick
        If Button_Down_Is_Pressed Then
            Scroll_Down(SmallChange)
        ElseIf Button_Up_Is_Pressed Then
            Scroll_Up(SmallChange)
        Else
            sender.stop()
        End If
    End Sub
 
    Private Sub Scroll_Up(ByVal Change As Int32)
        Scroll_Position -= Change
        Try : Panel1.VerticalScroll.Value = Scroll_Position : Catch : Scroll_Position += Change : End Try
    End Sub
 
    Private Sub Scroll_Down(ByVal Change As Int32)
        Scroll_Position += Change
        Try : Panel1.VerticalScroll.Value = Scroll_Position : Catch : Scroll_Position -= Change : End Try
    End Sub
 
    Private Sub Button_Down_MouseDown(sender As Object, e As MouseEventArgs) Handles Button2.MouseDown
        If e.Button = Windows.Forms.MouseButtons.Left Then
            Button_Down_Is_Pressed = True
            Progressive_Scroll_Timer.Start()
        End If
    End Sub
 
    Private Sub Button_Up_MouseDown(sender As Object, e As MouseEventArgs) Handles Button1.MouseDown
        If e.Button = Windows.Forms.MouseButtons.Left Then
            Button_Up_Is_Pressed = True
            Progressive_Scroll_Timer.Start()
        End If
    End Sub
 
    Private Sub Button_Down_MouseUp(sender As Object, e As MouseEventArgs) Handles Button2.MouseUp
        Button_Down_Is_Pressed = False
    End Sub
 
    Private Sub Button_Up_MouseUp(sender As Object, e As MouseEventArgs) Handles Button1.MouseUp
        Button_Up_Is_Pressed = False
    End Sub
 
    Private Sub Form_MouseWheel(ByVal sender As Object, ByVal e As MouseEventArgs) Handles Panel1.MouseWheel
        If Panel1.Focused Then
            Select Case Math.Sign(e.Delta)
                Case Is > 0 : Scroll_Up(Largechange)
                Case Is < 0 : Scroll_Down(Largechange)
            End Select
        End If
    End Sub
 
End Class

salu2

jajajajaja