Visual Basic - ampliar imagen al pasar el mouse

Buenas tardes alguien me podría ayudar quiero hacer un programa que al encender mi PC se abra una imagen pequeña
en cualquier lugar del escritorio y al pasar el mouse se amplié, pero que la imagen siempre este ahí en el escritorio, se podrá hacer en visual basic o que me recomiendan.
Espero sus respuestas saludos.

Algo como esto pero aplicado a lo que quiero les dejo un enlace espero que no este prohibido:

http://www.ciudadblogger.com/2009/09/agrandar-imagen-al-pasar-el-mouse-ii.html

Una pequeña ayuda a lo que pretendes.
Si tenemos un formulario y un control Imagen, debes poner la propiedad del control image Stretch a True y elegir un Picture para el control image.

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Image1.Height = 500
Image1.Width = 500
End Sub

Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Image1.Height = 1000
Image1.Width = 1000
End Sub

Con lo que conseguiras un efecto parecido al que pretendes.

Buenas tardes amigo pero la verdad soy nuevo en esto me lo podrías explicar mas a detalle o me podrías escribir a mi correo por favor [email protected]
saludos racias.

Hola
La respuesta de Pedro Luis es bastante obvia, y a pesar de eso, pides más aclaraciones, lo que me hace suponer que prácticamente eres muy nuevo en esto.

Si es así, te comento un par de cosillas.

Primero, tienes que añadir al formulario un control Image

Luego activa la ventana de propiedades que esta
En la barra de herramientas debajo del menú (Icono - Ventana propiedades)

Esa ventana te muestra las propiedades que puedes cambiar del objeto que tengas seleccionado en el formulario, así como las del propio Formulario.

Dicho esto, lo que dice Pedro Luis es que cambies la propiedad Stretch del control Image y la pongas a True
Esto se hace para que la imagen ocupe toda la superficie del control.
Si haces eso, y pegas en el formulario en la sección General el texto que te ha indicado Pedro Luis
------------------------------------------------------------------------------------
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Image1.Height = 500
Image1.Width = 500
End Sub

Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Image1.Height = 1000
Image1.Width = 1000
End Sub
--------------------------------------------------------------------------------------
Conseguirías lo que estas buscando.
Solo una apreciación por mi parte
Si ponemos una condición IF ----- End If, evitaremos parpadeos molestos


Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Image1.Width > 500 Then
Image1.Height = 500
Image1.Width = 500
'Image1.Top = NuevaPosicion 'Resituamos el control
'Image1.Left = NuevaPosicion 'Resituamos el control
End If
End Sub

Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Image1.Width < 1000 Then
Image1.Height = 1000
Image1.Width = 1000
'Image1.Top = NuevaPosicion 'Resituamos el control
'Image1.Left = NuevaPosicion 'Resituamos el control
End If
End Sub

muchas gracias Megamind me sirvio mucho un saludo