 Autor
|
Tema: [Ayuda] Mi otro programa (Leído 1,966 veces)
|
Powa
 Desconectado
Mensajes: 48
¡1, 2, 3!
|
Hola a todos, bueno quisiera saber como se hace que para que cuando uno haga click en una imagen lo lleve a un link por ejemplo, la imagen del logo de Google haga click y abra el navegador (pretemitado) y luego lleve a Google.
¿Se puede? Gracias.
Saludos.
|
|
|
|
« Última modificación: 31 Agosto 2009, 16:58 pm por Powa »
|
En línea
|
|
|
|
.;.
Desconectado
Mensajes: 354
|
Buscas la accion de la imagen. Bueno te dejo el code: Option Explicit
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Sub Image1_Click()
Dim X
X = ShellExecute(Me.hwnd, "Open", "http://www.google.com", &O0, &O0, 0)
End Sub
|
|
|
|
|
En línea
|
|
|
|
Powa
Desconectado
Mensajes: 48
¡1, 2, 3!
|
Buscas la accion de la imagen. Bueno te dejo el code: Option Explicit
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Sub Image1_Click()
Dim X
X = ShellExecute(Me.hwnd, "Open", "http://www.google.com", &O0, &O0, 0)
End Sub
Muchicimas gracias, me sirvio. Saludos. ¡TEMA CERRADO!
|
|
|
|
|
En línea
|
|
|
|
|
 |
