Wie man ein Wasserzeichen zu BMP hinzufügen Mit VBA

Mitglieder-Login

InformationenVisual Basics Programmierung

Wie Tabelle Werte in XLS -Format ko… A DataTable ist ein Objekt, das VB.NET Sie Daten in Spalten und Zeilen , um Ihre Leser lässt . Sie
Was ist ein 380 Fehler in Vb ? In Visual Basic, Error 380 bedeutet Invalid Property Value . Visual Basic wird diesen Fehler z
Wie ItemCheck Ereignis in Visual Ba… Microsoft Visual Basic ist ein Ereignis -basierte, objektorientierte Software- Programmiersprache. D
Wie man ein VBA ändern Cursor Zuga… Wissen, wie man den Mauszeiger in Microsoft Office Access ändern können Sie Ihre Access-Anwendung nu

Programming

HOME

* Computer Wissen >> Programming >> Visual Basics Programmierung >> .

Wie man ein Wasserzeichen zu BMP hinzufügen Mit VBA

Visual Basic für Applikationen können Sie Anwendungen erstellen, für Microsoft Office. Wenn Sie ein Bild, das Sie automatisch Wasserzeichen haben, können Sie die Sprache auf VB Wasserzeichen verwenden Sie die BMP-Bild mit Ihrem Namen oder Domain-Namen. Das Wasserzeichen speichert auf eine separate Bilddatei mit dem BMP-Bild kombiniert , so können Sie das Bild, um es vor Diebstahl zu schützen verteilen . Anleitung
1

rechten Maustaste auf das VB-Script Datei, die Sie bearbeiten möchten, und wählen Sie " Öffnen mit. " Wählen Sie den Skript-Editor Sie verwenden möchten . Wenn Sie nicht über ein VBA-Skript -Anwendung können Sie auch bearbeiten VBA mit Notepad.
2

Erstellen des Wasserzeichens . Das Wasserzeichen -Bild enthält einen transparenten Hintergrund , und Sie können einen beliebigen Text zu erstellen , in der Wasserzeichen Bild zeigen . Der folgende Code erstellt ein " myimage " Wasserzeichen für Sie:

wm.Draw ( " myimage " ) wm.SetPixel (100 , 100, Color.Red )

Der obige Code erzeugt ein Wasserzeichen, das 100 Pixel hoch und 100 Pixel breit, und das Wasserzeichen Text ist rot. Ersetzen Sie " myimage " mit dem Wasserzeichen Text, den Sie anzeigen möchten.
3

Kombinieren Sie das Wasserzeichen mit BMP-Bild . Der folgende Code verbindet die beiden Bilder zu einem neuen Bild für Ihre Webseite oder Desktop- Projekt zu erstellen:

Dim neue als Grafik = Graphics.FromImage ( " newimage.bmp " ) Dim alt As Graphics = Graphics.FromImage ( " oldimage.bmp " ) graphic.DrawImage (Wasserzeichen , neu, alt)

Ersetzen " oldimage.bmp " mit dem Bild, das Sie Wasserzeichen .
4

Speichern Sie die VBA Datei und doppelklicken Sie auf die Datei auf Ihrem Computer. Das Skript wird und Wasserzeichen Ihr Bild , so können Sie testen die neue VBA-Skript -Funktionen bieten.