Quel contrôle pour un bouton avec hyperlien ?

Bonjour à tou(te)s.

Je cherche désespérément le contrôle "bouton avec hyperlien" pour fabriquer une petite aide intégrée à mon soft sous forme de fichiers HML.

Merci d'avance pour vos réponses.

Jacques.

Salut,

Il existe le contrôle LinkLabel puis il suffit d'utiliser son événement click et insérer le code suivant:

System.Diagnostics.Process.Start("lien que tu veux atteindre")
Mais bon, c'est du VB .Net. Je ne sais pas si ça peut t'aider.

Ok merci chewbaka62, mais comment je le reconnais ce LinkLabel ? Je ne vois rien dans les contrôles de base qui ressemble à ça.

(je suis en VB6)

Salut,
20'' en cherchant sur le site:
http://www.vbfrance.com/codes/ACTIVEX-LABEL-COMME-LIEN-INTERNET-AVEC-FOCUS_4388.aspx

Maintenant j'ai pas testé, mais il doit y avoir d'autres sources sur le site suffit de chercher !!!!!!!!!!

Cordialement, Jean-Paul  
______________________________________________________________________

Le Savoir n'a de valeur que s'il est partagé

Merci Mr Valtrase, mais j'ai cherché plus de 20 secondes ... J'ai cherché dans le forum et dans les sources sur les mots-clés suivants :

- hyperlien
- bouton hyperlien

Je n'ai rien trouvé qui me convenait.
 
J'ai passé aussi du temps dans l'aide de VB, le MSDN etc, c'est tellement compliqué que je n'ai rien trouvé non plus, c'est pour cela que j'ai posté une question dans le forum. Curieusement, 36 heures après, je n'ai que deux réponses qui ne me conviennent pas. 

1) Le composant LinkLabel n'est pas un bouton
2) Le seul code de l'exemple du zip sert à quitter le programme : très utile
3) Je n'arrive pas à croire qu'il n'y ait pas dans VB6 un contrôle standard "hyperlien". Le tout est de savoir dans quel composant il se trouve. Et des composants, il y en a à peu près 150 dans VB6.

Maintenant si j'essaie le code de chewbaka62 :

Private Sub LabelInternet1_Click()
  System.Diagnostics.Process.Start (" [ Lien ]")
End Sub

Ca dit :

Erreur exécution 424 : un objet est requis.

Ok j'ai trouvé - sur un autre forum

Pas besoin de contrôle.

1) Déclarer dans un module la fonction et la constante suivantes (qui permettent d'appeler le navigateur) :

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

Const SW_SHOWNORMAL = 1

2) Créer un simple bouton et lui associer l'événement suivant :

Private Sub Command1_Click()

' Pour appeler un site Web :
' ShellExecute Me.hwnd, vbNullString, "www......", vbNullString, vbNullString, SW_SHOWNORMAL

' Pour appeler un fichier .htm présent sur C:\ :
  ShellExecute Me.hwnd, vbNullString, "index.htm", vbNullString, "C:\", SW_SHOWNORMAL

End Sub

Et voilà
Bonne journée.
Jack.