[Visual Basic 2010] Mettre un texte différent sur une NotifyIcon
Fermé
loickiko
Messages postés
10
Date d'inscription
vendredi 12 avril 2013
Statut
Membre
Dernière intervention
21 mars 2014
-
Modifié par loickiko le 20/03/2014 à 20:15
clubdedub7 Messages postés 79 Date d'inscription dimanche 30 octobre 2011 Statut Membre Dernière intervention 4 août 2015 - 21 mars 2014 à 23:28
clubdedub7 Messages postés 79 Date d'inscription dimanche 30 octobre 2011 Statut Membre Dernière intervention 4 août 2015 - 21 mars 2014 à 23:28
A voir également:
- [Visual Basic 2010] Mettre un texte différent sur une NotifyIcon
- Visual basic download - Télécharger - Langages
- Dans le texte, un seul mot a réellement été écrit en lettres capitales (majuscules). quel est ce mot ? ✓ - Forum Word
- Mettre un texte en majuscule - Guide
- Formule excel si contient texte alors texte ✓ - Forum Excel
- Telecharger word 2010 - Télécharger - Traitement de texte
3 réponses
cs_Le Pivert
Messages postés
7883
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
18 mars 2023
724
21 mars 2014 à 17:03
21 mars 2014 à 17:03
Bonjour,
et en faisant simplement cela:
et en faisant simplement cela:
With NotifyIcon1
.Text = "Titre.:D "
End With
clubdedub7
Messages postés
79
Date d'inscription
dimanche 30 octobre 2011
Statut
Membre
Dernière intervention
4 août 2015
4
Modifié par clubdedub7 le 21/03/2014 à 18:32
Modifié par clubdedub7 le 21/03/2014 à 18:32
Bonjour,
Je vous présente un exemple de mon code, je pense que cela pourrait vous aider.
=>
Dim TitreTiranium as string = "mon titre" 'on déclare le titre en tant que string
Dim CorpsTiranium as string = "Le corps du message" 'On déclare le corps du message
Notifyicon1.visible = true 'On affiche l'icône dans la barre des tâches
Notifyicon1.BalloonTipTitle = TitreTiranium 'on insère le titre qu'on as récemment déclaré
Notifyicon1.BalloonTipText = CorpsTiranium 'pareil pour le corps
Notifyicon1.showballontip(9000) 'On affiche le message ballon pendant 9000 millisecondes.
Développeur de Tiranium Anti-Virus - Tiranium-AntiVirus . Com
Je vous présente un exemple de mon code, je pense que cela pourrait vous aider.
=>
Dim TitreTiranium as string = "mon titre" 'on déclare le titre en tant que string
Dim CorpsTiranium as string = "Le corps du message" 'On déclare le corps du message
Notifyicon1.visible = true 'On affiche l'icône dans la barre des tâches
Notifyicon1.BalloonTipTitle = TitreTiranium 'on insère le titre qu'on as récemment déclaré
Notifyicon1.BalloonTipText = CorpsTiranium 'pareil pour le corps
Notifyicon1.showballontip(9000) 'On affiche le message ballon pendant 9000 millisecondes.
Développeur de Tiranium Anti-Virus - Tiranium-AntiVirus . Com
loickiko
Messages postés
10
Date d'inscription
vendredi 12 avril 2013
Statut
Membre
Dernière intervention
21 mars 2014
21 mars 2014 à 22:14
21 mars 2014 à 22:14
Merci, mais moi à
il me met une erreur, sachant que j'ai mis
il me met une erreur :S
+nouveau problème, j'avais utilisé comme page d'exemple youtube, mais avec mon "vrai" site,
voici youtube :
voici le "vrai" site :
on peut nettement voir la différence, donc j'ai encore et toujours besoin de vous ^^
.BalloonTipText = Titre ' Corps du message.
il me met une erreur, sachant que j'ai mis
Dim Titre As String = WebBrowser1.Document.GetElementById("ID").GetAttribute("TRUC")
il me met une erreur :S
+nouveau problème, j'avais utilisé comme page d'exemple youtube, mais avec mon "vrai" site,
voici youtube :
<span id="eow-title" class="watch-title yt-uix-expander-head" title="ceci est le titre" dir="ltr">ceci est le titre</span>
voici le "vrai" site :
<div id="artist" class="txt1">ceci est le titre</div>
on peut nettement voir la différence, donc j'ai encore et toujours besoin de vous ^^
clubdedub7
Messages postés
79
Date d'inscription
dimanche 30 octobre 2011
Statut
Membre
Dernière intervention
4 août 2015
4
Modifié par clubdedub7 le 21/03/2014 à 23:28
Modifié par clubdedub7 le 21/03/2014 à 23:28
Bonsoir,
D'accord je vois :)
Si tu me permets, je vais ré-écrire ton code :)
Voilà, tout est déjà présent dans ce code, tu n'as plus qu'à le copier et coller :)
J'espère t'avoir aidé,
Bonne soirée.
Développeur de Tiranium Anti-Virus - Tiranium-AntiVirus . Com
D'accord je vois :)
Si tu me permets, je vais ré-écrire ton code :)
Dim prendre_lindex As String = WebBrowser1.DocumentText.Substring(WebBrowser1.DocumentText.IndexOf("txt1" & Chr(34)), WebBrowser1.DocumentText.Length - WebBrowser1.DocumentText.IndexOf("txt1" & Chr(34)))
' On prend lindex du => txt1"
prendre_lindex = prendre_lindex.Substring(prendre_lindex.IndexOf(">") + 1, prendre_lindex.Length - prendre_lindex.IndexOf(">") - 1)
'on coupe pour prendre uniquement le texte après >
prendre_lindex = prendre_lindex.Substring(0, prendre_lindex.IndexOf("<"))
'on coupe pour prendre uniquement le texte avant <
Notifyicon1.BalloonTipText = prendre_lindex 'on insere le resultat dans le ballon
Notifyicon1.showballontip(6000) 'et on laffiche pour finir
Voilà, tout est déjà présent dans ce code, tu n'as plus qu'à le copier et coller :)
J'espère t'avoir aidé,
Bonne soirée.
Développeur de Tiranium Anti-Virus - Tiranium-AntiVirus . Com