Entradas

Mostrando entradas de 2016

APLICA CSS CON SPAN

<span style="font-family: papyrus; font-size: 3em; color:#9f0025"> Venta de automoviles el buen motor</span><br> <span style="font-family: luna bar; font-size: 1.5em; color:#ff003c"> PEDIDOS 2016</span>

EJERCICIO

Imagen

como poder trabajar un archivo html dentro de php en una misma pagina

<html> <title></title> <head> <meta charset="utf-8"> <style type="text/css"> td{ color:#0080FF; font-family:arial; font-size:15px; } input{ background:#E6E6E6; color:#0080FF; width:100%; } input:hover{ background:#F6E3CE; } button{ background:#81BEF7; border:none; width:80px; height:40px; cursor:pointer; border-radius:0.5em; color:#013ADF; font-family:arial black; } table{ border-radius:0.5em; } </style> </head> <body> <? if(!$_POST) {//validamos nuestro formulario ?> <form action="<? $_POST ?>" method=post> <table border="2" align="center" width="500"> <tr> <td>INGRESE SU NOMBRE</td> <td><input type="text" name="nombre"></input></td> </tr> <tr> <td>INGRESE SU CORREO</td> <td><input type="text" name=...

TUTORIAL PARA INSTALAR APPSERVER

LINK PARA INSTALAR APPSERV https://www.youtube.com/watch?v=So3yLF2ugus LINK PARA INSTALAR NOTPAD++ , APPSERV Y COMO UTILIZAR EL el localhost para programar en php https://www.youtube.com/watch?v=tmIGChYqw9c

llamando formularios

Load ventas  /// llamamos la ventana Unload menu_principal // ocultamos la ventana ventas.Show// activamos la ventana

MODULO PARA GUARDAR DATOS

Sub registro() IDPRODUCTO = UserForm1.TextBox1.Text CATEGORIA = UserForm1.TextBox2.Text PRODUCTO = UserForm1.TextBox3.Text CANTIDAD_INGRESADA = UserForm1.TextBox4.Text PRECIO_UNIT = Val(UserForm1.TextBox5.Text) Total = Val(UserForm1.TextBox6.Text) End Sub

BOTÓN GUARDAR EN EXCEL

registro Sheets("datos").Select ult = Cells(Rows.Count, 1).End(xlUp).Row Cells(ult + 1, 1) = TextBox1.Text Cells(ult + 1, 2) = TextBox2.Text Cells(ult + 1, 3) = TextBox3.Text Cells(ult + 1, 4) = TextBox4.Text Cells(ult + 1, 5) = TextBox5.Text Cells(ult + 1, 6) = TextBox6.Text _____________________________________________ ESTO PERMITE INGRESAR LOS DATOS A NUESTRA HOJA DATOS

codigo de galeria

#galeria{ width:100%; height:100%; margin:0 auto; } #galeria li{ float:left; } #galeria li img{ width:150px; height:150px; margin:10px 2px 12px 25px; border:2px solid blue; } #galeria img:hover {   opacity:1;   z-index:20;   -moz-transform:scale(1.5);                   /* zoom en navegador Firefox */   -webkit-transform:scale(1.5);                /* zoom en navegador Chrome y Safari */   -o-transform:scale(1.5);   }

TRABAJANDO CON OPCIONES

if  OptionButton1= True Then TextBox1.Text="resultado" End If este es el pequeño bloque para programar un grupo de opciones

EJERCICIO DEI VBA FACTURA

Imagen
REALIZAR ESTA FACTURA SENCILLA SI LA COMPRA ES >=100 APLICAR EL 5% DE DESCUENTO, SE CALCULA  %5 =0.05 EL TOTAL A PAGAR SE RESTA TOTAL -DESCUENTO SI NO HAY DESCUENTO EL  ES CERO Y EL TOTAL  SERA IGUAL AL TOTAL A PAGAR

efecto hover

#menu{ height:100px; width:100%; text-align:center; } #menu a img{ width:80px; height:80px; } #menu a{ display:inline-block; } #menu a:hover img{ width:90px; height:90px; -webkit-transition: all .3s ease-in-out; -moz-transition: all .3s ease-in-out; -o-transition: all .3s ease-in-out; -ms-transition: all .3s ease-in-out; transition: all .3s ease-in-out; }

IF Y IF ANIDADO

Private Sub CommandButton1_Click() TextBox5.Text = Val(TextBox3.Text) * Val(TextBox4.Text) If Val(TextBox5.Text) >= 4000 Then TextBox6.Text = Val(TextBox5.Text) * 0.02 Else TextBox6.Text = 0 End If TextBox7.Text = Val(TextBox5.Text) - Val(TextBox6.Text) End Sub _________________________________________________________________________________ IF ANIDADO  Private Sub CommandButton1_Click() If Val(TextBox1.Text) = 1 Then   TextBox2.Text = " HOY ES DIA LUNES" Else If Val(TextBox1.Text) = 2 Then   TextBox2.Text = " HOY ES DIA MARTES" Else   If Val(TextBox1.Text) = 3 Then   TextBox2.Text = " HOY DIA MIRCOLES" Else   If Val(TextBox1.Text) = 4 Then   TextBox2.Text = " HOY DIA JUEVES"   Else   If Val(TextBox1.Text) = 5 Then   TextBox2.Text = " HOY DIA VIERNES"   Else   If Val(TextBox1.Text) = 6 Then   TextBox2.Text = " HOY DIA SABADO"     Else   If Val(TextBox1.Text) = 7 Then   TextBox2.Text = " DOMINGO"...

BIENVENIDOS A NUESTRO ESPACIO VIRTUAL

Imagen
BIENVENIDOS ESTE SERA NUESTRO ESPACIO VIRTUAL