Bonsoir,

1) Pour le pictureBox colorié en noir, as  tu chargé une image noire ou as-tu défini le background du picturebox en noir car il faut pour cette application, charger une image.
Son code analyse une image :

        monImage = New Bitmap(dessinFile & "CarteRegions.png")
        PictureBox1.Image = CType(monImage, Bitmap)
        pixelColor = monImage.GetPixel(aBs, oRd)

2) Pour le code de la couleur, j’utilise beaucoup Firefox avec une de ses extensions : ColorZilla.
Je choisis une image quelconque, clic droit dessus, « ouvrir avec », je choisis Firefox et avec cette extension, on peut  connaître le code de toutes les couleurs de l’image.
La fonction GetPixel  ci-dessus donne les mêmes informations sur la couleur sous le curseur.

3) Pour peindre, il faut définir une région, sans quoi, le picturebox ou plus généralement le contrôle  sera peint en entier.

4) Ce code a été fait avec VB.net 2003, suite à ton message je l’ai testé sous vb.net 2005, c’est  nul.
La fonction SetPixel qui recherche chaque pixel de la région ou la zone à repeindre est beaucoup plus (trop) lente.
J’ai repris cette source avec une autre méthode que je posterai en mise à jour.

5) Pour info, j’ai dessiné, sur la base d’une carte d’écolier, les contours de la carte avec un logiciel de dessin 2D et fais les retouches et la couleur avec photoshop.

Bien cordialement.

Il est beau ce poisson, RENAUD34,
J’ai appliqué ton code, sur un TextBox nommé « tbPrixU » comme suit :

     Private Sub tbPrixU_KeyPress(ByVal sender As Object, _
    ByVal e As System.Windows.Forms.KeyPressEventArgs) _
    Handles tbPrixU.KeyPress
        If e.KeyChar = ChrW(46) Then
            e.KeyChar = ChrW(44)
        End If
    End Sub

    Private Sub tbPrixU_Validated(ByVal sender As Object, _
    ByVal e As System.EventArgs) Handles tbPrixU.Validated
        tbPrixU.Text = Format(CDbl(tbPrixU.Text), "#0.00")
    End Sub

Ca fonctionne bien, mais je n’ai pas trouvé de solution pour une mise en forme, autre que celle proposée par la culture anglaise.
Je sais, je chipote,  mais j’aimerais la virgule.
Je modifie ma source avec 2 exemples.

A vrai dire, j’ai délaissé Excel depuis quelque temps.
Pour un peu d’aide, MSDN, reste une valeur sûre.
Regardez du coté de :
http://msdn.microsoft.com/library/fre/default.asp?url=/library/fre/dv_wrcore/html/wroriExcel-BasedSamples.asp
Bonne continuation.

Pour ceux qui veulent un exemple sur MeasureString, regardez là :
http://www.codeproject.com/vb/net/MeasureStrings.asp

Bonjour COlive,
Le Usercontrol n'a pas toutes les fonctionnalités d'un contrôle
hérité Button.
Je pense à la méthode "Button.PerformClick", qui sauf erreur,
n'est pas accessible depuis un Usercontrol.
D'ailleurs, j'emploie cette méthode dans le code de la Form de
l'exemple, dans la Sub btrOk_Click.
Cordialement.
  

Bonjour à tous,
COlive, les fonctions que tu proposes fonctionnent très bien sur
sur le combo lui même, mais pas sur sa liste déroulante qui semble être l'objet visuel le plus au dessus dans un formulaire.
Mais ton intuition (comme celle de Benouille), "sur la visibilité
de l'objet" est la bonne.
Vos remarques ont réactivé mon envie de chercher et j'ai trouvé
un bout de code fait sur mesure (mes sources sont dans le code).
Il faut passer par les Api. On détache le "tooltip" de son
appartenance au formulaire. En plus tout cela reste très
accessible.
Je vais faire une mise à jour.
A vous revoir.

Bonjour MoiDebutantVB
Je pensais qu’une adresse Email ne devait pas comprendre de majuscules,
comme chez Wanadoo.
Donc, dans mon code, je les avais interdites.
Pour les autoriser, à la ligne 160, dans la proc « Private Sub
tnTester_Click … »
il faut remplacer :

  If Regex.IsMatch(txtEMail.Text, _
     "^[a-z09._-]+@[a-z09._-]{2,}\.[a-z]{2,4}$") = True Then

par :

  If Regex.IsMatch(txtEMail.Text, _
     "^[a-zA-Z0-9._-]+@[a-zA-Z0-9._-]{2,}\.[a-z]{2,4}$") = True Then

Bonjour à vous trois et scusez moi, j'ai posté ceci de trop
bonne heure et j'ai omis de rappelé ma source principale ici, et
qui se trouve en préambule du fichier "BoutonXP" à savoir :
Inspiré du travail remarquable de Gildeoni Nogueira Santos (C# HELP).
Plus d'autres que je citerai.
Je compte faire une mise à jour apportant un petit truc en plus
et je veillerai à donner plus d'explications.

Bonjour OneHacker
Pas besoin de Handles après MyProc
Je crois qu'il y a 2 méthodes pour gérer les événements.
Pour l'exemple : un contrôle Button appelé btn1.

1) La méthode classique, celle que VB applique automatiquement
  en mode Désign :
  - Dans la section déclaration :
  Friend WithEvents btn1 As System.Windows.Forms.Button
  - La prog. :
  Private Sub btn1_Click(ByVal sender As System.Object, _
  ByVal e As System.EventArgs) Handles btn1.Click
  ...........
  End Sub

2) La méthode dynamique avec AddHandler :
  - L'instruction AddHandler spécifie le nom de l'émetteur
  d'événement suivi de , AddressOf qui fournit le nom du
  gestionnaire d'événement :
  AddHandler btn1.Click, AddressOf btn1_Click
  - La prog. contenant le code à exécuter :
  Private Sub btn1_Click(ByVal sender As System.Object, _
  ByVal e As System.EventArgs)
  ...........
  End Sub

Le handle est dans la 1ière ligne et VB exécute la prog., si
btn1 est cliqué.

Enfin, c'est comme cela que j'ai compris la chose.

Benouille, tout d'abord merci pour ton intérêt.
Le textbox comme le label reste en dessous.
Bon, je vais remettre l'ouvrage sur le métier.