Cómo agregar una marca de agua a BMP con VBA

Visual Basic para aplicaciones permite crear aplicaciones de Microsoft Office. Si tienes una imagen que quiera para marca de agua de forma automática , puede utilizar el lenguaje Visual Basic para la marca de agua de imagen BMP con su nombre o el nombre de dominio. La marca de agua almacena en un archivo de imagen independiente junto con la imagen BMP , por lo que puede distribuir la imagen para protegerlo contra robos . Instrucciones
1

Haga clic en el archivo de comandos VB que desea editar y seleccione " Abrir con". Seleccione el editor de secuencia de comandos que desea utilizar . Si usted no tiene una aplicación de escritura VBA , también puede editar VBA con el Bloc de notas .
2

Crear la imagen de marca de agua . La imagen de marca de agua contiene un fondo transparente, y usted puede crear cualquier texto a mostrar en la imagen de marca de agua . El siguiente código crea una marca de agua " myimage " para usted :

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

El código anterior crea una marca de agua que es de 100 píxeles de alto por 100 píxeles de ancho , y el texto de marca de agua es de color rojo . Reemplazar " myimage " con el texto de la marca que desea visualizar .
3

Combinar la imagen de agua con su imagen BMP . El código siguiente se combinan las dos imágenes para crear una nueva imagen para su sitio web o proyecto de escritorio :

Dim nueva como gráficos = Graphics.FromImage ( " newimage.bmp ") Dim edad como gráficos Graphics.FromImage = ( " oldimage.bmp ") graphic.DrawImage ( marca de agua , nuevo, edad)

Reemplazar " oldimage.bmp " con la imagen que deseas marca de agua .
4

Save the VBA archivo y haga doble clic en el archivo en su computadora . Las carreras de script y marcas de agua a su imagen , para que pueda probar la funcionalidad de la nueva secuencia de comandos VBA.