







				V B F

		     Formateador de Visual Basic

		      Version 98.05 (Mayo 1998)







       -------------------------------------------------------
       -------------------------------------------------------
       ---------------------------------------
       ---------------------------------------------
       ---------------------------------------------
       ------------------------------------------
       ---------------------------------------------
       ---------------------------------------------
       ---------------------------------------------
       -------------------------------------------------------
       -------------------------------------------------------


			  Manual del usuario








	       Para los amigos del FREEWARE preparado por


			 Ing. Branislav Stofko
			     Trebisovska 21
		      821 01 B R A T I S L A V A
			       SLOVAKIA


	      Copyright 1997-98 by B. Stofko Bratislava
			 Derechos reservados


1.   Introduccin
     ------------

  Si Ud. trabaja con los modernos mtodos de programacin, es comn que
su programa consista en ms de un mdulo. Si los mdulos son pequeos no
necesita crear una lista de referencias a las variables y el programa
puede escribirse fcilmente.

  En mi lenguaje primario de programacin FORCE, normalmente no hago
diferencias entre IF THEN ELSE e If Then Else o iF tHen ELse. Este tipo
de escritura puede hacer el trabajo y la vida ms fcil, puedo pensar
ms en la programacin y no en apretar la puta tecla SHIFT en el teclado.

  Sin embargo, varias veces mi programa se ve extrao y feo y, obviamente
no til para prximas modificaciones. Esta es una poca en que es necesario
tener un programa que reformatee el cdigo fuente. Este programa puede hacer
todo eso por m y as puedo ver por la ventana las lindas chicas que andan
por la calle.

  En el lenguaje VISUAL BASIC el estilo de escritura es muy importante.
Pero ahora no tengo ganas de hacer eso manualmente. Se por la experiencia
que no es fcil convencer a un programador de usar un programa que no fue
escrito por l. Sin embargo, la gente debera aceptar que evitar escribir
el cdigo fuente en forma elegante es irremediable.

  Mi principio es

      UN PROGRAMA PUEDE SER INOPERANTE,
      PERO EL CODIGO FUENTE DEBE SER ELEGANTE.

  Es ms fcil hacer un programa bien parecido que hacerlo funcionar bien.

2.   Inicio del programa
     -------------------

     El programa VBF se iniciar con el siguiente mensaje:

Visual Basic source file reformatter       FREEWARE B.Stofko

Syntax: VBF <filename> [options]

Options: /I:n  use increment of n blanks for indent, default = 3
Options: /S    generate comment lines before and after SUB or FUNCTION
Output:        the same filename !!!

  Si quiere reformatear el programa MAIN.BAS, basta con escribir:

			    VBF MAIN.BAS

  La sangra predeterminada para las lneas siguientes a un comando IF es
de 3 caracteres.
  Pienso que esto es lo mejor porque las lneas siguientes generalmente
no superarn los 80 caracteres de largo.
  Una sangra de 8 caracteres (1 Tabulador) es demasiado. Pero si le gusta
puede tipear VBF MAIN.BAS/I:8 y eso es todo.
							  VBF 1 de 4

  El parmetro /S fuerza la generacin de comentarios antes y despus de las
palabras clave PROCEDURE y FUNCTION. Puede reformatear archivos con extensin
.FRM tambin, siempre que est guardado en formato ASCII.

  Ejemplo de un cdigo fuente mal estructurado en VISUAL BASIC:

Function GetDiskSpace (DriveNum As Integer) As Integer
' Devuelve el espacio de disco total y disponible para la unidad especificada
 ' driveNum especifica que unidad (0 = default, 1 = A, 2 = B, etc.)
 '
' 08-25-97 08:07am prva verzia
'
Dim AX_Flag As Integer
Dim BX_Free As Integer
Dim CX_Cluster As Integer
Dim DX_Total As Integer
Dim BytesPerCluster As Single
'
' Requiere info de las alocaciones de la unidad mediante los servicios del DOS
  AX_Flag = BSGetDiskSize(DriveNum, BX_Free, CX_Cluster, DX_Total)
' Testea condicin de error
	    If AX_Flag <> -1 Then
' Calcula el espacio libre y el total
      BytesPerCluster = AX_Flag
   BytesPerCluster = BytesPerCluster * CX_Cluster
     TotalSpace = (DX_Total And &HFFFF&) * BytesPerCluster
   FreeSpace = (BX_Free And &HFFFF&) * BytesPerCluster
   '
   'Indica xito
		 GetDiskSpace = True
Else
'Indica error
		   GetDiskSpace = False
   End If

	   End Function

  Este texto est deliberatamente mal escrito, y lo encontrar en
VBF_TEST.OLD. Haga una copia (no lo renombre) de ese nombre a
VBF_TEST.BAS. Este archivo puede despus reformatearse con VBF.

  Despus de reformatearlo, El cdigo fuente modificado se ver como este:

'-----------------------------------------------------
Function GetDiskSpace (DriveNum As Integer) As Integer
'-----------------------------------------------------
' Devuelve el espacio de disco total y disponible para la unidad especificada
' driveNum especifica que unidad (0 = default, 1 = A, 2 = B, etc.)
'
' 08-25-97 08:07am prva verzia
'
Dim AX_Flag As Integer
Dim BX_Free As Integer
Dim CX_Cluster As Integer
Dim DX_Total As Integer
Dim BytesPerCluster As Single
'
' Requiere info de las alocaciones de la unidad mediante los servicios del DOS
AX_Flag = BSGetDiskSize(DriveNum, BX_Free, CX_Cluster, DX_Total)
							  VBF 2 de 4

' Testea condicin de error
If AX_Flag <> -1 Then
   ' Calcula el espacio libre y el total
   BytesPerCluster = AX_Flag
   BytesPerCluster = BytesPerCluster * CX_Cluster
   TotalSpace = (DX_Total And &HFFFF&) * BytesPerCluster
   FreeSpace = (BX_Free And &HFFFF&) * BytesPerCluster
   '
   'Indica xito
   GetDiskSpace = True
Else
   'Indica error
   GetDiskSpace = False
End If

End Function


			  C U I D A D O
			 ===============

	   VBF escribe sobre el archivo del cdigo fuente original.
	   Por favor use VBF cuidadosamente.

3.   Sumario de archivos
     -------------------

VBF    .PRG   cdigo fuente del programa VBF
VBF    .EXE   programa de reformateo
VBF    .602   manual en Eslovako, formato especial
VBF    .TXT   manual en Eslovako, archivo ASCII
VBF_TST.OLD   cdigo fuente mal formateado
VBF_ENG.TXT   sumario en Ingls, archivo de texto ASCII
VBF_ESP.TXT   sumario en Espaol, archivo de texto ASCII
              (Traducido por DarkMaP: DarkMaP@HotMail.Com)

En esta version se removieron los bugs de Public Sub y Do Until.


4.   Registrando el programa
     -----------------------

  Este programa es FREEWARE. No tiene que pagar ningn derecho de registro.
Pero, si me enva una tarjeta postal me hara feliz. Este tipo de software se
denomina CARDWARE.

  Y si realmente le gusta este programa, por qu no contactarse con los 
editores de su revista favorita de computadoras, o sitios web que distribuyan
software y hablarles de este ! Ser una gran manera de hacer mis trabajos
ms conocidos.

  Si tiene alguna pregunta, puede contactarme en las siguientes direcciones
de E-mail:

  BranoStofko@RocketMail.com
o
  BranoStofko@Mailexcite.com

  Ud. no solo tiene el archivo VBF.EXE sino tambin el cdigo fuente.
Si puede modificarlo con otros compiladores como PASCAL, C o tal vez
VISUAL BASIC. Buena suerte y por favor enveme sus modificaciones por
E-mail.
							  VBF 3 de 4

  Si puede incluso traducir este texto a su propio lenguaje, por favor
enveme una copia por E-mail.

  El autor de este programa no acepta responsibilidades por daos
resultantes de su uso y no hace garantas o representacin, expresa o
implicada, including but not limited to, any implied warranty
de merchantability o fitness para un propsito particular. Este programa
se provee "AS IS", y usted, su usuario, asume todos los riesgos cuando lo use.

  Este programa se hizo con el compilador FORCE de base de datos, que es
similar al CLIPPER pero l puede hacer EXEs ms chicos. FORCE es un producto
de:
		Sophco, Inc.
		P.O. Box 7430
		Boulder, Colorado 80306-7430
		(303) 444-1542

  Esta direccin ha cambiado, vea README.TXT !

				* * *
							  VBF 4 de 4
