ARREGLOS TABLAS MATRIZ VISUAL BASIC SCRIPT

UNIDAD 3: VBSCRIPT ARREGLOS

TEMA 5: ARREGLOS TIPO TABLA VISUAL BASIC SCRIPT

Un arreglo tipo tabla se define como un conjunto de datos del mismo tipo organizados en dos o mas columnas y uno o mas renglones.

Para declarar un arreglo tipo tabla se usa el siguiente formato:

DIM NOMTABLA(CANTRENG,CANTCOL)

EJ:

DIM VTAS(3,5)

DIM CALIF(30,6) AS INTEGER

Solo recordar que en capturas, se deberán usar tantos componentes Text como celdas tenga la tabla y en despliegue usar el table de html.

Para procesar ( recordar solo operaciones y comparaciones) internamente todos los elementos de la tabla se ocupan dos ciclos for, uno externo para controlar renglón y uno interno para controlar columna y no olvidar que el primer renglon y la primera columna es la CERO.

Prog13.html

<HTML>

<P> FORMA HTML PROG 13 tablas</P>

CIA ACME<br>INGRESOS POR VENTAS<br>Millones de pesos<BR>

………ene………………….feb…………………..marzo<br>

suc a:<INPUT TYPE=TEXT NAME=v00><INPUT TYPE=TEXT NAME=v01><INPUT TYPE=TEXT NAME=v02><BR>

suc b:<INPUT TYPE=TEXT NAME=v10><INPUT TYPE=TEXT NAME=v11><INPUT TYPE=TEXT NAME=v12><BR>

</FORM>

</HTML>

Nada nuevo excepto lo mencionado tantos input text como elementos tenga la tabla, y en este ejemplo ya se usa mejor com name v00, v01, etc.

Corrida html:

programa13.asp:

<%

'DECLARANDO

DIM VENTAS(2,3)

'CAPTURANDO

VENTAS(0,0)=REQUEST.FORM(“V00”)

VENTAS(0,1)=REQUEST.FORM(“V01”)

VENTAS(0,2)=REQUEST.FORM(“V02”)

VENTAS(1,0)=REQUEST.FORM(“V10”)

VENTAS(1,1)=REQUEST.FORM(“V11”)

VENTAS(1,2)=REQUEST.FORM(“V12”)

'PROCESANDO

FOR RENG = O TO 1

FOR COL = 0 TO 2

VENTAS(RENG,COL)=VENTAS(RENG,COL)+ 500

'DESPLEGANDO USANDO CONTROL TABLE DE HTML

'BORDER=1..4, TH=ENCABEZADO, TR=EMPIEZARENGLON, TD=EMPIEZACELDA

RESPONSE.WRITE(“CIA ACME<BR>VENTAS AUMENTADAS<BR>”)

RESPONSE.WRITE(”<table border=3><tr><th>enero</th><th>febrero</th><th>marzo</th></tr>”)

FOR RENG=0 TO 1

RESPONSE.WRITE(”<TR>”)

FOR COL=0 TO 2

RESPONSE.WRITE(”<td>”&VENTAS(RENG,COL)&”</td>”)

%>

nota: operaciones y despliegues ocupan dos ciclos for, y observar en que parte se puso el inicio y el fin(<tr></tr> del renglon de la tabla de html

corrida prog13.asp

TAREAS PROGRAMACION VISUAL BASIC SCRIPT

1.- CONSTRUIR UN CUADRO QUE CONTENGA LOS COSTOS FIJOS DE CUATRO PRODUCTOS CUALESQUIERA, QUE SE PRODUCEN EN TRES PLANTAS DIFERENTES DE UNA EMPRESA MAQUILADORA.

2.- CONSTRUIR UN CUADRO QUE CONTENGA LOS INGRESOS MENSUALES POR VENTAS DURANTE LOS TRES PRIMEROS MESES DEL AÑO DE CUATRO SUCURSALES DE UNA CADENA DE AUTO REFACCIONES, AGREGAR AL FINAL UNA LISTA QUE MUESTRE LOS INGRESOS MENSUALES TOTALES POR MESES Y UNA SEGUNDA LISTA QUE MUESTRE LOS INGRESOS MENSUALES TOTALES POR SUCURSAL.

3.-CONSTRUIR UN CUADRO QUE CONTENGA LAS COMISIONES GANADAS POR TRES VENDEDORES, DE LOS 5 TIPOS DE LINEA BLANCA DE CONOCIDA MUEBLERIA, ADEMAS LISTAS DE COMISIONES TOTALES Y PROMEDIOS GANADAS POR LOS VENDEDORES, ASI COMO LISTAS DE COMISIONES TOTALES Y PROMEDIOS POR TIPO DE LINEA BLANCA.

ANALIZAR ESTE CODIGO:

' PARA TOTALES Y PROMEDIOS POR RENGLON

FOR R = 1 TO 4

FOR C = 1 TO 3

TOTRENG(R) = TOTRENG(R) + TABLA(R,C)

NEXT C

PROMRENG(R) = TOTRENG(R)/3

NEXT R

'PARA TOTALES Y PROMEDIOS POR COLUMNA

FOR C = 1 TO 3

FOR R = 1 TO 4

TOTCOL(C)=TOTCOL(C) + TABLA(R,C)

NEXT R

PROMCOL(C) = TOTCOL(C) / 4

NEXT C

SUGERENCIA: CONSTRUIR PRIMERO LOS CUADROS EN PAPEL.