
	Portada \| Monotemáticos \| Secciones \| Desarrolladores \| Comunidad \| Servicios \| Servicios profesionales \| RSS

	DesarrolloWeb.com > Manuales > Tutorial de Visual Basic Script

Registrarse | Vuestras páginas | Foros del web | Lista de correo | Boletín de novedades

Generador METAs | Compras | Busca cursos

Desarrollo Freelance | Buscar proyectos | Buscar profesionales | Solicitar desarrollo

Procedimientos. SUB

Vemos detenidamente los procedimientos en VBScript y algún ejemplo de su uso.

01/1/70 -

Decíamos que un procedimiento era una subrutina que se llamaba y realizaba acciones, pero que no devolvía ningún valor y por lo tanto, no era posible utilizarla dentro de una expresión.

Veamos algún ejemplo de procedimiento. Es una subrutina que escribe en la barra de estado un mensaje. No es muy complicada, pero tal como la presentamos aquí no se debería hacer, puesto que utilizamos un bucle vacío para que el navegador esté un poco más lento y el texto salga poco a poco. En lugar de ese bucle deberíamos utilizar una función llamada setTimeout, pero no deseamos introducirla ahora.

sub muestraAbajo(texto)
   dim i
   for i=0 to len(texto)
      dim actual
      actual = left(texto,i)
      window.status = actual
      dim j
      'bucle para ralentizar al navegador debería utilizarse la función setTimeOut
      for j=0 to 20000
         j = j
      next
   next
end sub

Este ejemplo utiliza además varias funciones de cadenas de caracteres, esperamos que no represente mucho problema para entenderlo. Básicamente es un bucle que va recorriendo toda la cadena de caracteres que recibe por parámetro. A medida que se realiza el bucle se va creando una subcadena de caracteres de la parte izquierda de la cadena original, que cada vez es más larga. Luego se imprime esa cadena en la barra de estado del navegador. Entre ejecución y ejecución del bucle se realiza un retardo, en el segundo bucle for que se debería realizarse con un setTimeout.

Podemos ver a continuación cómo se colocaría un botón en la página que llamase a este procedimiento.

<HTML>
<HEAD>
<TITLE>Procedimientos en VBS</TITLE>
<script language=vbscript>
option explicit
sub muestraAbajo(texto)
dim i
for i=0 to len(texto)
  dim actual
  actual = left(texto,i)
  window.status = actual
  dim j
  for j=0 to 20000
   j = j
  next
next
end sub
</script>
</HEAD>
<BODY>
<h1>Procedimientos en VBS</h1>

<P>
<form>
<input type="button" name=b value=ponerAbajo!
       onclick="muestraAbajo('Saludos de Miguel')" language=vbscript>
</form>
</P>
</BODY>
</HTML>

Se puede ver el ejemplo en una página aparte.

Seguir navegando a partir aquí:

+ 1 manual relacionado
+ 1 categoria relacionada

Autoría, licencia y acciones sobre este artículo

Informe de Miguel Angel Alvarez*
Director de DesarrolloWeb.com

Atención: Contenido exclusivo de DesarrolloWeb.com. No reproducir. Copyright.

* Para consultas técnicas utilizar la lista de correo.

Versión imprimible del artículo
Enviar artículo por e-mail

Publicar un comentario del artículo

Manuales relacionados con este artículo

Dentro de Tutorial de Visual Basic Script

Siguiente: Funciones. Function

Anterior: Procedimientos y funciones

< Indice de Tutorial de Visual Basic Script

Categorias relacionadas

A través de las categorías de nuestro directorio se pueden encontrar otro tipo de recursos relacionados con este artículo:

+ Entrar en VBScript

Comentarios de los visitantes

Añadir un comentario del artículo
Aun no hemos recibido comentarios de este artículo.
Puedes ser el primero en enviar tu comentario.

Enlaces:

Maestrosdelweb

Ir arriba

Manuales relacionados
+	Tutorial de Visual Basic Script

Categorías
+	VBScript

Lectura recomendada

+ ENCICLOPEDIA DE MICROSOFT VISUAL BASIC.

Compra este libro en Agapea, la librería urgente a domicilio.

Tienda DesarrolloWeb

		DesarrolloWeb.com \| Copyright \| Anunciese \| Acerca de \| Datos legales \| Contacta \| Por GuiarteMultimedia

Alojamiento web