Como poner un icono en Formulario en tiempo de ejecución Visual net

Hola os pongo esta simple rutina para poner en un formulario pero en programación un icono tuve que buscar bastante por eso os lo pongo

solo tienen que ubicar el archivo y su ruta ya cuando generen el programa este queda incrustado

Me.Icon = New System.Drawing.Icon("C:\Users\Acu\Desktop\fotoscriosass\triples\1.ico")

Desplazar el foco entre los distintos controles VISUAL NET

 funcion foco para ir saltando de control en control en visual net

    Protected Overrides Function ProcessCmdKey(ByRef msg As Message, ByVal keyData As Keys) As Boolean

        Select Case keyData

            Case Keys.Return

                ' Desplazar el foco entre los distintos controles
                ' mediante la tecla Return. El código está basado en un
                ' ejemplo de Francesco Balena.
                '
                ' Iniciar todos los controles seleccionados actualmente.
                '
                Dim ctrl As Control = Me.ActiveControl

                Do
                    ' Obtener el siguiente control hacia delante en el
                    ' orden de tabulación.
                    ctrl = Me.GetNextControl(ctrl, True)

                    ' GetNextControl(ctrl, False) puede devolver Nothing si
                    ' es el primer control.

                    If (Not (ctrl Is Nothing) AndAlso (ctrl.CanFocus) AndAlso (ctrl.TabStop)) Then
                        ' Si el control puede recibir el foco, se lo doy.
                        ctrl.Focus()
                        Exit Do
                    End If
                Loop

        End Select

        Return MyBase.ProcessCmdKey(msg, keyData)

    End Function