Come aggiungere una filigrana in BMP con VBA

Visual Basic Applications Edition consente di creare applicazioni per Microsoft Office . Se si dispone di un'immagine che si desidera filigrana automaticamente, è possibile utilizzare il linguaggio VB per filigrana l'immagine BMP con il tuo nome o il nome di dominio . Il nome memorizza in un file di immagine separato combinato con l'immagine BMP , in modo da poter distribuire l'immagine per proteggerlo dal furto. Istruzioni
1

destro del mouse sul file di script VB che si desidera modificare e selezionare " Apri con ". Selezionare l' editor di script che si desidera utilizzare . Se non si dispone di un'applicazione di script VBA , è possibile anche modificare VBA con blocco note.
2

Creare l'immagine della filigrana . L' immagine della filigrana contiene uno sfondo trasparente , ed è possibile creare qualsiasi testo per mostrare l'immagine filigrana . Il codice seguente crea una filigrana " myimage " per voi :

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

Il codice crea sopra una filigrana che è di 100 pixel di altezza per una larghezza di 100 pixel, e il testo della filigrana è rosso . Sostituire " myimage " con il testo della filigrana che si desidera visualizzare .
3

Combina l'immagine della filigrana con la vostra immagine BMP . Il codice seguente combina le due immagini per creare una nuova immagine per il vostro sito web o di un progetto sul desktop :

Dim nuovo Come Graphics = Graphics.FromImage ( " newimage.bmp " ) Dim vecchio come grafica Graphics.FromImage = ( " oldimage.bmp " ) graphic.DrawImage ( filigrana , nuovo , vecchio ) per

Sostituire " oldimage.bmp " con l' immagine che si desidera filigrana .
4

Save the file di VBA e fare doppio clic sul file sul computer. Le piste di script e filigrane vostra immagine , in modo da poter testare le funzionalità del nuovo script di VBA .

• Codice Visual Basic per Flash Player 
• Come fare il vostro browser WPF visualizzazione di applicazioni in un iFrame