Visual Basic for Applications kan du skapa applikationer för Microsoft Office . Om du har en bild som du vill automatiskt vattenstämpel kan du använda VB språket till vattenstämpel BMP bild med ditt namn eller domännamn . Den vattenstämpel lagrar till en separat bildfil kombination med BMP bild , så att du kan dela bilden för att skydda den från stöld . Instruktioner
1
Högerklicka på VB script fil du vill redigera och välj " Öppna med ". Välj manusförläggare du vill använda . Om du inte har ett VBA script program , kan du även redigera VBA med Anteckningar .
2
Skapa en vattenstämpel . Den vattenstämpel bild innehåller en genomskinlig bakgrund , och du kan skapa någon text att visa i vattenstämpel bilden . I följande kod skapas ett " myimage " vattenstämpel för dig :
wm.Draw ( " myimage " ) wm.SetPixel ( 100 , 100 , Color.Red ) katalog
Koden ovan skapar en vattenstämpel som är 100 pixlar hög med 100 pixlar bred , och vattenstämpel text är röd . Ersätt " myimage " med vattenstämpel text du vill visa . Addera 3
Kombinera vattenstämpel bilden med din BMP bild . Följande kod kombinerar två bilder för att skapa en ny bild till din hemsida eller stationära projekt :
Dim nytt Som Graphics = Graphics.FromImage ( " newimage.bmp " ) Dim gammal som Graphics = Graphics.FromImage ( " oldimage.bmp " ) graphic.DrawImage ( vattenstämpel , nytt , gammalt ) katalog
Ersätt " oldimage.bmp " med den bild som du vill vattenstämpel .
4
Spara VBA -filen och dubbelklicka på filen på din dator . Manuset körs och vattenstämplar din bild , så du kan testa den nya VBA skript funktionalitet .
