|
Visual Basic pour Applications permet de créer des applications pour Microsoft Office. Si vous avez une image que vous voulez filigrane automatiquement , vous pouvez utiliser le langage VB filigrane l'image BMP avec votre nom ou nom de domaine. Le filigrane stocke dans un fichier image séparé combiné avec l'image BMP, de sorte que vous pouvez distribuer l'image à protéger contre le vol . Instructions
1 clic droit sur le fichier de script VB vous souhaitez modifier, puis sélectionnez " Ouvrir avec". Sélectionnez l'éditeur de script que vous souhaitez utiliser. Si vous ne disposez pas d'une application de script VBA, vous pouvez également modifier VBA avec Notepad .
2 créer l'image du filigrane. L'image en filigrane contient un fond transparent, et vous pouvez créer n'importe quel texte à afficher dans l'image du filigrane. Le code suivant crée un filigrane " myimage " pour vous:
wm.Draw ( " myimage " ) wm.SetPixel (100, 100 , Color.Red )
Le code ci-dessus crée un filigrane qui est de 100 pixels de haut par 100 pixels de large , et le texte du filigrane est rouge. Remplacer " myimage " avec le texte du filigrane que vous souhaitez afficher .
3 Combiner l'image en filigrane à votre image BMP . Le code suivant combine les deux images pour créer une nouvelle image pour votre site Web ou d'un projet de bureau :
Dim nouveau Comme Graphics = Graphics.FromImage ( " newimage.bmp " ) Dim vieux que Graphics = Graphics.FromImage ( " oldimage.bmp " ) graphic.DrawImage ( filigrane , nouveau, vieux )
Remplacer " oldimage.bmp " avec l'image que vous voulez filigrane .
4 Save the VBA fichier et double- cliquez sur le fichier sur votre ordinateur. Les pistes de script et les filigranes votre image , de sorte que vous pouvez tester la fonctionnalité du nouveau script VBA.
|
