La Richtextbox affiche automatiquement les émoticônes
En utilisant le clipboard j'ai réussi à isoler l'image
ma collection d'emoticones ( pour l'instant fichier par fichier
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionPublic Function CompareImages(ByVal img1 As Bitmap, ByVal img2 As Bitmap) As Boolean Dim i As Integer Dim j As Integer For i = 0 To img1.Width - 1 For j = 0 To img2.Height - 1 If img1.GetPixel(i, j) <> img2.GetPixel(i, j) Then Return False End If Next Next Return True End Function