B4A en español - Juan Antonio Villalpando
(BASIC4Android)

-- Tutorial de B4A --

Volver al índice del tutorial

____________________________

1.- Teorema de Pitágoras.
- Bajar Pitagoras.zip

- El primer programita que hago siempre para aprender esto, es el teorema de Pitágoras.

- Introducimos un cateto (X).
- Introducimos otro cateto (Y).
- Calculamos la hipotenusa (Z) = raiz cuadrada (un cateto al cuadrado + otro cateto al cuadrado)

- Lo primero crear la carpeta Pitagoras que será donde guardemos el programa.

- IMPORTANTE: Cada programa se guarda en una carpeta distinta.

Es conveniente crear la carpeta del programa antes de comenzar a poner los códigos. En nuestra carpeta C:\Android, creamos una subcarpeta llamada Pitagoras.

Entramos en el B4

Vamos a File / Save y guardamos el programa (incluso antes de comenzar) en C:\Android\Pitagoras con el nombre pitagoras.b4a

- Nota importante, puedes Diseñar la pantalla de la aplicación tanto directamente en el móvil mediante el Bridge o en el ordenador mediante el SDK, igualmente puedes emular la aplicación tanto en el móvil como en el ordenador.

- Aquí vamos a Diseñar y emular la aplicación en el ordenador con el SDK, cuando lo consigas haz lo mismo con el Bridge y el móvil.

____________________________
- Designer. Layout.

_____________________________________________________________________
- Situamos los elementos en la pantalla del emulador. Designer. AddView.

- Vamos a poner los casilleros, etiquetas y el botón, para ello vamos Designer y ponemos:
- una Label1 (mediante Add View) (En el Text escribe: Introduce un cateto)

- Ahora vamos a dar nombre y a guardar nuestro Designer, para ello vamos a File / Save

y le damos un nombre a nuestro diseño, vamos a llamarlo Layout1
(cada vez que cambiemos algo en el Designer debemos de guardarlo: Save)

- El Layout se guarda en la carpeta C:\Android\Pitagoras\Files\Layout1.bal
- En un programa puede haber más de un Layout.bal
- Le podemos poner cualquier nombre: layout, circuito, 1, formulario, acerca_de,...

________________________________
- Conectamos al emulador.

- Para que el Label1 que hemos construido pase al emulador SDK pulsamos en el Designer: WYSIWYG Designer / Connect

____________________________________
- Reubicamos los controles (View)

- Observa cómo se ha insertado el Label1 en el emulador del Android, lo puedes cambiar de posición y de tamaño.

- Ahora añade un casillero: AddView / EditText1

- Añade otro Label: AddView / Label y en su Text escribe: Introduce el otro cateto

- Añade otro casillero: AddView / EditText2

- Añade un Botón: AddView / Button (en su Text escribe: Pulsa para calcular)

- Añade otro Label; AddView / Label (en su Text escribe La hipotenusa vale: )

- Añade otro Label: AddView / Label

- Guarda todo el Designer: File / Save
(No te equivoques, debes mantener el nombre del Designer en Layout1)

Si observas el emulador debe quedar así:

- Tal vez tengas problemas con los colores, blanco, negro,... además no se aprecia bien el contorno de los EditText, por el momento lo dejamos así.

- En programación no olvides nunca el File / Save(o el icono del disquete).

________________________
- Crear el código.

Ahora vamos hacer que cuando hagamos Click en el Button, se realice la operación, para ello vamos a hacer que aparezca en nuestro código la Subrutina:

Sub Button1_Click

End Sub

- Para ello vamos al Designer / Tools / Generate Members

y marcamos Click en el Button1
- Luego pulsa en Generate Members

Si consultas el código observarás que se ha creado las líneas.

Sub Button1_Click

End Sub

____________________________________
- Vamos al código: (copia y pega).

'Activity module
Sub Process_Globals
' Juan Antonio Villalpando
' juana1991@yahoo.com
End Sub

Sub Globals
    Dim x, y, z As Double ' Establecemos las variables
    Dim EditText1, EditText2 As EditText ' Tenemos que declarar los EditText utilizados
    Dim Label1, Label2, Label3, Label4 As Label ' Tenemos que declarar los Label utilizados
    End Sub

Sub Activity_Create(FirstTime As Boolean)
    Activity.LoadLayout("Layout1") 'Cargamos el Designer
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub Button1_Click
    x = EditText1.Text
    y = EditText2.Text
    z = Sqrt(Power(x,2) + Power(y,2))
    Label4.text = z
End Sub

____________________________________________________
- Poner un nombre de Package y un nombre de aplicación.

- Debemos poner un nombre a la aplicación en ApplicationLabel

- Y un nombre de paquete en Project / Build Configurations

- El Package debe constar de al menos dos palabras separadas por punto, se suele poner com. y luego su nombre, es decir:

com.pitagoras

#SupportedOrientation: lo utilizaremos si queremos que nuestra aplicación en el móvil funcione en horizonal, vertical o ambas
#FullScreen y #IncludeTitle si queremos la aplicación en pantalla completa y sin/con título.

____________________________________________________
- Ejecución del programa.

- Para compilarlo y que funcione, pulsamos sobre el icono de la flecha negra (Run).

- Si todo ha ido bien, la aplicación se debe ejecutar en el emulador.

____________________________________________________
- Cómo lo he realizado.

- Declaramos las variables y los controles utilizados.
- Tomamos el valor puesto en EditText1 y lo asignamos a x
- Tomamos el valor puesto en EditText2 y lo asignamos a y
- Hacemos los cuadrados y la raiz.
- Presentamos el valor de z en el Label4

Nota: Para que solo salgan 3 decimales en el casillero.

Label4.text = NumberFormat(z,0,3)

Nota: El BASIC4Android no permite hacer el cuadrado de esta manera x ^ 2, en todo caso admite Power(x, 2)
Diferencias entre VB y BASIC4Android

¿No te gusta que salga el teclado en la pantalla?
¿No puedes utilizar el teclado del ordenador para escribir los números?
Consulta abajo de esta misma página.

__________________________
- Pásalo al móvil.

- Bien, me funciona, ¿cómo puedo pasarlo a mi teléfono con Android para utilizarlo?

Ve a C:\Android\Pitagoras\Objects y pasa mediante un cable USB el archivo pitagoras_DEBUG.apk a tu móvil.
(O bien lo puedes pasar mediante Tools / B4ABridge / Connect Wireless)

IMPORTANTE:

¿Tarda mucho en arrancar el programa cuando lo pasas al móvil?

- Eso es porque el archivo compilado pitagoras_RAPID_DEBUG.apk, contiene el código de depuración _DEBUG

- Para que no lo contenga vamos a Release. Poner en Release el desplegable para obtener pitagoras.apk

- De esta manera cuando compilemos el programa obtendremos el archivo pitagoras.apk, que tendrá menor tamaño que el pitagoras_RAPID_DEBUG.apk

_____________________________________

- Cómo cambiar el icono del programa.

Una vez que hemos cargado el program en nuestro emulador SDK o en el teléfono móvil, veremos un icono en su pantalla de inicio.

- Project / Choose Icon
(puede ser de tipo jpg, y otras dimensiones que las indicadas anterioermente.)

- También podemos cambiar ese icono yendo a la carpeta donde está el programa (en mi caso lo estoy haciendo con el programa pitagoras) y entramos en la subcarpeta drawable C:\Android\Pitagoras\Objects\res\drawable

Veremos una imagen llamada icon.png

- Mediante un editor gráfico podemos cambiar esa imagen. Debes mantener su nombre y su tamaño (72 x 72).

____________________________________________
Visual Basic 2010 Express

¡¡¡¡Outchhhh!!!! ¡¡¡¡Ummmm!!!!

¡¡Me ha gustado esto de programar en Visual Basic para el Android!!
¿De dónde podría bajar el Visual Basic "normal" para hacer programas para mi ordenador?

__________________________________

__________________________________ http://laughton.com/basic/help/De_Re_BASIC%21.htm#_Toc349156386

__________________________________

Equipo Microsoft
Linus Benedict Torvalds	Equipo LINUX - Ubuntu - GNU Mark Shuttleworth	Richard Matthew Stallman